20211002備份

TENDEN-MES-SYS/LoginForm1vb.Designer.vb

@@ -52,6 +52,7 @@ Partial Class LoginForm1vb
         Me.ComboBox1 = New System.Windows.Forms.ComboBox()
         Me.DataGridView1 = New System.Windows.Forms.DataGridView()
         Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
+        Me.UPDATE_bt = New System.Windows.Forms.Button()
         CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
@@ -74,7 +75,7 @@ Partial Class LoginForm1vb
         Me.UsernameLabel.Name = "UsernameLabel"
         Me.UsernameLabel.Size = New System.Drawing.Size(220, 23)
         Me.UsernameLabel.TabIndex = 0
-        Me.UsernameLabel.Text = "使用者名稱(&U)"
+        Me.UsernameLabel.Text = ".使用者名稱(&U)"
         Me.UsernameLabel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
         '
         'PasswordLabel
@@ -179,10 +180,10 @@ Partial Class LoginForm1vb
         '
         'WebBrowser3
         '
-        Me.WebBrowser3.Location = New System.Drawing.Point(493, 82)
+        Me.WebBrowser3.Location = New System.Drawing.Point(491, 117)
         Me.WebBrowser3.MinimumSize = New System.Drawing.Size(20, 20)
         Me.WebBrowser3.Name = "WebBrowser3"
-        Me.WebBrowser3.Size = New System.Drawing.Size(208, 152)
+        Me.WebBrowser3.Size = New System.Drawing.Size(210, 104)
         Me.WebBrowser3.TabIndex = 607
         Me.WebBrowser3.Url = New System.Uri("", System.UriKind.Relative)
         '
@@ -192,7 +193,7 @@ Partial Class LoginForm1vb
         Me.Label3.BackColor = System.Drawing.Color.White
         Me.Label3.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
         Me.Label3.ForeColor = System.Drawing.Color.Red
-        Me.Label3.Location = New System.Drawing.Point(485, 31)
+        Me.Label3.Location = New System.Drawing.Point(485, 23)
         Me.Label3.Name = "Label3"
         Me.Label3.Size = New System.Drawing.Size(224, 48)
         Me.Label3.TabIndex = 609
@@ -255,6 +256,15 @@ Partial Class LoginForm1vb
         Me.DataGridView1.TabIndex = 636
         Me.DataGridView1.Visible = False
         '
+        'UPDATE_bt
+        '
+        Me.UPDATE_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
+        Me.UPDATE_bt.Location = New System.Drawing.Point(488, 74)
+        Me.UPDATE_bt.Name = "UPDATE_bt"
+        Me.UPDATE_bt.Size = New System.Drawing.Size(213, 38)
+        Me.UPDATE_bt.TabIndex = 637
+        Me.UPDATE_bt.Text = "UPDATE"
+        '
         'LoginForm1vb
         '
         Me.AcceptButton = Me.OK
@@ -262,6 +272,7 @@ Partial Class LoginForm1vb
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.CancelButton = Me.Cancel
         Me.ClientSize = New System.Drawing.Size(713, 249)
+        Me.Controls.Add(Me.UPDATE_bt)
         Me.Controls.Add(Me.DataGridView1)
         Me.Controls.Add(Me.Label5)
         Me.Controls.Add(Me.ComboBox1)
@@ -308,4 +319,5 @@ Partial Class LoginForm1vb
     Friend WithEvents ComboBox1 As ComboBox
     Friend WithEvents DataGridView1 As DataGridView
     Friend WithEvents SaveFileDialog1 As SaveFileDialog
+    Friend WithEvents UPDATE_bt As Button
 End Class

TENDEN-MES-SYS/LoginForm1vb.vb

@@ -1,5 +1,8 @@
 Option Explicit On
 Imports System.Data.SqlClient
+Imports System.IO
+Imports System.Text
+
 Public Class LoginForm1vb
     ' TODO: 插入程式碼，利用提供的使用者名稱和密碼執行自訂驗證 (請參閱 https://go.microsoft.com/fwlink/?LinkId=35339)。
     ' 如此便可將自訂主體附加到目前執行緒的主體，如下所示:    My.User.CurrentPrincipal = CustomPrincipal 其中 CustomPrincipal 是用來執行驗證的 IPrincipal 實作。
