502647092/TaoBaoLink
1
0
Fork 0
mirror of https://e.coding.net/circlecloud/TaoBaoLink.git synced 2025-11-24 21:36:09 +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 VERSION 5.00
Begin VB.Form Frm_Main 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 ClientHeight = 1590
ClientLeft = 60 ClientLeft = 60
ClientTop = 345 ClientTop = 345
ClientWidth = 3375 ClientWidth = 3375
Icon = "Frm_Main.frx":0000
LinkTopic = "Form1" LinkTopic = "Form1"
ScaleHeight = 1590 ScaleHeight = 1590
ScaleWidth = 3375 ScaleWidth = 3375
@@ -12,7 +13,7 @@ Begin VB.Form Frm_Main
Begin <20>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>.XmlHttp XmlHttp Begin <20>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>.XmlHttp XmlHttp
Height = 240 Height = 240
Left = 285 Left = 285
Top = 1095 Top = 1305
Visible = 0 'False Visible = 0 'False
Width = 240 Width = 240
_ExtentX = 423 _ExtentX = 423
@@ -23,7 +24,7 @@ Begin VB.Form Frm_Main
Height = 435 Height = 435
Left = 855 Left = 855
TabIndex = 4 TabIndex = 4
Top = 1005 Top = 1035
Width = 1665 Width = 1665
End End
Begin VB.TextBox tip Begin VB.TextBox tip
@@ -72,7 +73,7 @@ Private Sub submit_Click()
Dim Html As String Dim Html As String
Html = LoadResString(1) Html = LoadResString(1)
Dim UID As String Dim UID As String
UID = XmlHttp.URLEncode(username) UID = XmlHttp.UTF8_URLEncoding(username)
Html = Replace(Html, "{uid}", UID) Html = Replace(Html, "{uid}", UID)
Html = Replace(Html, "{tip}", tip.Text) Html = Replace(Html, "{tip}", tip.Text)
Clipboard.SetText Html 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 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 UserControl=..\VB<56>û<EFBFBD><C3BB>ؼ<EFBFBD>\XmlHttp.ctl
ResFile32="<22>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>.RES" ResFile32="<22>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>.RES"
IconForm="Frm_Main"
Startup="Frm_Main" Startup="Frm_Main"
HelpFile="" 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" Path32="C:\Users\Administrator\Desktop"
Command32="" Command32=""
Name="<22>Ա<EFBFBD><D4B1><EFBFBD>ǩ<EFBFBD><C7A9><EFBFBD><EFBFBD>" 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 Frm_Main = 107, 92, 1536, 597, C, 22, 22, 1451, 527, C
XmlHttp = 0, 0, 0, 0, C, 88, 88, 1517, 593, C XmlHttp = 312, 63, 1741, 725, , 88, 88, 1517, 593, C