版本號 : 2020072401

修改鞋樣圖片導入介面(拉檔案流程順一點)

Signed-off-by: B70340 <b70340@gmail.com>

TENDEN-MES-SYS/Module/Module1.vb

@@ -4,7 +4,7 @@
     Public Target As String : Public Target1 As String : Public Target2 As String : Public FTP帳號 As String : Public FTP密碼 As String : Public 登入人IP As String
     Public CC(99) As Boolean : Public AA(99) As String : Public 登入判斷 As Boolean
     '----系統版本-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-    Public 版本 As String = "2020071001"
+    Public 版本 As String = "2020072401"
     '----系統用全域變數-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     Public SQL1 As String
     Public 匯率 As Double

TENDEN-MES-SYS/圖片資料庫管理/鞋型圖片導入資料庫.Designer.vb

@@ -67,7 +67,6 @@ Partial Class 鞋型圖片導入資料庫
         Me.Label13 = New System.Windows.Forms.Label()
         Me.Button14 = New System.Windows.Forms.Button()
         Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog()
-        Me.Label14 = New System.Windows.Forms.Label()
         Me.Label6 = New System.Windows.Forms.Label()
         CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -117,7 +116,7 @@ Partial Class 鞋型圖片導入資料庫
         'Label9
         '
         Me.Label9.AutoSize = True
-        Me.Label9.Location = New System.Drawing.Point(28, 108)
+        Me.Label9.Location = New System.Drawing.Point(7, 547)
         Me.Label9.Name = "Label9"
         Me.Label9.Size = New System.Drawing.Size(56, 16)
         Me.Label9.TabIndex = 504
@@ -127,10 +126,10 @@ Partial Class 鞋型圖片導入資料庫
         '
         Me.TextBox4.AllowDrop = True
         Me.TextBox4.ForeColor = System.Drawing.Color.Black
-        Me.TextBox4.Location = New System.Drawing.Point(116, 105)
+        Me.TextBox4.Location = New System.Drawing.Point(69, 544)
         Me.TextBox4.Multiline = True
         Me.TextBox4.Name = "TextBox4"
-        Me.TextBox4.Size = New System.Drawing.Size(501, 23)
+        Me.TextBox4.Size = New System.Drawing.Size(1261, 23)
         Me.TextBox4.TabIndex = 503
         '
         'Label2
@@ -185,7 +184,7 @@ Partial Class 鞋型圖片導入資料庫
         Me.Button11.ForeColor = System.Drawing.Color.Blue
         Me.Button11.Location = New System.Drawing.Point(624, 4)
         Me.Button11.Name = "Button11"
-        Me.Button11.Size = New System.Drawing.Size(146, 124)
+        Me.Button11.Size = New System.Drawing.Size(146, 99)
         Me.Button11.TabIndex = 510
         Me.Button11.Text = "確認儲存"
         Me.Button11.UseVisualStyleBackColor = True
@@ -228,10 +227,10 @@ Partial Class 鞋型圖片導入資料庫
         '
         'WebBrowser1
         '
-        Me.WebBrowser1.Location = New System.Drawing.Point(692, 164)
+        Me.WebBrowser1.Location = New System.Drawing.Point(12, 570)
         Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
         Me.WebBrowser1.Name = "WebBrowser1"
-        Me.WebBrowser1.Size = New System.Drawing.Size(632, 815)
+        Me.WebBrowser1.Size = New System.Drawing.Size(1318, 409)
         Me.WebBrowser1.TabIndex = 520
         Me.WebBrowser1.Url = New System.Uri("", System.UriKind.Relative)
         '
@@ -424,10 +423,10 @@ Partial Class 鞋型圖片導入資料庫
         '
         'WebBrowser2
         '
-        Me.WebBrowser2.Location = New System.Drawing.Point(12, 164)
+        Me.WebBrowser2.Location = New System.Drawing.Point(12, 132)
         Me.WebBrowser2.MinimumSize = New System.Drawing.Size(20, 20)
         Me.WebBrowser2.Name = "WebBrowser2"
-        Me.WebBrowser2.Size = New System.Drawing.Size(632, 815)
+        Me.WebBrowser2.Size = New System.Drawing.Size(1318, 409)
         Me.WebBrowser2.TabIndex = 540
         Me.WebBrowser2.Url = New System.Uri("", System.UriKind.Relative)
         '