@@ -21,6 +24,10 @@ Public Class LoginForm1vb
         da.Fill(ds2) : DataGridView1.DataSource = ds2.Tables(0) : conn.Close()
     End Sub
     Private Sub LoginForm1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        '-----------------------刪除自動更新項目-----------------------------------------------------------------------------------------------------------------------------------------------
+        Dim Str As String = Application.StartupPath
+        If File.Exists(Str + "\SYS-UPDATE.exe") Then : File.Delete(Str + "\SYS-UPDATE.exe") : End If
+        If File.Exists(Str + "\LIVE.txt") Then : File.Delete(Str + "\LIVE.txt") : End If
         '-----------------------控件基本設定-----------------------------------------------------------------------------------------------------------------------------------------------
         CheckBox1.Enabled = False : CheckBox1.Enabled = False : TextBox4.Text = "1" : Label1.Text = "執行檔版本號 : " & 版本 : UsernameTextBox.ImeMode = 3
         網段.ShowDialog()
@@ -74,6 +81,10 @@ Public Class LoginForm1vb
         Next
         Target1 = Target & AA(0) & "/"
         WebBrowser3.Url = New Uri(Target1)
+        Dim Str As String = Application.StartupPath
+        If File.Exists(Str + "\TENDEN-ERP-SYS - 2021092901.exe") Then
+            UPDATE_bt.PerformClick()
+        End If
         If Strings.Right(Label1.Text, 10) <> Strings.Right(Label2.Text, 10) Then
             自動更新2()
         Else : End If
@@ -96,16 +107,7 @@ Public Class LoginForm1vb
         Dim aa1 As MsgBoxResult
         aa1 = MsgBox("系統版本號 與 資料庫版本號 對應不上，請開發人員注意是否有其他人員修改。並決定是否下載最新的執行檔?", MsgBoxStyle.OkCancel)
         If aa1 = MsgBoxResult.Ok Then
-            With SaveFileDialog1 : .Filter = "所有文件(*.exe)|*.exe" : End With
-            SaveFileDialog1.FileName = "TENDEN-ERP-SYS - " & 版本號 & ".exe"
-            SaveFileDialog1.ShowDialog()
-            If Strings.Right(SaveFileDialog1.FileName, 31) = "TENDEN-ERP-SYS - " & 版本號 & ".exe" Then
-                My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "TENDEN-ERP-SYS - " & 版本號 & ".exe", SaveFileDialog1.FileName, "", "", True, 10000, True)
-                MsgBox("下載完成，請手動刪除就的執行檔，並且用新的執行檔開啟。")
-                Me.Close()
-            Else
-                MsgBox("操作不正確，請用手動方式下載更新。")
-            End If
+            UPDATE_bt.PerformClick()
         Else
             登入程序()
         End If
@@ -114,16 +116,9 @@ Public Class LoginForm1vb
         Dim aa1 As MsgBoxResult
         aa1 = MsgBox("系統版本號 與 資料庫版本號 對應不上，請下載最新的執行檔。", MsgBoxStyle.OkCancel)
         If aa1 = MsgBoxResult.Ok Then
-            With SaveFileDialog1 : .Filter = "所有文件(*.exe)|*.exe" : End With
-            SaveFileDialog1.FileName = "TENDEN-ERP-SYS - " & 版本號 & ".exe"
-            SaveFileDialog1.ShowDialog()
-            If Strings.Right(SaveFileDialog1.FileName, 31) = "TENDEN-ERP-SYS - " & 版本號 & ".exe" Then
-                My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "TENDEN-ERP-SYS - " & 版本號 & ".exe", SaveFileDialog1.FileName, "", "", True, 10000, True)
-                MsgBox("下載完成，請手動刪除就的執行檔，並且用新的執行檔開啟。")
-                Me.Close()
-            Else
-                MsgBox("操作不正確，請用手動方式下載更新。")
-            End If
+            UPDATE_bt.PerformClick()
+        Else
+            MsgBox("操作不正確，請用手動方式下載更新。")
         End If
     End Sub
     Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
@@ -217,4 +212,28 @@ Public Class LoginForm1vb
     Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.Click
         UsernameTextBox.Focus()
     End Sub
