502647092/TaoBaoLink
1
0
Fork 0
mirror of https://e.coding.net/circlecloud/TaoBaoLink.git synced 2025-10-01 12:37:01 +00:00
Code Releases Activity

add icon...

Browse Source 
Signed-off-by: j502647092 <jtb1@163.com>
This commit is contained in:
j502647092
2015-07-16 15:54:59 +08:00
parent 43d8e7872f
commit 2eea030bcc
4 changed files with 9 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Frm_Main.frm
View File

@ -1,10 +1,11 @@
VERSION 5.00
Begin VB.Form Frm_Main
Caption = "<22>Ա<EFBFBD><EFBFBD><EFBFBD>ǩ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
Caption = "<22><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǩ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"
ClientHeight = 1590
ClientLeft = 60
ClientTop = 345
ClientWidth = 3375
Icon = "Frm_Main.frx":0000
LinkTopic = "Form1"
ScaleHeight = 1590
ScaleWidth = 3375
@ -12,7 +13,7 @@ Begin VB.Form Frm_Main
Begin <20>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>.XmlHttp XmlHttp
Height = 240
Left = 285
Top = 1095
Top = 1305
Visible = 0 'False
Width = 240
_ExtentX = 423
@ -23,7 +24,7 @@ Begin VB.Form Frm_Main
Height = 435
Left = 855
TabIndex = 4
Top = 1005
Top = 1035
Width = 1665
End
Begin VB.TextBox tip
@ -72,7 +73,7 @@ Private Sub submit_Click()
Dim Html As String
Html = LoadResString(1)
Dim UID As String
UID = XmlHttp.URLEncode(username)
UID = XmlHttp.UTF8_URLEncoding(username)
Html = Replace(Html, "{uid}", UID)
Html = Replace(Html, "{tip}", tip.Text)
Clipboard.SetText Html

BIN
Frm_Main.frx Normal file
View File

Binary file not shown.

3
淘宝标签生成.vbp
View File

@ -3,9 +3,10 @@ Form=Frm_Main.frm
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation
UserControl=..\VB<56>û<EFBFBD><C3BB>ؼ<EFBFBD>\XmlHttp.ctl
ResFile32="<22>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>.RES"
IconForm="Frm_Main"
Startup="Frm_Main"
HelpFile=""
ExeName32="<22>Ա<EFBFBD><EFBFBD><EFBFBD>ǩ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>.exe"
ExeName32="<22><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǩ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>.exe"
Path32="C:\Users\Administrator\Desktop"
Command32=""
Name="<22>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>"

4
淘宝标签生成.vbw
View File

@ -1,2 +1,2 @@
Frm_Main = 455, 127, 1884, 632, , 22, 22, 1451, 527, C
XmlHttp = 0, 0, 0, 0, C, 88, 88, 1517, 593, C
Frm_Main = 107, 92, 1536, 597, C, 22, 22, 1451, 527, C
XmlHttp = 312, 63, 1741, 725, , 88, 88, 1517, 593, C