@@ -435,7 +434,7 @@ Partial Class 鞋型圖片導入資料庫
         '
         Me.TextBox7.AllowDrop = True
         Me.TextBox7.ForeColor = System.Drawing.Color.Black
-        Me.TextBox7.Location = New System.Drawing.Point(850, 137)
+        Me.TextBox7.Location = New System.Drawing.Point(850, 105)
         Me.TextBox7.Multiline = True
         Me.TextBox7.Name = "TextBox7"
         Me.TextBox7.Size = New System.Drawing.Size(115, 23)
@@ -445,7 +444,7 @@ Partial Class 鞋型圖片導入資料庫
         '
         Me.Label12.AutoSize = True
         Me.Label12.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        Me.Label12.Location = New System.Drawing.Point(688, 137)
+        Me.Label12.Location = New System.Drawing.Point(688, 105)
         Me.Label12.Name = "Label12"
         Me.Label12.Size = New System.Drawing.Size(156, 24)
         Me.Label12.TabIndex = 563
@@ -455,7 +454,7 @@ Partial Class 鞋型圖片導入資料庫
         '
         Me.Label13.AutoSize = True
         Me.Label13.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        Me.Label13.Location = New System.Drawing.Point(12, 137)
+        Me.Label13.Location = New System.Drawing.Point(12, 105)
         Me.Label13.Name = "Label13"
         Me.Label13.Size = New System.Drawing.Size(86, 24)
         Me.Label13.TabIndex = 562
@@ -465,29 +464,18 @@ Partial Class 鞋型圖片導入資料庫
         '
         Me.Button14.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
         Me.Button14.ForeColor = System.Drawing.Color.Blue
-        Me.Button14.Location = New System.Drawing.Point(104, 137)
+        Me.Button14.Location = New System.Drawing.Point(104, 105)
         Me.Button14.Name = "Button14"
         Me.Button14.Size = New System.Drawing.Size(119, 24)
         Me.Button14.TabIndex = 561
         Me.Button14.Text = "讀取料夾路徑"
         Me.Button14.UseVisualStyleBackColor = True
         '
-        'Label14
-        '
-        Me.Label14.AutoSize = True
-        Me.Label14.Font = New System.Drawing.Font("微軟正黑體", 27.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        Me.Label14.ForeColor = System.Drawing.Color.Red
-        Me.Label14.Location = New System.Drawing.Point(640, 496)
-        Me.Label14.Name = "Label14"
-        Me.Label14.Size = New System.Drawing.Size(57, 47)
-        Me.Label14.TabIndex = 565
-        Me.Label14.Text = "→"
-        '
         'Label6
         '
         Me.Label6.AutoSize = True
         Me.Label6.ForeColor = System.Drawing.Color.Red
-        Me.Label6.Location = New System.Drawing.Point(229, 140)
+        Me.Label6.Location = New System.Drawing.Point(229, 108)
         Me.Label6.Name = "Label6"
         Me.Label6.Size = New System.Drawing.Size(424, 16)
         Me.Label6.TabIndex = 570
@@ -503,7 +491,6 @@ Partial Class 鞋型圖片導入資料庫
         Me.Controls.Add(Me.Label12)
         Me.Controls.Add(Me.Label13)
         Me.Controls.Add(Me.Button14)
-        Me.Controls.Add(Me.WebBrowser2)
         Me.Controls.Add(Me.Button13)
         Me.Controls.Add(Me.Button12)
         Me.Controls.Add(Me.Button10)
@@ -540,7 +527,7 @@ Partial Class 鞋型圖片導入資料庫
         Me.Controls.Add(Me.Button2)
         Me.Controls.Add(Me.Button31)
         Me.Controls.Add(Me.Button4)
-        Me.Controls.Add(Me.Label14)
+        Me.Controls.Add(Me.WebBrowser2)
         Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
         Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
         Me.Name = "鞋型圖片導入資料庫"
@@ -595,7 +582,6 @@ Partial Class 鞋型圖片導入資料庫
     Friend WithEvents Label13 As Label
     Friend WithEvents Button14 As Button
     Friend WithEvents FolderBrowserDialog1 As FolderBrowserDialog
-    Friend WithEvents Label14 As Label
     Friend WithEvents Label6 As Label
 End Class