+    Private Sub UPDATE_bt_Click(sender As Object, e As EventArgs) Handles UPDATE_bt.Click
+        Dim Strs As String = Application.StartupPath
+        If File.Exists(Strs + "\LIVE.txt") Then : File.Delete(Strs + "\LIVE.txt") : End If
+        Dim FilePath As String = Strs + "\LIVE.txt"
+        Try
+            Using fs As IO.FileStream = New IO.FileStream(FilePath, FileMode.Append)
+                Using sw As StreamWriter = New StreamWriter(fs, Encoding.Default)
+                    If ComboBox1.Text = "天盾伺服器" Then
+                        Dim str As String = "A"
+                        sw.WriteLine(str)   '插入一整行
+                        sw.Flush()
+                    Else
+                        Dim str As String = "B"
+                        sw.WriteLine(str)   '插入一整行
+                        sw.Flush()
+                    End If
+                End Using
+            End Using
+        Catch ex As Exception
+        End Try
+        My.Computer.Network.DownloadFile(Target & AA(0) & "/" & "SYS-UPDATE.exe", Strs + "\SYS-UPDATE.exe")
+        Shell(Strs + "\SYS-UPDATE.exe", vbNormalFocus)
+        Me.Close()
+    End Sub
 End Class

TENDEN-MES-SYS/Module/全域變數.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 = "2021092801"
+    Public 版本 As String = "2021092901"
     '----系統用全域變數-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
     Public 匯率 As Double
 

TENDEN-MES-SYS/obj/Debug/天盾系統.vbproj.CoreCompileInputs.cache

@@ -1 +1 @@
-52268b93f54c13964a7906cf981abdd2396dede3
+3e05c216c3adce96cfb4a771d1fcd739f5d299f2

TENDEN-MES-SYS/obj/Debug/天盾系統.vbproj.FileListAbsolute.txt

@@ -585,3 +585,124 @@ D:\工巧明\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.
 D:\工巧明\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單分析2.resources
 D:\工巧明\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單分析3.resources
 D:\工巧明\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單分析比對工具_Vionic.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\TENDEN-ERP-SYS.exe.config
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\TENDEN-ERP-SYS.exe
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\TENDEN-ERP-SYS.pdb
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\TENDEN-ERP-SYS.xml
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\Microsoft.Web.Infrastructure.dll
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\Newtonsoft.Json.dll
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\Transformer.NET.dll
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\WebActivatorEx.dll
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\Newtonsoft.Json.xml
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\bin\Debug\Transformer.NET.xml
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.力威發票明細轉換工具.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單交期批量修改工具.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單分析比對工具_力威.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.模具控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.業務資料日期除錯.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單資料匯入_力威.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.網段.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.形體分析報表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單明細表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單改量差異查詢.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.人員ID卡系統配置設定.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.Customer_Information_資料管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.CXL訂單紀錄表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.DELIVERY_ADDRESS__資料管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.FACTORY_資料管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.FTP資料夾管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.INVOICE_確認部門.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.SAMPLE_TRACKER.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.STYLE_形體下單數量統計.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.STYLE_資料管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.STYLE_資料管理_對應訂單.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.中文樣品單.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.中文樣品單批量列印.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.中文樣品單清單.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.中文樣品單階段.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.保證書出貨統計資料.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.出貨明細表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_INVOICE.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_SAMPLE_TRACKER.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_中文樣品單.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_出貨明細表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_吊牌.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_周進度表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_周進度表T1_T4.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_測試報告.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_生產進度表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_確認樣品確認通知單.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單價格利潤表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單分析1.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單分析2.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單分析3.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單明細.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_費用報表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_量產樣品控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單執行資訊輸入.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.周進度表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.周進度表T1_T4.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.帳務資料庫管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.帳號管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.LoginForm1vb.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.TENDEN_MES_SYS.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.Resources.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.SplashScreen1.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.成本資料庫管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.收款報表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.收款報表批量輸入.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.楦頭圖片導入資料庫.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.楦頭圖片資料庫.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.楦頭規格表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.業務資料庫管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.中文樣品吊牌管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.樣品資料庫管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.清單修改.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.測試報告報告到期管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.測試報告控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.測試報告新配色管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.現有訂單鞋盒資訊查詢.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.生產進度表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.皮料資料紀錄表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.中文確認樣品確認通知單.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.系統使用者管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.系統執行檔版本管理.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單價格利潤明細表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單分析報表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.OrderTypeAnalysis.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.OldUnitComparison.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.NewUnitComparison.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單分析比對工具_Vionic.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.DeadlineReport.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_訂單控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單控制表修改紀錄.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單明細表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單明細表修改紀錄.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單流水號.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單資料匯入_Vionic.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.列印_收款報表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.費用報表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.量產樣品控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.量產樣品明細表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.量產樣品流水號.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.量產樣品訂單CXL紀錄表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.量產樣品訂單出貨紀錄表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.量產樣品訂單匯入.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.鞋型圖片導入資料庫.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.鞋型圖片資料庫.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單資料庫選擇.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.訂單資料比對與修改_力威.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.鞋盒訂單紀錄表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.鞋盒資料控制表.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.驗貨報告圖片導入資料庫.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.驗貨報告大圖.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.驗貨報告資料庫.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾國際管理系統.驗貨報告資料庫修正.resources
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾系統.vbproj.GenerateResource.cache
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾系統.vbproj.CoreCompileInputs.cache
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾系統.vbproj.CopyComplete
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\TENDEN-ERP-SYS.exe
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\TENDEN-ERP-SYS.xml
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\TENDEN-ERP-SYS.pdb
+D:\工巧明\TENDEN\TENDEN-MES-SYS\TENDEN-MES-SYS\obj\Debug\天盾系統.vbprojAssemblyReference.cache

TENDEN-MES-SYS/樣品訂單管理/中文樣品單系統/中文樣品單.vb

@@ -1513,7 +1513,7 @@ Public Class 中文樣品單
         If 內裡_dgv.Rows.Count > 0 Then
             For i = 0 To 內裡_dgv.Rows.Count - 1
                 ConnOpen()
-                SQL1 = "UPDATE 確認樣品單明細表暫存檔 SET 細項 = N'" & 內裡_dgv.Rows(i).Cells("Item_N").Value & "' 內容 = N'" & 內裡_dgv.Rows(i).Cells("內容").Value & "', 
+                SQL1 = "UPDATE 確認樣品單明細表暫存檔 SET 細項 = N'" & 內裡_dgv.Rows(i).Cells("Item_N").Value & "', 內容 = N'" & 內裡_dgv.Rows(i).Cells("內容").Value & "', 
                                                           廠商 = N'" & 內裡_dgv.Rows(i).Cells("Factory").Value & "' 
                         WHERE 樣品流水號二 LIKE '" & 內裡_dgv.Rows(i).Cells("樣品流水號二").Value & "' AND 
                               樣品流水號三 LIKE '" & 內裡_dgv.Rows(i).Cells("樣品流水號三").Value & "'  AND 

TENDEN-MES-SYS/樣品訂單管理/系統列印介面/列印_中文樣品單.vb

@@ -521,7 +521,7 @@ Public Class 列印_中文樣品單
             .ShrinkToFit = False : .ReadingOrder = xlContext : .MergeCells = False : End With
 
         位置8 = 14 + (面料數 * 2) + (內裏數 * 2) + (底部數 * 2) + (飾物數 * 2)
-        For i As Integer = 14 To 位置8
+        For i As Integer = 15 To 位置8
             攔寬 = xlSheet.Rows(i).RowHeight
             位置11 = i & ":" & i
             xlSheet.Rows(位置11).Select : myExcel.Selection.RowHeight = 攔寬 + 20

TENDEN-MES-SYS/資料庫系統管理/系統執行檔版本管理.Designer.vb

@@ -51,7 +51,7 @@ Partial Class 系統執行檔版本管理
         '
         Me.Label12.AutoSize = True
         Me.Label12.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte))
-        Me.Label12.Location = New System.Drawing.Point(955, 9)
+        Me.Label12.Location = New System.Drawing.Point(955, 10)
         Me.Label12.Name = "Label12"
         Me.Label12.Size = New System.Drawing.Size(80, 16)
         Me.Label12.TabIndex = 604
@@ -91,6 +91,8 @@ Partial Class 系統執行檔版本管理
         '
         'WebBrowser1
         '
+        Me.WebBrowser1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.WebBrowser1.Location = New System.Drawing.Point(958, 35)
         Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
         Me.WebBrowser1.Name = "WebBrowser1"
@@ -144,8 +146,9 @@ Partial Class 系統執行檔版本管理
         '
         'WebBrowser3
         '
-        Me.WebBrowser3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.WebBrowser3.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.WebBrowser3.Location = New System.Drawing.Point(956, 373)
         Me.WebBrowser3.MinimumSize = New System.Drawing.Size(20, 20)
         Me.WebBrowser3.Name = "WebBrowser3"