commit 3ccb7d93754b4f03645379595f33cb43b5e272ce Author: XuJiacheng Date: Thu Dec 11 11:43:00 2025 +0800 初始化 diff --git a/WT-DMS.sln b/WT-DMS.sln new file mode 100644 index 0000000..c68faae --- /dev/null +++ b/WT-DMS.sln @@ -0,0 +1,30 @@ + +Microsoft Visual Studio Solution File, Format Version 11.00 +# Visual Studio 2010 +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "WT-DMS", "WT-DMS\WT-DMS.vbproj", "{5F2F6487-6E84-4827-ADBB-5EEFB94661CB}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Debug|Mixed Platforms = Debug|Mixed Platforms + Debug|x86 = Debug|x86 + Release|Any CPU = Release|Any CPU + Release|Mixed Platforms = Release|Mixed Platforms + Release|x86 = Release|x86 + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Debug|Any CPU.ActiveCfg = Debug|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Debug|Mixed Platforms.ActiveCfg = Debug|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Debug|Mixed Platforms.Build.0 = Debug|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Debug|x86.ActiveCfg = Debug|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Debug|x86.Build.0 = Debug|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Release|Any CPU.ActiveCfg = Release|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Release|Mixed Platforms.ActiveCfg = Release|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Release|Mixed Platforms.Build.0 = Release|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Release|x86.ActiveCfg = Release|x86 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB}.Release|x86.Build.0 = Release|x86 + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal diff --git a/WT-DMS/AboutBox1.Designer.vb b/WT-DMS/AboutBox1.Designer.vb new file mode 100644 index 0000000..c5cf218 --- /dev/null +++ b/WT-DMS/AboutBox1.Designer.vb @@ -0,0 +1,178 @@ + _ +Partial Class AboutBox1 + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + Friend WithEvents TableLayoutPanel As System.Windows.Forms.TableLayoutPanel + Friend WithEvents LogoPictureBox As System.Windows.Forms.PictureBox + Friend WithEvents LabelProductName As System.Windows.Forms.Label + Friend WithEvents LabelVersion As System.Windows.Forms.Label + Friend WithEvents LabelCompanyName As System.Windows.Forms.Label + Friend WithEvents TextBoxDescription As System.Windows.Forms.TextBox + Friend WithEvents OKButton As System.Windows.Forms.Button + Friend WithEvents LabelCopyright As System.Windows.Forms.Label + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(AboutBox1)) + Me.TableLayoutPanel = New System.Windows.Forms.TableLayoutPanel() + Me.LogoPictureBox = New System.Windows.Forms.PictureBox() + Me.LabelProductName = New System.Windows.Forms.Label() + Me.LabelVersion = New System.Windows.Forms.Label() + Me.LabelCopyright = New System.Windows.Forms.Label() + Me.LabelCompanyName = New System.Windows.Forms.Label() + Me.TextBoxDescription = New System.Windows.Forms.TextBox() + Me.OKButton = New System.Windows.Forms.Button() + Me.TableLayoutPanel.SuspendLayout() + CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'TableLayoutPanel + ' + Me.TableLayoutPanel.ColumnCount = 2 + Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 33.0!)) + Me.TableLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 67.0!)) + Me.TableLayoutPanel.Controls.Add(Me.LogoPictureBox, 0, 0) + Me.TableLayoutPanel.Controls.Add(Me.LabelProductName, 1, 0) + Me.TableLayoutPanel.Controls.Add(Me.LabelVersion, 1, 1) + Me.TableLayoutPanel.Controls.Add(Me.LabelCopyright, 1, 2) + Me.TableLayoutPanel.Controls.Add(Me.LabelCompanyName, 1, 3) + Me.TableLayoutPanel.Controls.Add(Me.TextBoxDescription, 1, 4) + Me.TableLayoutPanel.Controls.Add(Me.OKButton, 1, 5) + Me.TableLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill + Me.TableLayoutPanel.Location = New System.Drawing.Point(9, 8) + Me.TableLayoutPanel.Name = "TableLayoutPanel" + Me.TableLayoutPanel.RowCount = 6 + Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!)) + Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!)) + Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!)) + Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!)) + Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 10.0!)) + Me.TableLayoutPanel.Size = New System.Drawing.Size(396, 239) + Me.TableLayoutPanel.TabIndex = 0 + ' + 'LogoPictureBox + ' + Me.LogoPictureBox.Dock = System.Windows.Forms.DockStyle.Fill + Me.LogoPictureBox.Image = CType(resources.GetObject("LogoPictureBox.Image"), System.Drawing.Image) + Me.LogoPictureBox.Location = New System.Drawing.Point(3, 3) + Me.LogoPictureBox.Name = "LogoPictureBox" + Me.TableLayoutPanel.SetRowSpan(Me.LogoPictureBox, 6) + Me.LogoPictureBox.Size = New System.Drawing.Size(124, 233) + Me.LogoPictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage + Me.LogoPictureBox.TabIndex = 0 + Me.LogoPictureBox.TabStop = False + ' + 'LabelProductName + ' + Me.LabelProductName.Dock = System.Windows.Forms.DockStyle.Fill + Me.LabelProductName.Location = New System.Drawing.Point(136, 0) + Me.LabelProductName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0) + Me.LabelProductName.MaximumSize = New System.Drawing.Size(0, 16) + Me.LabelProductName.Name = "LabelProductName" + Me.LabelProductName.Size = New System.Drawing.Size(257, 16) + Me.LabelProductName.TabIndex = 0 + Me.LabelProductName.Text = "产品名称" + Me.LabelProductName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'LabelVersion + ' + Me.LabelVersion.Dock = System.Windows.Forms.DockStyle.Fill + Me.LabelVersion.Location = New System.Drawing.Point(136, 23) + Me.LabelVersion.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0) + Me.LabelVersion.MaximumSize = New System.Drawing.Size(0, 16) + Me.LabelVersion.Name = "LabelVersion" + Me.LabelVersion.Size = New System.Drawing.Size(257, 16) + Me.LabelVersion.TabIndex = 0 + Me.LabelVersion.Text = "版本" + Me.LabelVersion.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'LabelCopyright + ' + Me.LabelCopyright.Dock = System.Windows.Forms.DockStyle.Fill + Me.LabelCopyright.Location = New System.Drawing.Point(136, 46) + Me.LabelCopyright.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0) + Me.LabelCopyright.MaximumSize = New System.Drawing.Size(0, 16) + Me.LabelCopyright.Name = "LabelCopyright" + Me.LabelCopyright.Size = New System.Drawing.Size(257, 16) + Me.LabelCopyright.TabIndex = 0 + Me.LabelCopyright.Text = "版权" + Me.LabelCopyright.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'LabelCompanyName + ' + Me.LabelCompanyName.Dock = System.Windows.Forms.DockStyle.Fill + Me.LabelCompanyName.Location = New System.Drawing.Point(136, 69) + Me.LabelCompanyName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0) + Me.LabelCompanyName.MaximumSize = New System.Drawing.Size(0, 16) + Me.LabelCompanyName.Name = "LabelCompanyName" + Me.LabelCompanyName.Size = New System.Drawing.Size(257, 16) + Me.LabelCompanyName.TabIndex = 0 + Me.LabelCompanyName.Text = "公司名称" + Me.LabelCompanyName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'TextBoxDescription + ' + Me.TextBoxDescription.Dock = System.Windows.Forms.DockStyle.Fill + Me.TextBoxDescription.Location = New System.Drawing.Point(136, 95) + Me.TextBoxDescription.Margin = New System.Windows.Forms.Padding(6, 3, 3, 3) + Me.TextBoxDescription.Multiline = True + Me.TextBoxDescription.Name = "TextBoxDescription" + Me.TextBoxDescription.ReadOnly = True + Me.TextBoxDescription.ScrollBars = System.Windows.Forms.ScrollBars.Both + Me.TextBoxDescription.Size = New System.Drawing.Size(257, 113) + Me.TextBoxDescription.TabIndex = 0 + Me.TextBoxDescription.TabStop = False + Me.TextBoxDescription.Text = "说明 :" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "(在运行时，将用应用程序的程序集信息替换这些标签的文本。" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "在" + ' + 'OKButton + ' + Me.OKButton.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.OKButton.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.OKButton.Location = New System.Drawing.Point(318, 215) + Me.OKButton.Name = "OKButton" + Me.OKButton.Size = New System.Drawing.Size(75, 21) + Me.OKButton.TabIndex = 0 + Me.OKButton.Text = "确定(&O)" + ' + 'AboutBox1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.CancelButton = Me.OKButton + Me.ClientSize = New System.Drawing.Size(414, 255) + Me.Controls.Add(Me.TableLayoutPanel) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "AboutBox1" + Me.Padding = New System.Windows.Forms.Padding(9, 8, 9, 8) + Me.ShowInTaskbar = False + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent + Me.Text = "AboutBox1" + Me.TableLayoutPanel.ResumeLayout(False) + Me.TableLayoutPanel.PerformLayout() + CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + + End Sub + +End Class diff --git a/WT-DMS/AboutBox1.resx b/WT-DMS/AboutBox1.resx new file mode 100644 index 0000000..f007037 --- /dev/null +++ b/WT-DMS/AboutBox1.resx @@ -0,0 +1,604 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + iVBORw0KGgoAAAANSUhEUgAAAHgAAAEGCAIAAAAhWcaAAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAb5JJREFUeF7tvQdY + VHfa/s91/d/fu282sUUFpp2ZoUvvvYuCgl0UUbChqIiiiCiCSpUq0qU3aYqFpmJvYC8xGqOJJYkxpmd3 + s+u+u8m+//t7vjPHwwwYk01RN9/ruXCknvOZ+9zP/ZyZOaMhLBOKykWiCpG4SiyplTD1DNPISFuk8t1y + +T65TpeOTreO7hFd3eO6eif19E6xhRvH9PSO6Ol26+ru19Vt19Xdp6uzW0dnp45Os45Oo45OvY5OnY4s + Q8bMYUSWopSUlMuXL3/77bd/+9vf/v73v//v//7vP/7xj3/+85/ffffd999//y92/d+rvljQZSJxuVhS + IZFUSpgqRlojldZKZTtk8ia5vEUub5Xr7NXR7dTVPaALsuBLKKOOsqwPsZ/HV9vUWNfo6FTryNJlzGxG + ZCFKT0+/efPmX/7yl7/+9a9Pnjz5T8OtAcpQNAXNVDIEdJVUVi2T1crkdXJ5vVyngQXXoqPTqgPlEv12 + 6eoe1CWIuVKy1t2jq7OrD2t5lVxeKZemSiUzJUJjYWFh4YcffvgfiJuAfkq5Ukm5WiavkZOqlcMECLId + OoR4k5L4XpY44MI6AB0F1rgDqI20qrGukMvL5dKNUslkiVBH2NDQ8Kc//ek/CrcGKIsrFKBBWVpNQD+l + XKvztDjiIAiOKsRBGYUbnGXjG1RYl8nlpXJmNSP2EUdERBw5coTD/cp7t4a4TCwplzAVrJwrWTnXKED3 + ocwVcKsQhy/vZl0F1gHKtLj2iIMA38mxLpXLt8vlhXJmESOyF23ZsuXOnTt83GCtgluxpS/50hAXi8Wl + hDWhXCVDyavlpAYCzZWKpYD4Lh14tII4Cjdg2bQ9qrAukcuL5bJkmWS6RKgvbGpq+vrrr4GbSyavnrQ1 + xDliyTYJU8QwJYy0TCqrkMkqCWtw6VMqlLnqV+CwFEocxsK1R9wftTzWxXJ5ESvtKEbsKV6/fv2VK1eA + +89//vNAxq3Y5JdzaYjTxeIMsSRDwuQw0jyprEgmK5ERMy0naQH57LmIq+OGQYMvLAWg4SFcFKnry7pQ + Li+QI3FLZpFMUl9f/+WXX37zzTcUN9+4X3Zpa4hTxZI0CbOFYTIYaZYUJdsqk29jEcBMQRxQgKbq+TSu + glspcFJgzbXHap0+rPPlsjwZs4oRe4k3bNhw48aNr776inOSV0PaGuJksSRFwqQxYC1Nl0ozpLJMmSyb + LRDPYw9wHvHn0jgfN7Vv4KZFdY2vwrL5rPPksm0yaZpUEigRGgj37NnzxRdf9OskL6m0NSSJEiaZYVIY + zBTYT9kWGWY5wprDTYnns0TA5fkFro4biqasuSjCYw1R4w/JcmTMMkbkJMrKyvr444/hJDSTvOzSZkEn + MdJkKakUqSxNRorizmBxZylx58jAQsVSfkDgKt5NcdPiWFcqWcOstylYSzdIxf5igVDQ29v7+eefq0v7 + pQskGqDMgZalyBSVysOtLvBcFjfQ/DTcKMoaNyhrHCIqrNk/xMxmhKOELS0tn3766csubQL6qZw50Hzc + AwkcflLwY/xEHTdETVnT2Ie7Db8NjRGscfRQ1rARR9G2bdseP37Ml7Z61lbs0Iu6NMSLxUw8Ya1KmV/P + xt3Xvn9Y3WDNx90v69ynrKXrpOIxJGjfunXrs88+4wLJy2UjGs7OzgIDgchNJJ4uZpYzqoj5xfeTgdT9 + PGbClzY9NYiP6qyVBkJYp0glUyQCieD06dOQNgIJsraKjbzgrDXq6ury8/NjYmKCgoIcHR1FViKJv4QJ + Y2Qb1UDTeoa6qXdjvAYstDh13BxrFdxc0XGmP9YoYtmGwvb29k8++eSlsxGNnTt3tra27mYX0mt2dvaS + JUvGjBkjMhdJxkmYRYwsUY01Sh03RwTJhEbv5zRuzklQuDGwrlFQgMhChAESyQ8dktoITSMvOGuNjo6O + zs7Orq6u/fv34wYWJNPW1gaZL1++nBC3FkkmS5hINVfhnITiBmsOd84PGbcKaw43rWezXk5O+xUXFz98 + +BA2QtNIv5at2MUXY2kcOXLk6NGjx9iFG4cPHz506NDBgwcpd0CHxhcsWCCUCcUeYiZUzVKeYdzUSSBt + 9rTJD0ubj5tmPsoaQ6OyMdLCsC5yEeXk5Hz44YfPtmzFXr4AS+Msu86dO4ePmA7OnDlz6tSpEydOgDvu + Aw46wuyGDRsmTpxIBD5dIl2jFro53P+mtClufHwma+laKe741NTUDz74gG/ZL2x71HjrrbeuX7+Oj9eu + Xbt69erly5cvXbp0/vx5cAd0dHlAh9JBvLu7G8Rzc3NDQ0OFJkLJBAkTpfSTZyduvrTVXZvPmo+bz7qI + HdD5rLNk0jip2FucmJj44MGDR48eIfmpt8cXh7XGnTt33lOud99995133rl58ybQg/uVK1cuXrwI6FA6 + iJ88eRIyh7eAeEVFBXomMgCJKCtZ3GD9PK4Nas9pI+qsMchwoFFgHS8V+4g3btx4//59rj2qR5EXgbXG + R8oFv8NhiC2+d+8eoN++fZuDDqVD5hcuXIDMOeLQOLp/ZGQkwR0gka6SPmU9kLRpIHkeG+Fw4wY3o6uw + xq/NlEkTyDiTkJCALaftkYsiLxRrDagABx08DjewlfA7SAPcKfS7d+9ySn/77bc54lTjcBX4+I4dOyIi + IoSmQslUiXS98rSUCmtO2pyN9Bv++KC5Yr+kOPdUyA6N6qx9xJs2bYJEsOVcFHmhWGvA19CysVn4iNvY + REAHeg46lA4TpDKnxDmNo4X29PSgeULgVVVVYWFhIlsRM4d1Ej5rFRuhYyTmmuexbFr4fDWPNRf4WNCE + NTzEW5ycnAxl8Fkj9r0grDVwt3MLCQkGpwKdKp3KnE8croIWCh/nBH78+PGCgoIZM2aIvcTMUuZZrJ9t + 2SqUaVHWOA5wNPTLGr3RQ5yRkQHWXOx7cVhr0I3AQirCbcR+JCRAx/Zx0OF62Ggqc0qcugoaKd9SIHDq + J0lJScS4J0ukG9hHEjjWfS2bPHzznO2RgqZmDdY4GjDIcCGEYx0jFTmL8vLy3n///ReNtQb+MF3YCKx+ + oUPpfOKcxqmPQ+C3bt26ceMGggrFjVyIsX7p0qUiJxE5bTIwazS3Pu2RDxr1DNY0XNNfgmJBo5A4RXai + 8vLyZ7D+TWYZDXr30oUtwOoXujpxuAp2AwGWChw7xvkJhxuhW6grlEySwEN/BtbKTxLW8PdiXghRipqw + XsqIzEXNzc0qrLH9vyFrDcW/ykWJY1HiFLoKcc5V4ONU4GibiFZwcPiJCu6uri5EQLEL69o/F2uYNVjT + cM2FEI51hoxZwAgNhAcOHOBYq+eQX5m1Kmj+4ohT6HzicBW+wLEb1MFVcFMzQfrOzs4WjhIyQYwCtDpr + xL7nYa38DAGtHkIoaMo6iBFIBLinXxDWzwLNrX6Jqwic7yd83PButEpMmC0tLZjdxePEJGtzoH8sa95n + CGt8J0JIgbIx8kSNPyGZKImKikK7xpbQzIctpHMjNh67gH351Vg/F2huccT7FTj1E+wMp27q3WiVSCaX + L19GCoyNjUUwYCJYaauz5jxEJYdwiu6XNUII1xg51ukyaaJUPFqckpKizhr6+JVZ/zjQdHG4sYCbEzgf + NzUTeDdtlTQIUuPOyckRmguZuQwBPRBr+C9A82f0/kArzFqlMdJfyIpaukYqsichBHc2JgDc9+go9NwT + ZY2NB2u6R4rd+2XWTwHNLQ4330843NS7sWNIJgiC2E/qJJhx6urqSBoJlDwFzWedJ1Pk6+cQtYI136x5 + okYx4YzQSNjR0YG/jrscqRQKAGs0GGwqthlbjl14oUHTxaqhj59Q3NS7aTLBMYs9hHEjdFNpd3Z2zps3 + TzJBggP8KWsKmptl2BldAZQPui9rArpfs2ZFTVijMQoE8C7KGnc8egl0gC381Vj/DKDpUsfNtUrOuOEk + CACQ9u3btyFtBO0VK1aIx4rJAElBc6KmMzrMl2uMKqBR6qz5Zk1/IQsasRJNOD4+Hq0CJob7G1uiEq5/ + abP+2UDTRVljUdYUN99JVKSN/Ld+/Xqxl1gaq8Z6q/I8H/fsYRXQKI61erLuK2r8fpGDqKysDHcw/jSs + DFvCBb5foTH+zKDpUpE25yTYKzgJDltO2jiWobLExESxq5iJZhSsKWiONfx3IFGjlKwJaC5ZUwOhv00p + amYxI9QXHjp0CAGfC9f8EIKtxTa/TKCxsLkquKmToAVB2tS1af7DsYw9T09PJ7FvNcuaEzUKIYRv1tyj + AWqgFaypgeTzDISKmj3fIpkmwZiKXI+DiR9CfoXG+EuBpovDrS5t6to0kFAbwfRITkKBNUCrmDVYV7AG + ArI/yJqmPb6BKEUt3SwVu4uRL9GNuRDCNcZf1Kx/WdB0UdZ8aVPX5tsIBgpEXcIauoaH8EWtYiAUtApu + jjXMWt1AeKJmlpG019bWdv36dfRklcbImfVLCRqLCLuvtKmNYPdoh6RzDVSWmZkpdhNL10mfgkbxpxhg + fSZrhYGgi/ITiFLUsjTyUrAlS5ZgdKKNsV+z/tlF/SuBpouy5qQNG4GIqI3AK3EUgzVUlpqaSnJIPI81 + DIQmaxgIaIIvfe5Hf6AVrGEgSCB0hAFoypoVtXSTFL1369atGJ1gWTiYYNa/9BTzq4LGUmHNtxHsKk1+ + aI8bN24U+4rJk4k51lzaowbCPaepX9acgWCEoT9ODYQFDVGTcVFPePDgQeRL/hTzyxnIrw0aC1tPcfNt + hLNsrj1GR0dLJkqegobhKg2EdEUq6oFZKwyEOwfCdUUWNDGQCZLVq1dfvHiRTjFcsv6FDOQ3AE0XZQ3V + cKxp8qPtEbsNrYWHh0tm8lhD1MpxkdAEYvoEVL6HKEErWMPWVbqiUtRkhLEWVVZWYjSnyRp94pdLe78Z + aCyONfYHrLnkR1M2WJ8+fVqoK2QWMArQVNQwENoVAZd7sm9/rBWihtvQWK0mamY2M3v27HPnziFZI/Nw + ae+XMJDfEjQWnzX2Sp01cpjQQkiedUZZU1FzXRGU6asFnmEgKl2Ripo+FSJZhliNWQkGgrT3ixrIbwwa + 6wdZV1RUiFxFihDCiZrGavClL85QYa0E/bQr8mdFTtSp7FwuI3M50p6Kgfy8I8xvDxoL+4DFscbuqbBO + Tk4W+4sVoNVFzb3iqD/WCgNBV+xX1KkyxJv169fzDQQNmT/CYKv+fQN5IUBjUdYQTr+ssfNLly6FpRJS + 4MU9WZKKmoKmrAcyEDor9ivqSPLSmNbWVpUEQkeYn6srviigsZ7BGjnk5MmTQmMhs4IhoKl7cPEDiJvY + go08W9T0BEhf0LIUmSRAsnLlyp6eHiQQer6JOwcCUXMG8oqAxlJhzfk1zde1tbVkOscUk8u6BzeUQ8j0 + xc/PNhAa9fiipu6RIpOukgpNyJWezp8/T8830XMgXFf890X9YoHG6pc1zddQWUJCgmSahIDGRE4HxUo2 + 5wEx/2XPaqBJV4SoS5Tzi7qoJ0mWLVt25syZZ3fFVwc0FmXN9UawxgRBZ/QbN26QZB3BKECzp6oJR5gG + KLcoWf+gqGmm5oGWRhNR19fXnz179hld8SeL+kUEjcVnjT3kZnRIrLm5GWkPaBSguZYIxDtZ1vS6CRxo + jjUnanWnZl+Jg4kfosaURLsid2KPzor/pqhfUNBY2B/IR4U1kgD2PD4+npnBENCwabgH1xL5117pz0BU + Rc3lPBY0cWojYWNjY29vLz2xpz4r/mRRv7igsTjWkBJ2EruKHUaDQjYAERzsBDSyB9yjmiULxLuUrPtN + IFTU/ExNWyLrHkTU/uRZZKdOnbpw4QJ/VqSiplHvp4n6hQaNxWeNg5eyhsQwLorHiImoAZo79UFBt7Ks + VQxERdT09ClA9xU1s5wR6gj37t2rHvX+TVG/6KCxKGvsnkpjDA8PZ8IZAho2jewBmtQ9drOsuQtl/aCo + eaBR4tHiuLg4xHYa9X4uUb8EoLH4rDmz7uzsFDmJQIqApjYNu2BBP73Y3kCixo/Qsx9cS1S6BxPGjBs3 + 7ujRo4h6P6OoXw7QWNgrrjFSA0HwgvSYEIZYAUDDpmn2oNfvpBeRfIaoi9jz1GotEYX7LzMz8+cV9csE + mm/WdIpB5hVZijArEnCcTdPLL9OLoz5D1Nv7Di880EwQM2vWrJ9X1C8NaCzKWsWsU1NTJTMlT0GzNk1A + sxdHfSpqClrJmoAuV+Y8NfeQriPDS1VVFRW1evz4CZn6ZQKNxbGGpmDW0BcObaGxUJokJaDBkYKmF1tG + wUAGEnUlO7wM0BIl40nOg6gRP7hMzQ2K/LMfii37ofWSgcYCaxUDgZ9KZkgUoNlZHHwJ5Y4fEjXMnd8S + +e4RTp7p293dTTM1Nyjyz378KPd4KUHzDQQJBIc2jnRgIhDp2IJ+CNBdLOuBRM21RIBGS+zrHiiRA7ma + 5LFjx+igSM9+qJzSe373ePlAY/ENhCYQODUzmyEoOdDwaHqR9jalqDnQStZE1GiJ3KmPvqAl0yRz5849 + dOgQPftx48YNekoPEZ6ep/5RLfGlBI2FfeMbyKVLlxA/5FvZt34AaAQPCpq+ywMVdb85Dy2RmxJV3COK + PJzY2tp6/PhxxBv6VJsHDx6gJfIffHlOUb/EoDkDoSMMydSLGKJcChrBA6Dpuzy0s6LGfaAuarRETImc + e/BAo8Qu5IoJhw8fhqjpeeqBcp5iswZeLytoLBVRHzlyROQsIi2RD7qbffcS3IComwZoiaW8QN3XPZgZ + THBw8MGDB0+cOKE+vPyolvhyg+ZETbtiWFgYE8Oogj7M6hpO3TJwS+QCdd+QR06cyoQ7d+5Uz3k/tiW+ + xKCxONa0KzY0NEgCJMQlKGi48yHyVkiEdRf77jADtUTqHmo2jcI4DvdAS0TO41oiffbpj3KPlxs0FvaQ + GghEjf0X6grhtorTHRT0UfKGU0TayNS0JaqDhnvQyYWe9+CBRvYIDQ09cOAAvyVS90BLfP4p8aUHrSJq + qI8JY8jAQq0DoI/p6Z1g39ark22JfPegrKl7cJOLik0vJ5NLR0cHWiJ96LbfKfHVB42FPeREDd2JXcW6 + Ley5Dg70KcKaODVaYr/ugexBJ5d+3cNKlJubiynx5MmT3JTYb6BWbFB/6xUBzRf1rFmzZMmyp6CP6+md + ZguiRs4byD0wudCzpmqgJeMky5cv379/P50Sr169yg/UnHtgG54h6lcBNBZf1Pn5+UwIQ4bv/QrQ+qf1 + DU8bElHvV7oHB5qyhnuUsReL7M+mmblMQEBAZ2cnF6i5E6fP7x7kUj+Kmy/z4osaR7fIQUSCB0YVgD6h + Z3DawPiMMXDjvwO6h0rI49m0NFYqlJNHx/8d93hFQGNhR7CrUBb0hSkDhz8x5cMENORs1mMG1lD3s9yD + C3l9QaNwz6WlpVH3oM+w+bHuofGMO+HlWlTU2FvsM3oXs4Ahcj5COiEQW/ZaWvRYEFFT9+CDZlkrQt5A + Nh0gCQ8Pp+6hnj2eZ3IhoF8ZUWNfqHvAScVuYvLGrQjRLGirXivbs7YmZ0wU7tHveY9ynk33Bc3MJ4/Y + trW18d2j38llQNA/GABfooUd4Vri+PHjESRo5IBvgLLjOUfgJi0R4/hAIY9v0zzQ0hipgBG0tLTQyeXc + uXNvvfXW7du3+ec9nm3TGs+28JdrATQn6ri4ONChndC8x9zhnIPreVewhl+TcVzFplnWqjbNA41Cms7O + zoZ7HDlyBO6h/lAA7t1n2LTGsy38pVucqKE+TM/wDZCFQTudd/K86OlxwQPQ4R7kWR9qoEnIQ5oeoB+K + R4tXrVrV3t5OHwpQP2v6bJsmoF8x94BusFM4rkWWIr0DxKCte60h59GXRvtc8oG0SfbYy9q0CmiIGml6 + a//9kAlkgoKCYNPcWdPr16/3G/L6B805yyvDmnOPqVOn6pfow6DtztpBy+MujQu4HIAbJHsg5A2UpulL + 9dVBhzOenp579+7lQt61a9dUbJo7Pa3YFN7SoM7ySrbE+Ph4vXV61Dcg54lXJk69OtX3ki/Qk5AHm+aD + ZlkTm6b9UC14SNeTftjU1MSFPPrcmue0aXL96Ge3y5duYSexL9hhQJEHyZE34BvgC8oz35o5+cpkuAex + 6YHS9DP6oTl5e7SfZtMaz3lO5OVa2BdIB8GAcWKAFXYx/vL4wGuBIddDwBr/hU2TJ4z9YD/sCxrZHGGG + b9P8WfzZaVqDux/6/fJLurAjkBUOZIFI4LDHwfuiN3xj9vXZC28snPv2XJg1Mh95HED97BLth5gP+wON + +TAsLGzfvn2cTT9/mtZAu+R/+dVgTUFDPaGhoXaFdiA7/dr0+TfmL3tn2ZJ3lky7Oo2EvE62H/JBs6zR + D0nwAGj0w74Jj5nNTJkyZc+ePTRN00cR1U969A+a7+KvUkuk7rF582brOGvIOfh6cPg74avfXY0KfTuU + 2PSBAfoh5kMED5rwVEAvYdzd3Xfv3t3R0cHZtMrDtQP1Qw31E32vjKixO3V1deZzzSHneW/PW3Frxfo7 + 6+Pei4OovS566R3RI4+LPyN4qCU86VqpmZnZrl27YNPcw7Xoh3fv3v3BfqhBNf/qiRp7gX0BC6OxRpDz + opuLYm7HJL6fmHw3OfrdaARqTOdkPuwXNH1YSy3hyZJlQl1hZWXlQGML1w/7Af3w4cN/5/nVL+zCLmBH + 0Kbk5vK51+Yuf2c5tJx+Lz37fnbCewlIIOiH/QcPsKYJTx00m/BycnJU+uGdO3f4TzSlGFVB9/tkMmyi + 4usv88JeYIcdHR1DDodAxdDytgfbij4oSr+fvuDGAjK2IHiogGZZP0146qCdRBs3bkQ/7Orqos+qoQ8C + cMFjoH6owV2M7JUUNfZl8uTJIS0h8e/FQ8tlH5VVfVxV+EFh5DuRmMvJIK6S8Cjo0oGjtLc4KioK/ZA/ + H3Kn8aheublEsR3s0uDSCb9pvhqssf04OpcsWTKreFbavbTiD4t3PNqx8/HO6o+r4+7EYWwhg3i/CQ9R + egDQNEq3trby50OVR1u44KHYDnZp0KZJRU0zNb1DXoGuSEHjSA9MDcx9kAu+ux/v7vysc9fjXeCOoVy3 + e+AoPdDMEiiZOXMmDR700ZbnDB4a3BX2ft7LU7wgC7tQWFg4ac2k0o9Kmz9pPvD5gaNfHu36rCvvQd6U + q1NIwkOU7hc0nVnUQDMh5KkHO3fu5IIH/2EtLlb0AxrK557L/jNenuIFWQDd1NQ0Pmx87ce17Z+1H//q + +NlvzuJj5cNKTOTkjEe/oKvYJ/L2CzqMGT16NEAjeHAPaz3PiWnynrO/xOUpXpCFjYfuvGd4wy4Of3EY + lGlB3WE3wvROsTOLCmj2PZzJo7T9go5gnJ2dW1pa+CemnyfhaWRnZ9PLU3BPseZHvZedNbYcinMZ5wK7 + 6Pm6hwMNdSN4GJ42JCdL+wNNnvOIKVwNtDRKam1t3dzczCU8+iSxfk8t9QHNMOa4f/ivD32VuiK2HPtl + 62pLTYMrOHXs7ViTMyZkOFQDTU6WDgR6rdTU1JSC5j9Q+4OnljTMzJaEhobiboH+6XfTrki754tmINiM + H1yKb2UX/guhmVmb8SmjoO7N72+26LEgz05XoYwC6ELleSUV0HFSAwMDgO43Sj8LtKtrvZFRYGxsLO2K + MHX+9W1+UQPBoYM2gm1tbGzMz8/ftGnTihUrcK9jxEDDcXJysrCwMDQ0lMlkEolEyC7cwH/xSXwJ3+Dt + 7T1p0iT8SGRkJGLctm3bduzYgXiLKIVdwDZj4a8YjDLo/bqXX2CNcdyq14pM4SqUUeiHA4CWbZTJ5XI0 + 2H7P4ak/pqXYVRb0DkfHPD290RjhcQhwBoKkomIg+LGfzBq/B20AkSgvL2/16tWBgYHAZG48aqyHa8jU + iavD5qatWbk9ZWNLfnZ3dcnZXfU39u++f7zr8dmjf7p8+snb5//xzqXv372Mwg38F5/El/ANN9qaztaV + dBektySv2x69JDUseFVgwBwft7G2luYGuhi+8YeWL1/+5vA3M3Zk1J2pO/LhkZ4ve0h91ZNzL8eux44o + mj2/Qep5QCfKGIYB6IFmlmeBRtnYbJZKrevq6uhDBtRAVBLIjzJr/BT+PPSVkJCAhK+nIx/j7hoePGNL + TFTD1vRTTVXA9I93Lv7r9pV/t270/uvyse97u74/3vr9oYbvOyq/by38viHr7xWb76avOBkTWj9/YpSz + 8Tw3cw9TOSPW8p7sPXfN3I3bN8a0xdgds5PvZK8/geJwo2AdBQOATpaJRCKAVj9ZCoE+YzgE6Aa2dlha + rhKL9eE7fAOhCeQ5RxjcmciV0OyiRYt05fIAH+81i+aXpW4+0VD18ZlDqoB+xrp18V/XTv3rwqHvT7d9 + f7j5+66q73cT1t9VJX1XGvddQfSjdTOebJn3JHn2vTUTu+d7FU6yi3Qb5W0iGqr1h0E+g4YHDxesFTAF + DAkbbOlUsaBpvEtmi8caDgavUx8O+32UVoGGBd3k6tpIcZuahs2bNw/uTg2EzuXPNmvcxp/Zvn17eHi4 + iZHhrIkB0Gx7WcG9Y12qOH7RevfSv673/OvSke97Oom0D9R+v7fk++at39WmfVe+8dGmuU9ywlnWwU82 + Tv/bhkl/i/X/82rv83PNyv1lUY5a3oaDR2r+9yDPQSNCRwgThPTZjtIMqTRVKktSslYWBU2HQ+45j1Bn + v1O4AhNAu7k181mPGhWMjsTN5TgWuLGSb9agj7+RnJyMvzrBx3vzymX7SrY9OHFAdf9/zXrnwr/eOq1k + vYuwbiv9flf+9zsyH6VHPCle/SR32ZOMhU9S5zzZNONv8VP+HDP28UqHR0utHi0ye7TQ+OwM/aIx4sU2 + I+x0Xv+vof/fsPHDtBZoSTaQ90wjlUSKQE8i1gFLRCamU/izQXOiJKB5rBudnMoNDaesX7+eG2G4tAfW + EDh+e1xcnJGB/tzpk4sSN1zY06C6w79+ATHkfPUkKP/r3MHvz3Qo/Lqz6vu27d/tzPskN+ZJZfyT7TFP + 8lY8yV5MpJ0069v4SY+j3R9F2j9awrJeMOrD+Ub35xm9H2rY5C9d66jpoz942PD/HuI+RHO2pmSdRIou + BuIbpWiG9fX1AM1N4fR5B/zTHf2CbuGxJrgdHQsNDPwTExPhO9SswRpRBm3NQF9v3vSpZamb3u7a/d0t + kgRU9/lnLzRMotOjCoIn9xK1Hmn+/lAjqe4d33fXf3+wjugXtb/m+65qlm/59/u2f7+76PtdBf9synm8 + LeZJzeYn5euflEQ/yV9BbCR9/rdJQZ/GjXkE1iucHi21ebTIHLomrOca3QkxfHeO4TvBBnv8Zesdtcbo + DR427L+Heg3VmqeFHI18WVtbi36ImYWbwunpjmecV9Jwd9+txrrJ3n6rnt6Y9PR0TJlJSUlaWlpTfMdk + rY9G8PrrW2f/fgN56+I/lZFLFc1PqKsnSR8DNdBpyv6uOpk0scLo77ZGfpe15Lv0sO9S53+XHPpdUsh3 + ibNJbQ5mb8z5Ljnku5S536XNJ9+Tsfi77GXkR7at/C5/FfnxorXflaz7R1Hs45RFBHHR6icFUU/yIp/k + Ln2StejbtJBPNwV8sh6sPQnrCLtH4ZaPFpo8nD8Kun4vxPBWsMGNWQbXg/SvztRv8GNW2o50kr/xX2/8 + f5qamlu2bGloaEDCo8MhHfe40x30vJIqaE/Pjn5Zm5unaGra6UqlkXNnN2/LfHiq+9OzR7+6eOLPV8/8 + 7fq5//03WJMoBtHVp39XFPNd+qLvNgX9c92kf0aN/Wek9/8u8/h2ifufwt2+XOz6+WLXx4tcH4e5PFro + 8vFCl4cLXT5aQAo38F/UJ2Eu+Opni1y/WOz6dbgbfuqvS93/vsz9nxEe/1zhTX7hGn/85idrJ38a4fNk + U+CTxKAnKXOepIU8SQtFfZsy6/Em/0/ifD+J9XkU7fFopfOj5faE9SLTjxeMehBqdHeOgvVbQfpXZupf + nKF/IVA/31M4R2+4lVgzICAAhzgXpbkpHEc/d7qjD2hv70Ms6z2UtYtLo61ttalpialJkalxgkzikhW7 + 6tbBPUgRYP3ZuWNfXzr5l2s9HGtqIM9mTdS6M4/oK2Uuy9QHOMAFjMDrgwXO9+c5vz/X6U6o07uhTu+E + Ot0McboR4vR2iOP1OY5vzXG81l/h8/gqvgeFb8ZPofDj7811ujvP6f58Z/xa/HLcE5/Mc7gbaPzNEse/ + LnP6W4Tr31Z6/S16zN/Wjv9z7LhP1no8WuNJFL3a/VGUK9E1WBPLNn803/jDuYT1ndmGVNdgDdDnpuqd + 89c/NNEsyVlvvIHQy8srJiYGfYuf8OjMQrMDF9IA+ijLutPFZZeNTbWRUYGFeam9baWrYx3KzipFV+qe + GRP1bvfe+8f3f3yasP7m0qkfYI3PHGr4rnLTd2kLCNnlXn9Z4k6xAgGYUqAAxEd5dfbPUNw9Qe8G3GfX + Zlqfm2j0TqjtnXl2d+fbfbDA/lGYw2eLHL8It3u0yBj6JSqGR8M6aOE20TVh/VHoqPshRmANv1awnqZ3 + YYLB9ZlW12ZYXplhVeRlFGLO6Ak016xZg8YI9/joo49g03AP9EPujAdYA/RxD49ue/s9pqY1NlY1jna1 + bk47lFWPsrNK05d7pa5afrt734MT+x+dOfT5+eOUNaZhPuvvTuwh9po6H8fsP5Z54HDGUc8niz3/ebE+ + T52bZnFiguGlYGvUldk21+bYvB1iczPU9mao5eU5+tfnGLwzx/C9UEP4MhwD/fBRmCmhHGb+aIHpo3nG + H88lrN+fTWzk7VkGV6frX51sdHOm1duEtdXVmdaXZ1jV+ZostdG1lApjY2OPHj2KQQ/zIR0+uKFaw9Fx + v5Vlq4PdXneXDk/XfR4uu9ycGlRYO9hkGuj4JkQsunOoDaw/6TnMZ/33vaV/z13xv+un/GO5J+DCOgEX + h/At1gQ4uCr7/6tVz2SzExNHXZhlTetiMClAPxdsdnym7qlA3Z4Zeudm6l2apX8t2OAmvCLE8N5cI/jG + w7mjQBlFdX13tuG7sJFAgxtTjG/Psn4nyPrtIGscLldmgLX1pZk2O/3Noxz07XTE8G60R27QA2t4iIaj + faen26HRnoe9Pbq93Pd7ubV5uLS6Ozf2xb3D0S7PUG9i9IKQq23NlPVn9dlfpYR9s2rcn8JdCdx5gOtI + 4PKUq7LPv0mdnmhyarIJB5qrM0Gmh2foHJqmc2SaztFpOiem655moV8I0r8UpH99lv7NYAOYBviCMure + HML69gzDO4Gm92dbvxds826wzY0gm+tB1ldn2lyeaXNxpu2FmbatEyyjHA3tdSWpqanIfDBrJBDg1hjt + eYyto6M9j3h7HPJyP+Dl1u7pusfduUmFtbNDmbHBzEXjvU+sCLy3dMwH85zuzHW4GWL/9mz7a7MdrpG9 + crhCyhGlsre/YZ0MGHVmqqkKZdSpmSaHpuscmqqsaTqHWeLHp+menK57ZpreuUA9JA1kOzgGfAPQSQUa + 3p9p9mGIzf05Nu/PtgXrW8E2b8+yuRZkeyXIlrAOsjsXZNcSYLncwcBCLi4oKEDmg7Q50JT1UbD29jjo + 5QYbAesWljWL27HOzabCzXK7KTNdOGh45ehRpwNtzgTa9syw7Z1pezbI7sIs+wuzHC4FO1wm9QKxPjbe + sGe6uQpl1MmZxn1A8+rwVJ2jU3SOTdE9OUX3DGLGdD3kDRBHP7wx1eD+TPOHITYfhdh+EGJ3b47te3Ns + 351tezPY7nqw3ZVZdheD7M4H2Z2dadcbZFczzmKBjYE+I0Lo5oPmcMNGDnq5d7GW3eruUOdmXe5mUexq + XuRiXuRsVmQqmy8aKkt00jk4xfrodJsTgTanCW78AbC2V2dNNc4V+1VS+M6Ls0idn+VwLsj+bJB9z0xS + p1Ez7FCnZtidDLQ7wSv8F4XP02/Ad+L7e9mfxW/APY3fhl+r3AZyeB321Ts7w/L8LGsUH/SJmUb9g56i + 0z2Z1KHJOocnE+LH+cQn6r07w/z+bJsHc2w/DLH7IMT2fojd3RC7O3Psb81mD+5g+0uz7C6QTbKj+5Ln + YzbNXBegj7N86UeONWyk28tpn6dto4dVjatFubN5ibNZsZNZES0LvSjpCKsIC0nnJKvDU22OT7c5NQPq + tjs3k7Cm0r4U7HhZiZUyxeeBg/55wDoeaHck0PbQdNsD02w6p9h0sNU+xZpfbZNVS+Ub6E/hx/dPteme + Rn7b0UBb3CW4G8jdNsOmc4xOz0yr3iCrs0FW59ii0I/OMOyepkZ5qk43BT1JUcDNET8xRffUeJ2r08zR + CW8HW8M67s+xfRBi9yDU/l6o/fuhDu+GONyY4/DWbHvsMjjg7j/Diga7SUH3LY9jo533j7Zv87Zt9bTZ + 6W7V4GpZ42JR4Wy+3dGsxNGsmK0iW6NEPe3RMwy0K3yMu6faHIO0Z9iemWHXC9zEp4jEzgY5QG4U67FA + Oz5TMKLg9ilr7yTrPWztfo6i34kfQXG/gX9PUPr7AsybvHUOTrM4NN3iaKDFiRmWp2Za9gQR7ocD9Q5O + lR+cIu8GXLb6Bc0VxX3EV35+qvmVQMu3ZljdnAXctu/Psb0XYn8/1OH+XIe7cx3vhDjeCnG4PsfhCmHt + QFlj9/uCBmKnA6Pt273t2rxsIee9nra73W12uVk3uVrVuVhWO5mXOfXFPYoJEg4WJTrpwkaOTLMG7mPT + ULb4eHgawdo11bp9sk0bu/MUKwVKebVOtNo10Wonr1omKKpZrbgvofg/gt+Awq/i7gOOfrOvcZ23zu5J + Zqi9k8zbpph3TbXonmZxJNCibapO+2RZ52T5/inyA1N4xKfoHOwPNKkJOod9dc9Oszg/zeJiIBlY3gqy + vjnL9vZs2/dC7O/Ndbg31/HeXEynSF+Ob5PQRY5jsIbUlB6tiphWm4fNPg+bPe7Wu9ytd7pa7XCxrHW2 + qOThJsTNdVdKR9gsMBHV+Zntm2i5e5IlIg7ZbdwmO48bKOtWFitFo+AY8LNW3zuAoq8dbVDjo98y0Wzn + JFK7WOKoXZNM6iYwjf7MzgDp7gnStkmy9kmyrsks8cnyg5NQOrT6gA7QOeKn3zvVAqzPTbe8MN3y0gyr + a0h4s2zfCba7EwL3IKDvzXPCjHabjBEk48I2wZoFTY3Cbh+H2ANlQ0DT4nCz0q6HtJ/iNie4bY3T9YQT + Rr7x5lo7ed04s3p/84bxFg3+Fo3+Fg0Blk0BluSjv1VTAClVQL9QsfdlmbtO9VjDhgmmTaiJZqhmFvqO + CYYV4yWVfpIqP0n1OMmO8UyzPyG+b6KsfaKsa6J8/0T5QVp84v46x8YZENCEteW5aZbnA60uzrC+EmTz + 1iy7G8F2t+Y43Al1fH+u412wRvxl52GMFGCtMdqhbTRBDJcgRRFzRSgry91mr7vNbjci7SYXyzpni2pH + 80pH83IHszJ7s1KUiTxCPNwy0ECQ6WFU7mtW6Wde42deN86ifrzFjvGWDf6Wjf4K3KpQfpnCH8qzF1X7 + jarzN60PMN0RYArijSz0an+97X6S0rGSMl9JuW9f4uOlu/2lewNk7QGyrgnyA3zc43SO+xv1AT3d6nyg + 9UUMLEG210jCs785By3R8Q4xEIWuwfr6HEcNL9vdnrZ7UB6gbEOrD2sl6Ha2CG43m1ZX6xZnq0YnyzpH + 4LaocjCvcABx83Ib42xd4ZSRb2iHmzNlY80qfM2q/cxr/SzqCW7CGvWrSbvez6zQmQFlflHiZePlRb7i + 4jHikrGS7WMVxCtA3FdcOVZS4ytp8GN2jpPu8Ze1Bcg6JygEfsBXfmKCcc9UC9Y9LOEeAH0h0PrCDDIW + Xp5ld3WWHSIHgsc7IY7vhjpC0cBNWWt42Oz0sG2FM7DVh7U7W0rQbe6k2t1sUPtcrfe4WO1ysWpxsmxw + tKh3MK9xMAduRZnprZVquvpIR8Ta60LaVb6QtkW/0v5FcVf7jCpxl6uAplXkKy0YKy70EReNIcURLxsr + Lh8jrmCraoyk3pdp8mN2j5fu9ScC7xwjOznR5MwUc4DunWZ5drrVORb0xRk2l2baXgqyuxJsfzWYzMlI + HTfmOLK4yQk1lIabdaM7MpzNLg+b3Rxr1iUUoEnZtgGumw0+gnKHq6LaXKz3OFvtcia4Gx0tdjha1DmY + 17LQa+zNKo2ki4TDTKfoaSe7GFT6mqtLG7gb/K0KxpineJrEOBuF2xkGW+pNNNUZbSRz0mesdBhjqVhP + IpKKhGKhUCgQoHAD/8Un8SV8A74N34wfwQ/ix/FL8KsKx5g3sqDLPfXLvPRUEKNq/U0KfCX5PuL80aQK + fJ4SL0H5iEt9xGU+4grUGHHlGEmtr6TRj9nlJ93rJT020fTUZPMzUxWszwUS64CiKejLs+yvzLJH2ADr + t2Y70PO0kPMtgEZnQ5xws25BrwNrdzQ9BWhSRLw2e12tSbG321xt2kHZzbYTxeF2sW5lcTexAgfxelq2 + Jvn64lnaQ+RBRsIMdyNIO8vTZK2T0UIbg4mmchd9xogRm5iYODk5+fn5BQYGLliwIDIyct26dUlJSVlZ + WXl5edu3b6+oqKiurq5jV21tbVVVVVlZWWFhYXZ2dkpKSlxcXFRU1KJFi2bOnDl+/HgXFxdTU9NRjNjV + QOohHjbHXLLWRT97tBEfdOV4w/yxYg40V8BNarSoeLSoZLR4+2iCu1yJu3q0pNlLfiDA9MhEsxOTzU9P + seihogZo9owSBxoJ+mowYY3IwZ0W10BycLaoQpZws2pGo3O3aWVZ73FT8N1DKbuw5UpYozjWXWxR4vtc + rHcrBQ7icPAGwt2y0dwogxFMHfRHgXj4UM2RI9zd3adOnbp48eL169fn5ORUVlaCXU1NDSAC5Q52NbCr + sbGxSbma+1st7FL8h7dKSkqio6NHao/0nuxt72U/UnuEhVzbz1iywEae4GawbYxOv6BJeYsLvEVgXegt + Kvbui9tTXOep0zrOuN3f5OAEs6OTzU8S1lZnA63Pz7ABa4C+NMuesGZBQ9dX2QcikDpIM8TQgXzmbFGB + jOxq1Qhpu1rvcrXezSImxQpWAXoA1vvZosSpwHc7WO60tWi2Mm8yN2uysNhpbd1qapojkwWPHGkwbdq0 + zZs3l5aWlpeXAzHUCsT19fUcWZACvp07d+5iV2tr62527VGuvQMsxZf37ME3x8bGOo12Sq1NRaVUp6xM + Wzl7xeyxgWMtnS3Fotft9N6YZjZstYNmnhrofC8RqoAt4C5S4i51F9d56bX4jdrlZ7JnvElngNmhSebH + p1ieJqxtzs8kp+4I6GACmrBmQVPWKAoahTGvzMmiyslyh7NVMxqdq3UreLFFWT/FrWQNG6Gs97vbHUC5 + 2R5wstlvZ9VhZdFmZdVmY9NhZ9fp6Njl7LzfyYmUs/MBa+vt+voLtLRMJ02aFB8fDyFDxVS/4Au4wApS + oLZv3762trZ2dnV0dHSyq0u59qstxRe6uuh3zpo1K3BxYFZzVlZTVmZjZkZDRsaOjPT69C11W2SxsqHT + hr7u/Pr/6P2Pnvg1H8PB4bYjMj2FLGhCmZQnKcpaoW4Xcd1ogybfUZg2d44zbh1vui/A9MAk86NTLE9O + s+6dYXsOrImo0RIJ6CtK0LQ0HEwLHMwKHUyL7FFmJQ7mlU4W9c6WjXAA+MBArJW4CWtX205H60576/3W + VgdsbI44OBx3dj7h5nbS1fU4ysXlqIvLYZSzM/mIcnU9Ym+/w8hopVjs7OPjs2rVKrgHEFPNgi/FeuDA + gYMHD3az69ChQ4cPHz7CrqPsOqa26Ofp9+CbHRwcYnJi8vbmbduzLXd3bm5r7tZdW7N3ZkfVRgnThVqx + WlpRWlortIYHDR/sPfg1k9cY4f94GwwOtx6R7fEU9FPcKEdRnY/RjrGjGnyNm/3A2gSs9/ibdU60ODTF + 6sQ06x7CmpwuhnsQXbOn5nEbQfBkwCgNe9MCO5MCe9NCO0UVs4m4BvY6AOunuJ2s99lZ7rWy2GcN0Pbd + LN8zbm697u5n2ep1c+txczvt5nbKzQ1fIkXp44a7+wkXlwMWFik6OlNGjmTmzp1LL3YGbYIsxQp8J06c + OHny5KlTp06fPn3mzJmenp5e5TrLW4pP9fbiG/Bt6J/WTtYl+0tQxV3FRZ1FqMKOwoK2gmlV0wTpAkGc + QHuNtvZqtqK0CfHg4YM9Br9m8Jq+4LUAw6HR9pp81vnuULS0doxR3RjK2qTZz6RlvGmrv9meAPO2CZYH + p1gdm0ZOF58F6yD7S8H2CCSnJ5l2j9U95j/qzGQLDTuTfJStSQHKDtAJ6yI701LEYeQHtDXgRqjg43a2 + 3mNvucfaYo+52W74g6PjQReXIy4ux1iIoHkaiN3dz3l4XGDrPFuEO8rD44yyetjq9fQ85+BQa2y8imHc + qcDpm1SBF8AB4vnz5y9evHiJXVeuXLl69eq1a9feUlv4JBa+iu9Bbpm+cHr1ierq49VVx6oqj1ZWHK2o + OFJRdqjMudJZlCkSJgiF64WCdQJBrEAQI9COZnEv1dJcoPmm/5tv2LwxaNj/s5e+Mdf8zUx3IUDnuYi2 + u+lU+xjV+IyqGzuq3te40c+keZzpTn+z1gDzvRMs9k207JpidWSaDZzkyEST7nGG3X76JyaY9ExF+HNA + AXSeLSmwJqVkTaRtb4Z5r5YvbSer3baWuy3Nd8OC4b9OTlDxIRT1BNYlgBtqJazB19PzoqfnZS+vK+xH + 1CUUPunl1ae8vS+PHn3Fy+ucnd32UaOWSiROCGroZrBvUAO+69evv/322zdv3nznnXduses2u+7wFv3M + u+yaPHlyfEF80/mmxnONjWcbG8421PfU152pKz9ZblhtKM4Ri5JEoo0iUYJIGE+IC9cJBdEC7WXaWmFa + WvO0tEK1RgaNHOox9DWj1/SFr00ZNSzeWqvMQ69qtFHNmFG1Ywjoel8Twnq82S5/89YJFnCSpjGGO7x0 + mzzlbb5GhyZYnJ5m2xtof26G/fkZ9gS0vni6rck2ttRxP5W2vUWTjXmzuVmLjU2bgwP6GxDTIqApa5gv + W8QZYBdg7el5HmS9va96e7/l7X199Giu3vLxuebjg49Pa8yY62PGvD127DujR19ydKwyNg6Tydw8PT0j + IiKQmo8fP/7ee+/dZde9e/fus+vBgwcfqC0Yuo2zDfjueWvP7mu7W6+1tl5t3XVlV8ullrVH10rrpJKt + EvEWsThFLE4WixPFos2swGOFguUCwTKBdpi29gJtrfkK4m+Of/MN0zeEr//3dCNhspMepk2wrhtLQEPa + NaMNqrz0yt1klW6yOi/95rHGu/2t2idad0+2OTbV9tR0u55A+7Msa41h//OajsDPymhLf7iJtK1Nii1M + ykyMq6ysWhwc2pycSIpwdj7IFgHt4sIpGnXEze2om9sx1oVPwRzgDJT16NFv+/jcHDPm1pgx79IaO5bW + LbZw47av7x0/P9R7fn53fXwuoFxcdlhZbTQwCJJIrPz9/WEsyIWw7w8//PDhw4cfs+vRo0effPIJ/YiV + mZkZEhnSebuz43ZH+7vtpG6177u5b9+NfZO7JzO1jCRfIsmSSDIlkgyJZItEkiYRJ4lFcSLhKqFwuVCw + RCBYLBAsYokv1Naer605RhNTlZeXl67W8Mn6ggRbZrubvNiZKXSUbHeVVXrq1/kYN42zbBlnudPfqtXf + ak+A1b4A6/2TbI9MsT05ze5MoD2krZHiajBeR5MZ6WymF6tkrcBtZZxvNirfyDDfzKzMxqbWzq7ZwaHV + 0RGsYRqEtYtLN0uZyplT9FF392NsHXd3P+npedrLq9fb+wLMAbKFYClQX9/3QRM1btw9tu6z9YCtD8aN + +3Ds2Btjx97087vl53d73Lj3fH2vubvvtLdPNTObr6vrpq0tRICDF2N0RP+EsXzOri+++AIjYkZ9Rve9 + 7u773fh48O5B1P739nfd6bLdbyutkTJFDJPHMLkMs5UhxLMk4jSxaINItEYkihKJIkXALVwmFC4Rai/S + Hjl/5BCrIQYGBhg4X3/99WHDhgsGvT5BRzPJQad6tHHtGNN6X7N6X/NGPwvCerzVLgVr670TbDon2h6e + YnsCrKfbaeR5meR4jpppKBQMHTVKtpiCtjbeZmaUa2SYa2pabGVVbmtbzVaNnV2Dg0OLo+NeJ6cOZ+cu + FxewPuTqiiKU3dyonBWgPTyOozw9Keseb+9z8IQxY66CoK/vu35+77NkPxw//qPx4x+OH//I3/9RQADq + k4CAxyhKf/z4DwICPpgw4YNJkz6aMuWjwMCHQUEPg4M/njatx9+/ydt7i6PjEnNzf11dCzs7u4CAgIkT + J1pjyrqxp+u9rv139x+8d5DgRj3ozrieIeuSAbS0RCotlDL5jCRPIs4VC7OEghSB5jrNkatGDl8+fFj4 + sCFhQ96Y98brIa//cfYfX5/9xv+I/mhp6TRu3MxZs5YtWRIfGhrl6RlgJNCaYyrL84CHmO3wM9/hZ9E4 + zqJ5vBVY7wTuAOs9Ewjr9ok23ZNtYSMaRaNN87wJ68XmjOYggZ5oupnR1lGGW01NCywtt9vYQMvlNjaV + KCXuOnv7ZkfHVienNpb1AVfXbje3w2wBMS0FZQraywt1ysvrjLd3r4/P+TFjLo8d+5av7zuwCNAcP/5D + FvHjCRM+mzDhi4kTv5g06YvJk/Hx48mTH02d+sm0aZ8EBj6eOfPxrFmfzpnz6dy5n86f/2lY2GdLl34W + Gfn56tWfx8Z+Hhf3eM2aa5GRB+3tg+ZGh7Xf7mq73bnvVvved9p239jT+nbrruu7xnSNeaPijdezXn89 + 7fXXk0m9kfTGoKRBgzYNGrxuyOCowYMjhw5d9uawZcPfXD5yRITmyAhtreXCkTMFw4aNiIhIWLZsU0TE + 5sjI5Kio1NWr08PC1np7T7CTiiKs9Wt9CeiGcWBtCdbN/lY7/a3BejeLu22CzYFJthplY02LfQjrrZ7G + s02ZP/zXf2lqjh41KsnauhSlBE1Y29pW2dlV29lB17X29vWOji1OTntcXDpcXQ+4uXW7ux92dz/i4XHU + wwOUj3l6AvEJWizok97ep7y9T3t794wefXbMmAvA7ev7lp/fO7AFf//7/v4PWdYE8dSpXwYGfjljxqcz + Z34aHAy4n4WEfDZv3ucLF36xaNEXS5d+ERHxxYoVX0ZHf7lu3ZcJCV8mJn61ZcvX2dlfZ2Z+KGJ0i/dX + Hnl4+shHp448PHX041NHH506xpb1cTumRS6pkEtK5ZISUuIimbhQJsqVilKlwo2MME4iXCsRxEgEaySC + 1WKU9irxSB9tV1c/wF25Mm3VqrQ1a7LWrs1et27rhg0FmzYVL1683t19vK+BdJPzqIZxlijC2t8axbFu + 8bNqGm2tUeFrBtbpHsbTzeR6Qi0Y3IQJEwQCO0PDldbWZbQA2tYWpWBtb19jb1/r4ADWjc7OrS4ubW5u + Xe7uB8EaoD09KeXjXl5AzKdMavTo02z1+PicVar7mp/fzXHj7owffz8g4OGECZ9OmvQlWM+Y8fns2Z+H + hHw5f/6XYWFfLV78VUTEV1FR30RHfxMb+01c3DebNv0pJeVPGRl/3rr1z4WFfykr+3blysaJcwKPPTpz + 7JMzxx+fOfG45+SnPSfx8XFP0q006SEdpkEJGrWdZV0oE+fKRClS0WZGGM8I1zPCdYwwluGID7fUCgxc + vGZNRkxMVmzs1vXr8+LjCzdtKklOLk9Lq8nIqM/Obpw/P1pfKAyx0CvxMWscb9kEA/G33uFrVettVeNp + Ve1hWethoVHtZ77a0dBNT4LsGRcXl5aWlpycPG/evOHDpTo6My0tt7GiVrC2s6u0s6uytyesWdCoHU5O + za6ue9zcOtzdD3h4HPL0POLldczLi4D29gZiWn1A+/icYYvgHjPm3NixF8eOveLn9/a4ce+OH3/X3//D + CRM+gYFMn/7lrFlfhYZ+HRb2dXj4NytW/Ck6+k/r1v0pPv5PiYl/3rLlzzk5fyko+La09Nuqqr82Nv7N + zy88uTLj5Ke9Jz/rPfX52dNsncLtz3onXpgqbddh6nWYKh2mnK0yOYqIOoeCloo2KCtOQVywWDJcqAU5 + r1u3LS4uPyEBKi5JTKxIS6vOzNyRk9O8bVtrfv7eoqK21NTK6dMXuutKo21HVXlZVriTKne3qHAzr3JH + mWnMttTVEwtXrFiRm5u7detWZKOMjIwtW7agofv6+orFHsbGa21ty1hFA3QFWNvbVzk4VGOcc3Ssc3IC + 6AZn50YXl11ubvvc3Ts9PA56eR328jrq7X3c25uyBl9aVM5PS0kc3g3i58eOveTre5US9/e/GxDwEQQ+ + eTLU/VVICMEdEfHNqlWENeScmkpAFxV9W17+17q6v6amnnQZ473//SOE8mcKyrTaP+kyOWUhbdVhalnQ + FWwR1jqSIrk4UyZOkYoTpaIEtuLZYolrTxR7ePhv2JAPFW/cWLx5c1lqalV6el12dlNeXmthYRsiT1nZ + wZSUA0uXdk6d2mlllTziDe3JOvJMB5MyV7NyN0VVAnRQUFBWVlZRURGGgvz8/Ly8PBDHys7Oxufnz5+v + qamnpzfb2jrPzg6gy+3tAbrSwaHK0bHG0bHWyYmwZkGjmlxdd7m7t3l4dHl6dnt5HfH2PjZ69InRo0+y + NSBuVF+NE+JKjd+CxgMCoPHHsJTAQCLwRYu+Wb78mzVriLSBe+vWvxQXfztlSvzKtNgTj3tP9FU0KvLG + KukhXaZJh6nWYSrZYlkTA8mXi7cAtEycKBNvpPWUuKadcPbsSFbFpcnJEHJNZmZ9Tk5Ldvae+Pj2JUu6 + AgMP+PnBMw/AP52cduH4BiiGmWmnLVptZlDmalruZlrmRj5qlLELUwACKVYJu4rZBfpYSUlJyEwM42Fq + GmNvX+HgAMqkHB2rwdrZudbZuc7ZGawb2BfQgXWzmxvF3enl1c2+okAdtypofimJ98JVlDKHj9/gyfwx + lTmgL15MLGXRosujLO1qe1qPftx77FHvsU96j3PEPzvr0ushbdNhdqiBRkvMlYvTWdCbZeJNvNooEy5l + RooE6Hvx8aXR0RVLl1bNmVM9ZUq9n1+Lh8dupABn573OzriBAIZc0ADKcFT2oC/V148UD9EK1peDMi2N + CnbRhzmqq6vpx5qaGu4jFj65evVqbW0dff0ZNjaZmI9RTk7VbBHWLi51Li71Li4N0LWSdYu7+y4Pj32e + np2ensRMWOLHlaxV4fZbPJk/ha5U+jvjx5O4EhDwMezFzCw1ZNXyAw96Dz7o7f6gt/vD3kMf9R5+2Hvk + YW/SzSzRQT3BDh1BhVxYJheWkhLhY4lMmC8TbJEJUmSCzTJBglQ7npTWBqlmnHTkeunQMSIDg0nu7gXO + zkV2dki6tIiFwjzBFC2K2qaTk6LwGTgqvopD39Q0SSDwG8swaXajCGgKlD6M1NDQQB834j/AgYXbWOXl + 5QsWLGAYexOTJY6O5U5OVc7OoMwVwe3qWs++ip+8NpS+zMvNbae7+x5Pz3YvrwPe3of64n5e4rT43JUO + gy562cPjgFTPtLCzruve6a57Z/aT6lHU/R6PYxPfbJK/WSp7s0D2Zp7szXzZ8DxSb+bIhqXJhiZIh8ZJ + h8ZIh66RDolmeCV5TV9LRyfc3DzV3DyNrQxLyyxr6222tkW2tqWseQI0+LY4O+90dt7FfkQ1QdoODpg2 + ENK2S6WzbbWEMeYGGkC8Y8eOxsbG5uZm+uhGW1tbR0dHF/soBj37jo9Y+G9nZyca5rRp03R1x1paxjo7 + V7NV4+ICyrSItFnWCidR4qYCb4PAvbwOenv/FIGrF0VvZLR65rKwrrsnu+6eUtQ9ReXdqBJ1GA2rYoYW + MkO3MUNzmaFbSQ3JkQxJlwzeJB4cJx68Vjx4NS0RV28ECv7whxHGxhtMTOJNTTeamSVaWKRZWmZaWeXa + 2pbY2ZU5ONQ4OTWBL6zD1XWvq+s+ZAH2BvLuTnyJVTfGjnJ9/WU6Q7U0OMR79+5tb28HzUOHDh09evQE + u86cOXP69Omenh566h2fOX78OL6amJgoEukYGk61sUmiuF1cgHsg4uSFizziu1niXayDk4b57xDHfjK6 + JnltVSxo1fI7Hji0WTJ0u3honnjoNvHQXPHQraSGZImGpIgGxwkHxwoHrxEOXq1af3TQEgrHGxuvV4JO + NjffYmWVbWOTDwtmfWOHi0sLm2vbMUawk0Qnm3E73Nz2IoOx0sa0UYEjYNSo1RrwBKpiaPbw4cPHjh0D + 0LNnz164cOHSpUuXL1++xp5lx8crV67gv+fPn+/t7cUdAMmvXbtWIjEZNSrYzi5dqW4Ougpu6iccbkqc + WAqP+E/RuIHByuDIxXy4XFXe2intNBlaIxlaxIJWUh6aIx6SLhqyiQW9VhUxatAiwR8EI3R1w42N40xM + EkxNN5uZpVhYQM7wjWKIFLnW2bnFxWU3KLu7AzEGiINsHWBBQ93QNSwbVl5iY5NrbZ2hsW/fPhhCd3c3 + dArZAjH4AuuNGzdu3br17rvv3rlz5z124QY+g8+DO6BT4nBwZHCGsTA2nmNnl+HsDOOm9aOIt/JchfNx + BJUf8HHISs/UqvhAvQpiWlNOhgzbyQwtEw/NV5NzqmjwBlbOMaqUUa+P1R4xwtXYeB2sA3I2NU2EnFmD + zoPtotehB/LmhgPIsvjIVqe7OwwEro1RrsLREd8MQ8+zscnRgDDhFfAE+MPFixevXr0KlOD7/vvvP3jw + gJ72xfroo49w+4MPPrh//z4l/vbbb0PgED5+EF102bJlDGM5atQcW9stPNw/TJzvKuicHh57eTJXsXJV + 6Lq6ixeuW6nCl1bNu63yLrOhtZKhxf3JefOAckb9j8FIqTRY6RublL6RY2NTwLozRgdsdisiLE2xLN+9 + 9NXHLi5IutA7vAUhGCaDxALQ2Rqwi5MnT1Ihgx0Q3717F4gB95NPPvnss8/oeV66Hj9+/PHHH4M4cEPj + HG6oG2ZSX1/P4jY1MkIKTOyLm5aKlQ/UOdWhqyidcMdRbO3mXtuzWwUxLSLnXQPIOU00OF44eF3/cn5j + imDoUGsqZxMTyBm+kWphkcG2QVAjeQNzA6YzdkCDTTcrdwEyx+frsZuIZI6OuEtK7O0LAdrOLlcDjgxM + sIKbN29CqiBIEQPrV1999c033/zpT3/6M7tw4+uvv/7yyy9BH98AjVN1v/POOzAT3E+4t/Db0F2joqLE + Yn1Dw4mWlmvVWHM1kMzVoRPurL0glT/lLpFMX521UYUvrbJ3mog79yvnDNGQRKWco1Upo16z0hSJJrFy + jjM1haIBOgmRw8oq08Zmq60tmmERCIIjzIHNtWTjlTuC/8JYKpyc8NVSlJJ1vgaOfTgyYEGhcIZHjx6B + IxAD61/+8pe//vWvf1OuJ0+e4L+UOHB/+umn+Gb8yL1793Ac4H6C7cB8YNzwemSYuLi4cePG6ep6mZkt + cXDI7UtZpVSgqypdnfuoUdFjpk9uv3208+4JrroUhbAxfdhOyZDSHy/nWdp/GDIcgQw5AX9i1KgYY+NY + E5P1ZmbxFhabLC3TbGyyoFAYAssaXbHSyamStyO4TYplja8S3A4O2x0cijUgRjgA7AKGQIUM2YImmP79 + 73+nL6/Fwg26ONz4ti+++IKaCawGnk6dBAcHNW44EhpsZmbmrFmzYN9GRoFWVnG8bRqo+rEXFb1jP0Uy + /bQd2zrvHlevrLeKRO0GQ6tFQ4qFQ7YJh2xV1OBs4eB04eBE4aA4waBYwaBowaDVtLQHrVLUHx1HaGl5 + GBgsMTBYZmi43MhoJXCbmKw1M9tgbr7Z0jIF+cHWNsfeHqwLWdalEC+wsny5XeBYK6QN1uRC3XAA+ACQ + 0Uv6QMjQL5iCL31xPtZ37MJ/KXR8w7fffotvhvZx33BOgsMCB8f169c546a4McTDTwQCoY6Ou4nJfFvb + VN5mPbtUeilBL5MFha5e0nn3WL/ldth3aKNwSKlgSL5gSK5gyFbBkBxSg7MEg1MEgzZoD1qnPWjNU7hc + vRGq9YeRw/DL9fUXg7WhIVivGDUqysRkjZnZenPzjRYWSdbWW9DZ7Oy2saC3s6ApZT5oFP3MU2lrgA4k + CR+gdgG1QrMUMcjSSyD8n/Jalfgvxxp6p9KGj3NOQvskZ9wquBEis7Ky5s6di2FHT8/H1HSxWkT54TIx + iXH08a4729r5/jH1WnNh44h9zNAq4ZBCwZBtfMrag7doD96sPWi91qC1WoNWaw1apVqvuQwfOdJJT2+h + vn4YZW1kFMGCjjE1JaChaBsbKHqr0j0AWl3O/FKwtrFJ1QBlmDLfLtQpc4uy5ku7Xyehxq2Cm46Xx44d + Q5rEIJqcnBwcHAziurre0LiNzWa1reynsIcjBdKE0i0qfLkyO+AwdIdgSIlgSF5fOWdoD07WHhSnNShW + a9AaVcSoN+Zp/kF7KMNM09NboKcH0OFQtJFRpLHxKlNTWAc8OtHKino05FwA22XlXP4M0Ngp7Bq6FHZT + gzNlFbtgFdyHMl3083zcuG84J8Gv4lIgHzfMhHo3WiWSCeZ4xMqDBw9iLgXx0NBQuIpM5ggft7BYZW+f + o7LFXOG4nh21SAUuVzNPzx+2Wzi0gjUNvpwzWTlveqacXYePGOGoqwvKC/T1F7HWATmvhG+Ymq5j5Zxs + bZ0Og2blTH2Dk/NT0Nh47AJ2BLuDnQoMDIyJiSksLCTvlcU35X6FrL5UWFPckDZ+1TNw01aJZEKDIKYk + +AkEjum/o6MjNzd3+fLlAQEBYrEerHzUqFmWlqvt7bO5fYC43Mb5DmQa266XMh1GQ+sEQ4r7yjlbMDhd + e3CSknK/cg5VkfNiVs7LWTnHoBNaWGxm5ZyJRGxnx8lZARobiU3FBmOzsfFjx45dsGDB5s2buXPOtbW1 + GlAiDn9QHsguBlpE2GpO8gzctFXSIR6BErmb8xMqcDg4PUGIJJ6WlhYeHo50KBIxMpkDIrmBwUypnkFq + XY4KX65cDo8Z2iwYUqbWAyHnVO1BCVqD1mkNilFFTOs1J7izM0/O8A3IeYWxcTQr5wRWzltsbRVt0NY2 + 08JirYnJQkPDCdg8bKSPjw+OSyTaoqIi/plnDHH05KjiHTp/LGVu9YubGrcKbq5VIgjS3E3PmVCB04YJ + B+cTb2tra2lpyc7OXrlypbGx8bLEZW2329rudLTf6Wp/70DHe90d7x3qeP9I5/tHF/RGDNsrGlopGFLE + mgZAcz0QcuZ6YLQqYtTrwSP/MGKoTDaDk7OBwVIqZ9oGTU1XjRoVPmpUiJ7eZLncSyKxEAoZV1fXqVOn + LlmyJCkpqby8XIUshct/9QJ5c9+fTJlbz4MbrRLJhAZB5G7OTziBcw7OJw5XAXFM9rMjZx/75BjqyMdH + Dn106OCDg/vv7++829n+XnvetXxZu86gmqGDioYOyn1zUM7wwTkjBmePRA1KHzkoWXPQBs1BsZqDYjT7 + IsZ/Sf2PzdARI+yk0okMM55hxkgk6F0uQqGdQGChrW2gqSnR09OzsbGBZmfOnBkREQFPgGypLQAuR5Z7 + 2ISDy716AYoh7wsOOpSUAttPXfSXPBs3neD5fkIFTh0csyUlzmkcrpKSkuI7zbflYsuJT0+ceEzq+OPj + T+uT42N6xgjaBJq1miO2jxheOPzNvDeH5g4dunXo4MzBg1IHvZHwxuuxr/9xzR//GPXHP67oWyv/+Nqk + 1/7fG/9PIpHo6urioLGysnJ0dPTy8kKrQCiCfa1bty49PR1HVX5+fnFxMX3dDfRLH5CiZ/M5srt27eJe + twC47e3tUAmOTrR9DSpkLAWtf3vR36aCm0smNHfTMYf6ycOHDzkHVycO1di62Ba2F5789CSKsOaKhb74 + 2mLxYbFop0hYIxRWCIVlQmGpULhdKCgWCAoEgmyBdoq2dqK29kZt7XhSWvFaTytOa7jdcD8/v8WLF4Pp + 0qVL0Y1hU9HR0eCbkJCARJSRkYEuXVBQUFZWVllZCcQQL5Ut1SyfLBZ9XQiFiz6P4xJHJ9q+BuWigPTz + Lfpr+bixKG4IHLhVBA7inKVwxLGVeoZ6yRXJpz4/deozUic/O0mKhY7aemer8XFj8R6xqF4kqhKJykVP + QRcJBLkC7TRtAnqzgrJKjZw6Ep4An4U1AfGKFStWrVqFNLZ+/fqNGzeCcmZmJijDKCBk3OUUMfgCLshi + Uc3Sh/0oWSzuRSGwQRyXODrR9gloBZtfYKng5gRO/YQKHMQhcDg4ZymUOLwbCKIzo09/cZrU56cJblos + 9AOfHHDpcZF0SsRNYnG1WFwpBmhRmUhUKhKWCIX5QvI00VSBIEkg2CQQJKiWdqT2cJPhsN3IyEioGIjX + rFkTGxsbHx+fmJiI2MO9ohRChhFDwtAvhQuyaB5oIVSzCKmULH3AD1GKwsVBiWENHQhjhIYCyS+5ONx8 + gXN+wjk4tRSO+IYNG5bELTnz5RlSX5BSEGeho6ZcnCI9JGV2MZI6iaRKIq4Qi8vF4jKxaLtIVCQSbRUJ + 04TCZKFws1C4USjYKFCUErTmGE36khkYBdbatWvxFzdt2oSWAFPmhAwvhoopYvCFbKkboHmghVDNcmTp + a20QpRCoYID0tSC3b9/GMfprgOYWR1xF4OrEoaaQyJCD9w4q3vvgyx4FcSX0iBsROid0pHukTAPDVDNM + FSOpkEjKJZIyibhELM4TizJEojSRKEkk3CQktbFPac/THsGMgF1AwrBj5F84MoLali1bcnJy0PcgZHgF + 2h36G33MmvKFZilW9A+KFZpFRwFZyJaShe9RuLBB9B50IByjvypoujjcfIHziWMnA8MC9729r/erXlTP + V+RNJkgpoae9n2Z6ylTWLpM2SaV1UgqaqSAF0JJCiSRHIk4Xi1MVL1ERbepTwnVCLQetWbNmwSXAFyoG + 4tTUVNy727ZtQ7SoqKiAV8CL0dyAGJ4L8YIvdQOKlRMsRjCQRVQF2bt374IsfI/ChQ0izuLoxDH6G4Dm + FkccuDni2MNJcyYhzD192xQWNwe99mGtw1kHeZdctlMmq2efwV8llVaSYsoYpoRhtjHkxSlpEkmyBKBJ + be5T2pO0fX19ARftDnyhYiCmXoFogWgMO0b4BWKYLyR87tw58AVctA3OCpBKKVaqWcxilCy6OshSuEhW + 6Pbo+ThGf0vQ3OKIww0DggJ2nNlx9uuzqKeslXX4i8OjL4zWOawjb5XLGmWyWpmsRiarIiWtkEpLpdIC + KZPFMOmMJFUiSeynRItEWvpacAwYMUIFjIKmNxxGCMjwCtgxIhqMAioGYhguxAu+0CzgUqxgilRKsVLN + YhbjyKLTAC48EAvdHj0frvhCgKYLOvKf4V93qo5SVikKevKVybrHdHX26sib5PJ6ubxWLq+Ry6vlhHWZ + TFokZXIYJpNhtjBMCsMkqZZkg0TgIggLCwNfLBhFYWFhSUkJvIIKGR0PQoYXwyioiuEM4Mu3Ao4pFlo3 + xconi05D4cIGka/gh3DFFwU0Rixoue50Hfd2VorisZ5zfY7uSV2ddh15Sx/K5F3xKmSyEplsm0yaJZWm + k7f1kCb3KSaZgBZNEk2ZMgWhDYsihldAyAjI1JERKiBk9DoYMYwCFgHDhXipFXBYYQUc1oHIYtHew3b9 + f74QoLGrk0MmE8dQocyrxTcXG5w20O3QJW+Mt0P5ft7sGwGR96bfLpfly2TZ7JunpKlSpiVZKBHoChCQ + 4cUUMRUyTW+YO2AXcGTECQgZRozMABVDv9QQABdMAZQy5WPtlywWGg/b8sns/duDxm7PWDSj5VKLCll+ + rby1ctSZUbpdLOVG5Zt5c5TL5OSNgAZ4O15a0jVSob1w9erVQFxaWgrESG9ovKCMMY+jjMSGlAbKEDL8 + F5ShX6pZipUCxaJM6eKwcmSxaOPBorv5W4LGDqAjha4MbbvZpkKWXzG3Y8h7eO/XJW8gpk65nH1j+hyZ + 4q2tUlUR0xL5iubNmwfE9JQFhAy7aGHfaBNjCAIc5g5QRt9D06NPCIBRQMXQL0XMAaVrIKxYit3ru34z + 0GgvmBSWJSw79OCQCll+rbuzTpUyTINSrpLLK+TkXem3EtPo943paUlmSAQCAXIFfcp9TU0N0gVa3x72 + XTZBGQMeHAOUOS2DMiwY/gBboIgpVgVL5VLszHOs3wY0GrqRqVFsTqwKVpUCZfMec90Dz6S8jaUM0xiA + MrOIERoJEZa5M8iUMhwDMe4Q+/ZtnC+DMtUyKEPIsAggpnwVm/5T128AGrvn5OWUXpuuglWlFI4Byrt1 + dJqUlOmbDVLKJexb8D7bmldJRXaitWvX0teO0JOclDIG6+7u7hMnTiAsI2MgxiEjI8Ch9VEtUyOGkP99 + yli/KmioA71oQvCEsoNlKlhVCt3vqWP0pUzebBCUt8vleT/UABOkYm/x4sWLOcq0++1i3yHvwIEDNC9f + vnwZwzTCMs0Y6H5ofZwp/yxyxvr1QKPJrF+/fmHMwn3X96lgVanwm+EkY6j4MkeZDXPkzXcpZfX3dlSW + JIC8Kz2lDNOoq6tDWkdepufhqDVzDRA9A2EZMQ4t+uc1Dbp+JdAYt2ycbBIKEzDdqWBVqZDrIYanDUmS + +/coMzMYgUSA2ZpvzYgZaIAIc7BmDCbnz5+/1t8bCv68pkHXLw4aW49hF/PI9v3bVZiq1JEvj5C3+T+l + p5hKnk253/cpVRYTyggNFA0Qi4Y5vjUfP34c498V9j127969i9kPg98vZBp0/bKgcXgiXaxMXtl1p0sF + q0rVP6r3ueSjd1xPt70vZTZj9E95gMjMhDMiM1F8fDy/AapYM1Izkg8dspGaYRqYrX8h06BLY3tR4i9R + 6anR06aM9ZrgkVaXcvTjw8+uTTfiLY6ZCdu1BA1a2tWa2mWa2qWa2iWa2sWktApHauWN1No6UmvLSM2k + EZqbR2huHKG5YYRmXD81YsGbw4wH+/g4h8yeFDpn0tzQKfPnTg1bMH3RwhlLw4MiI+ZErZgXs3rhurXh + CRuWJW5ckZa8OnPLmuzM2G05cfnb4gvzEoryNxYXbCop3KyyR/9m/SKKbm1tNbcxX5W66geFjELAsOix + 0D2oq7tHV6dZ7TwGTXLPp2US5pxEy5cv57TMNUBMgNSakZphzUjN1JppnqMTIJ1NuMFEsTM/0+qj6NLi + JFplJcnKSinfjkpFVZSi0irK0irLtqCqytMVVZFRTSqzpjIzPi7C19dtUsiEbbu3Hnt0RLU+6VNdDzsm + nPWXHBYJWwXCem1htbawXFtYpi0s1RZuJyUo1hIUaAlytQQZWtopWtpJWtqbtbQTtLTjtQS0Ep6WdqTm + CPvh4/xGR61cvCoqfPWqpTHREbFrIzfERW1MWJOcuC49LT4nO6kgP720JKe6Mr9hx/adzRV7d9d2tDUe + 6Np5qHv3kcN7jx9tO3G889SJzjOn9p85daDn9MGeMwd7z3T39hw623v4HOrskfNnj144d+zC+WMXzx+/ + eOHEpYsnL188dfnSqSuXT1+9fObqlZ5rV3reutr71rWz16+du/7Wubevn3/7+oWfTdEI/KmpqT6TfFKq + Us58cUZFtupV9EGR10WvfkxZRcuY/bipZODuJ10nFXuJFyxYwIU5bgJEzOAaYG9vL5ea+7Xmnzdp8NfP + oOisjPXBQRPMbE2WJy7beaVZVcX8Ump50ZWFRkcNhG3awiZtQY22oFIpZE7LRVqCfC3BVi3tdE3tFE2F + luOfFl/R2qs0R7gM9/Z2i1qxKGoF5LwkevWytWsi4tatjN8QnbhpbVpqXGbG5rxtKcWFmRVluXU1RU0N + pbt3Ve/bU9fV0XRw/87DnJyPdZw80Xn6ZNeLpegHDx4UFRVZ2lsu37y8+UKzimb7reZPmidemah3Wo8k + ZczWaqZMAga0XMaek6Nniwae/VDS9VLxaHFISEhFRQWnZRrm0CpUYgadTfgnNLjTRr+QNXPrJyo6LTl6 + 1swAQ1P9eatDyw5tV1XuABV5LcLsuImoQyBs1hbUagkqtQRl2oJSbQGrYlIl2oJCLUGeliBLSzuV1XKi + pvYmTb6WaVFFa0cRLXt5Oq+IDFu5YjHcmVjzmmXrYmHNqzYlxKQkr89I35ibk1SYn162PbsK1lxf0kKs + uaZ93479nc3dB3ZBzkcP7z12DHJuhzufOtn1Qij63LlzSUlJ9q72K5JWNPY2qgh2oEJMhpD1T+tjsFak + i4YBTBkBg57FRw185hMljSG+HBoaSrWMxWmZRmb6TAF6CpQfM37p2aTf9byKzs9NWLZktpeno9NohxUp + y+t7a489OqwsVeWq1PzLc4kjt7OOrBCylqBUS7BdSwAJo6gpI2Bs1RKkI2DAlDW1N2tqb4SWaakqWnuZ + 5gi7N3183FcsD6NyXh21ZE300rUxy2HNmxAzkmK3pMbnZCXmbUvdXpxZWb6tvrawqaGsdSex5s72hoP7 + W7oP7DxyiMgZ7nz8WNvJ4x2/paKROjMzM/UN9WcsmpG5I/PoR0dV1PqM2nJvC4kWJ/s6cl8h9zHlXF7A + GCAso5jlDPJyeHg4P2Pwx7+uri760BQ2/urVq3TO/oh9iR8/ZvwK1sytARW9KWE5hisnB0tHL/sl8YtK + DhYdfXSYX89WdOF7+b49Y5hDYuEebWEjooWWoIInZKJlUtpcUlY1ZZV6qmWtuSOHmw7z9/dZHrEQcmZj + xuI1q5fExixfv25FQvzqxM2IGRuyMjdu24qYkVFetrW2pgCpeVdLxZ7Wmo62BjZptBw62Ao5Hzuy99iR + fXDnE8fbf1VFX7x4EUECxufs7Ry+LrxgX8HJxydVdPrs2v149+zrs8kjI4d0dduUGZlGC3Uhl5OkrDiz + jKnvmaaMYkLJeYzo6GgVLXO+zGmZns6HlrnI/CX7clX+o1O/jpbpIopOTV61NDzIf7ynuZmhg4ft3FUh + GQ1bOm63Kc5F9BUyV+qKbvmgKfhCEOyY5IoWbUG9lqBKS1DOd2SlkIs0tQs1tbdpaWf3FfJTU1YpomXN + iSPeZIbOCJywPGJB5PKFsOaolYuiVy1ZG7OMaHnDqqTNManJ6zMzNuZuTS4q2FLGToA76opbmspbd1W3 + 7YU1YwhsRnA+dHDX0cN7UMeP7mPj8y+v6MDAQEsHy8CFgXF5cTUnan7wfHG/te/TfQtvLLQ5a6N3lD3J + 2craMT9XcELmPRClOH1BTXngpIySJkglARKBRLBlyxb+eQw6+9G8jIwxkJbVH2n9NbVMl8a23Vvbbu3l + TqT1U2papkXlXPp+ydRzk42OGAg7tIU7tYiKq/uqWEXIBRCypna2phZfyAkq+u1TWks1Rzi96eJst2hh + MKvlBSsjw1YRLYevXbNsfSy0HJW4iWo5YSsic0FaaUl2VcW2ejIBlsGalamZyBlJ43A3587IG7+WolW0 + +fyVfT978pXJ5JE9eHH7D6i4jyM/t5BRzCJGZCfiHvejWq6vr29sbKQPl9DZ7+jRo8jLXMZQ0TJ3Zo47 + m/EryxlLQ1W/6tVXyLsetIRfXmR/0lbULRDs0RI0aglqNQVVmkTFnIR5KiZChh1DyLma2lkQ8kit5JFa + iZpaPyRk1EiYsmzo5Em+EUvnRSybp9By1KLo1UvWrolYHxtJtLwxJjVFqeX8tO3FWVUVuXU1hY0N23c2 + le9uJdbc1dGwvxNJQyFnFNz5xVV0xv2MaVenWfZa6h0juZgMeC3KRNGviqkdVyozMn0CBqLFcwiZTH2+ + YoHgqSnzwzI9v9zR0dHd3U3PYyAs0Wd+cnmZZowXQct0/bCiM2+lTz8/1fyYqfCgNpFwk5Z2raZ2NSSs + KSjVFGxnqwTVV8U0V+RpaudoamdoEhUnQcgjtTaN1EoYqbVBE6WNUlMxSnP2iOHmw7w9ncMXh0QsnavQ + 8oqFRMuKjBGZEL+K+HLKusz0BPZURmppCbS8tba6oJGcaC7fvauqbU9dR9sOyPlAFw3OJGzAndlp8MVQ + 9ImvTmTdz0IcdjrnRM60dfNcWF3CfVX81I6RKwrYZ8VRO8aw98yMjCLpYopEqC+MjY3lhMw35d27d9OA + QR/G7u3tpefk6HkM+vxazH4qGeO31TJdfRRd9F7BkiuLvU97GB7RFx5Q6rdOU7tKU7tC+VDedvbRPCJh + toqVNyDkYtaO81k7zuTseKTW5pFaG6FifvWjaM15I4bbvunsbBsaMn3pkpBlS0KXEy3PX7kibPXKxWui + MftFbFi/YmP8qqTEtVtS12dlYPZLLMzfUro9q5L4MrSMyFwGLe/bU9u+r66TyBlJo6n7ADmtcbh7F80b + v42iiz8sjroVhfzgcM6BPAH5sC7x333sRDeQfp+h4u1yeaHyPDKd9GDHA5+1oEWEPE0iNBJGRUXx0wWX + lDH17VNeCBGmzAWMmzdv0ueKP2KvuUWfYquel39bLdOlITygJdirJUAEblCKt5wnXqV++xT74DTRMm4U + jVR48VbWi1VUHK8iZK6eKlozZMRwm2GODtazZ01ZEj4HWoYvL4+YtzJyATv4hcesWbo+dvmGuJWbN0Yn + J63dkhaXnbkpL5ed/bZnVpUrtNzcWNq6k0Tmtr21sObO9h0HOpvYObCZuvNvrOh+lKsuXlp8CfMTBY3G + 1IufW8UoRAvMe0I94Sr2nfbUhYx0QR/xQ1I+wr4G7Sx7IcTr16/DlO/du8eF5W/6Xt7lN5n9nr00BpQt + v1gJK4rEiZHa+SO1c0dqZ5PnWhAJoyBhmigGVDGv4jRHThn+5qihbq72c0OmEyGHz2FNee4KmHIkCRhr + VofHrl0WxwaMpM1rUpMRMOK3Zm/O35ZcXJhetp3k5fragsZ6+HLp7l3QcvW+PfSEBhkCUQeJnOHOirzx + WytaRbb8GkjCiBOcEXOJ4oeiMVcY9sTu4oCAgISEBJVooS7kw4cPn1BeN5W7ECJM+ePnuLLZC7U0VMWL + 4uuXPlGoYKRWPvtcoayRWmkjtJLZ+mEjVi3NsBHD3YcN0xri5+uxeFFw+OLZ0PIymPKyuZHL5q1YvmDV + yrDo1YtjY5aui10eD1PeFJ2SuDadmHICGzAw+KVXlGVXV20jWiYZo7SVnGWuZLUMayZypsGZZOcXVNHq + +kVVyOWlZK4jp4w5F+Yk/BxGTEu6irVjQ2FYWFhhYSFnx3TYQ0am0QLznrqQabq4o7xu6rNN+QXUMl0a + ffRbpKkQL32uW+ZIzS0jNJNHkGe8JY7Q2jxCa9MIrYQRWvEjtOJGqKh1oNJcNmLE2DeH6QxxcbGdNWvi + 4jAIOXjJ4tlLl8yJYJMyTDlq5cLoVYvWRi9ZtzYiPm7F5o1Iymu2pK7LzNiwNXsTa8pppSRgYPDL21FX + 0NRQsrMZGQPjXyWsuW1vDbTc0Vbf2V7PntYg2fnFU7SKeBEh4L/0sTtOvzRI/NBcp1JExRMlQhNhcHBw + WloaVTE9ZUHtmJ61oMMeMvLBgwdptFAXMj198Xnf66a+4KassjS0ckdqITxkjNRMY5XLipc8Y5M+aTNh + hGa84omaRMX8UhMvVyMXDB/uNWyYdIiTo3Xg9PGLFgYtDpsVvih4KYQcHrJsKZsuIuevgpBXL167Zsm6 + WAg5clNCVPLmmLSU2Mz0uJzsjXm5SUUFKaXF6eVlWTWVW2tr8hrqCqmWd7WUw5epNbfvxRBYCy2z7kwM + +gVVtEK5KCiXM1+I97n9l19MGCMeLRbqCOfOnZuZmdmviltaWlr7vncDHfZoRn7rrbcQLQYSMtKFyqPX + L76W6dIgsuWUqxRvv/UMRWuuGDFi4pvDLIYYGel6ezrNmTU5bOFMTshw5GVw5KWhK5bPXbliwaqohWsg + 5JilcRDyhhWbElhHTlmbkRa3NWvjttzNhfkpJUVp5TDlipyaKoTl/Mb6oubGkp1N0HIZIjPVMpHzvtqO + fXBnhI0XX9E/SblcMeGMZDwx4okTJ8bExHASpgMelyjgxZyKu9h3FTh69Ci14wsXLtBLNdDrCNCMTKOF + upBf/HQx0NJQke0zii/nkYuHDx83bJjZkCFDBrm62E6fNm7hvBlh82eELQhaFBYUvmgWosXS8NnLls6J + jJi7MnLeqhULV0ctWrsmfN3apRvWRyRsINEiJTF6SyrnyJsL8pJLiraUbc+oLM+urtxaD1OuL2zaQbW8 + nWh5J7Hmvbtpaq5BvVSKVhPpMwpBgpnBiF3EQhm5jmxcXBx/tKMS5owYuZg+ptfR0UG9mKr4zJkz58+f + v3z5Mt+OP/zwQ/oid+46AjRavOxC5tZzKXrkgjeJfi2GDNUcbG1l4jvGbU7wpAXzAhfMD1w4P5DYcdhM + qHhpOFFxxLKQyIjQFZHzolYsWB0VFhO9KDZmyYZ1bEBOiEravDo1OSY9dV1WxobcnIS8XMx7EHJa2fYt + FaVZ1RU5dTXbGuryG3cUQMstTVTLpdDy7l3le4mcq/btQb1CipbGSpm5jGScRGQlEggE9DrIRew1OSFe + ql8ECc6FOQnvU14Zjl657Pjx40gUvb291IuvX79OVXzv3r0PPviA2jHNFfQhPgx76hn55RUyt/ooemTE + 8BEzhw33HgrzHao12NhYz8XZZkKA97zQqfPnTlswb9qC+dMXLghcpJTwksVExTDi5UuhYtaLVy6IXrUw + JnrxurVL4mKXsel4RdLmVSlJmPRis9LX52TF5+ZsLNiWWFSQXFoMIadXlmVVV+bUVrOmzGq5uQG+XLyz + qQRaboWcd5XvIUmj4uVWNGIDE0jCL1EuI/jB6yDDf2mK4PRL5zq4cHd3N5XwKfbicDBi5OJryneDeu+9 + 9+DF6ir+C/smJHw7fpWEzC0NfV2plaWxh7vdhACvkOBJ89gX5inESwr6nQH9Lg6buWRx0BI2S0RAwstC + EIqjVkDC81kJk0SxPpZNFPHLN29cCRWnEhWvzUpfl50Zx9rx5qL8pJLClO3FqeUkWmSyQs6tr0FSzmus + R1guhJZbmoiWdzaXQMutO5E0EJxfCUVDsHzNYtHYQJUL56URGOJFCoZ44b/Q7wH2ypzQL4Y6BAnOhTkJ + c0aMXIwBj15ci0ZjTsX8dPxKqpi/NBbMnwblhi1AEfEuXkjEG74I4mX9dwn0O5vVb+jKyLmrVs6LXrVg + zSqaJcLjYpfEr18GCcOIEzdFpSStTktZk562NjN9fXZWXG52Qn7upsJ82HHS9qLU0hLkioyqcjhydm0V + MeUdtdt2wJTr85saoGUiZ6rlXc1IGttfNUVTt4Vmdz/fdZAhXgThc+fOUf1evXoVQx30++6773Iu/PDh + Q4RiasRfsW+4hVzMJYr/HBXzl8bS8FnLlqCCly+bHRmBQS5kZWRo1Iq5q6j/kvMSYWvXQL+L49Yt2bB+ + afyGiE3xkYkbVyaTLLEqLSV6CyS8JTY7AxLesG1rQv62jQV5m4sKoeKUUmLHWyrLyOtqqyuyIOS66q11 + NbnQckM968skYxQ2Nxa1kFK486upaAgWbks1+zzXQb558yYixO3bt99nrx9JLZgGCe4SfHBhKmEVI/5P + UzF/aayOQmyYv2b1gpjohbFrwtatXbR+rVK8ccs2xkdu3hiZuGlF8uaoVOg3GfqNydhCskQOceG4bTnx + ebnIxZsK8xKLqYpLiIoryKtr4cgZNZVZNZXZddU5SBc7aomWd9RtY7Wc34Txj7rzf4KiYbUXf8x1kCFe + RAi+fmHBXJBQceH/ZAmrLI2NG5ZtSojYnLA8cWNk0iZMcTBfVrww39Q16akxmelrszJiczLXbc1az7rw + hvzchIJtG4vyNxcXIBcnbS9OKStBpZHX1ZamV5anV8GRKzNrq5AuiJZRVMsNdag8pTv/hykaVvujroPM + 91++fqmEod/fJdzv0khPjc5Ii87YsiZzy5qs9LXZGcgPsax44b/Egql+C/I2FRdAwokl5BWJSaXF5EW1 + ZcSOU1k73gI7plftUGi5WqHl+pqtqN8VTd79DYu6LTRLJzcqW9gup1yEBxXxcv77u36fZ2nkEtnG5W3d + gMrPjS/YllDAXleILaLikkIU4gR9gXhK2fYU1osVV+0gWuZdgYZkjCrk5d8VraZovmCpZlVki6WiXCzF + 3fT7eu6lUZi3EUUlzIqXFO914YprHKCe55pKvyt6QEWzMUEhWCyFYtmluC9+Xz/H0uAkrHJ1A2X1fwWa + 3xX9oxWtAP77+oXXz3CVsN8V/buiX6D1u6J/V/SrtX5X9O+KfrXW74r+XdGv0vq///v/AT08VKulG+4s + AAAAAElFTkSuQmCC + + + \ No newline at end of file diff --git a/WT-DMS/AboutBox1.vb b/WT-DMS/AboutBox1.vb new file mode 100644 index 0000000..905b8c0 --- /dev/null +++ b/WT-DMS/AboutBox1.vb @@ -0,0 +1,26 @@ +Public NotInheritable Class AboutBox1 + + Private Sub AboutBox1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + ' 设置此窗体的标题。 + Dim ApplicationTitle As String + If My.Application.Info.Title <> "" Then + ApplicationTitle = My.Application.Info.Title + Else + ApplicationTitle = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName) + End If + Me.Text = String.Format("关于 {0}", ApplicationTitle) + ' 初始化“关于”对话框显示的所有文字。 + ' TODO: 在项目的“应用程序”窗格中自定义此应用程序的程序集信息 + ' 属性对话框(在“项目”菜单下)。 + Me.LabelProductName.Text = My.Application.Info.ProductName + Me.LabelVersion.Text = String.Format("版本 {0}", My.Application.Info.Version.ToString) + Me.LabelCopyright.Text = My.Application.Info.Copyright + Me.LabelCompanyName.Text = My.Application.Info.CompanyName + Me.TextBoxDescription.Text = My.Application.Info.Description + End Sub + + Private Sub OKButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKButton.Click + Me.Close() + End Sub + +End Class diff --git a/WT-DMS/ApplicationEvents.vb b/WT-DMS/ApplicationEvents.vb new file mode 100644 index 0000000..5f28270 --- /dev/null +++ b/WT-DMS/ApplicationEvents.vb @@ -0,0 +1 @@ + \ No newline at end of file diff --git a/WT-DMS/CAccountManage.vb b/WT-DMS/CAccountManage.vb new file mode 100644 index 0000000..78cdc5c --- /dev/null +++ b/WT-DMS/CAccountManage.vb @@ -0,0 +1,158 @@ +Public Class CAccountManage + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "帐号表" + Public m_COLS_NAME() As String = { + "序号", + "帐号", + "密码", + "员工ID", + "登录", + "系统记录", + "用户管理", + "料号管理", + "原料库存管理", + "成品库存管理", + "BOM管理", + "供应商管理", + "ECN管理", + "公司管理", + "部门管理", + "仓库管理", + "库位管理", + "财务管理" + } + + Public Enum COLS + 序号 + 帐号 + 密码 + 员工ID + 登录 + 系统记录 + 用户管理 + 料号管理 + 原料库存管理 + 成品库存管理 + BOM管理 + 供应商管理 + ECN管理 + 公司管理 + 部门管理 + 仓库管理 + 库位管理 + 财务管理 + max + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + + Public Sub New() + End Sub + + 'Public Function AddItem(ByVal AccountName As String, ByVal Password As String, ByVal right As Integer, ByVal EmployeeID As Integer) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + ' '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + ' Dim strSql As String = "INSERT INTO " & cst_TABLE_NAME & "(" + ' '加入列名 + ' For i As Integer = 0 To m_COLS_NAME.Length - 1 + ' If i > 0 Then + ' strSql &= "," + ' End If + ' strSql &= "[" & m_COLS_NAME(i) & "]" + ' Next + ' strSql &= ") VALUES (" + ' strSql &= "'" & Password & "'" + ' strSql &= "," & right + ' strSql &= "," & EmployeeID + ' strSql &= ")" + + ' If SQL_ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function UpdateItem(ByVal AccountName As String, ByVal Password As String, ByVal right As Integer, ByVal EmployeeID As Integer) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + + ' Dim strSql As String = "UPDATE " & cst_TABLE_NAME & " SET" + ' strSql &= " " & m_COLS_NAME(COLS.密码) & "=" & Password + ' strSql &= ", " & m_COLS_NAME(COLS.权限) & "=" & right + ' strSql &= ", " & m_COLS_NAME(COLS.员工ID) & "=" & EmployeeID + ' strSql &= " WHERE " + ' strSql &= m_COLS_NAME(COLS.帐号) & "=" & AccountName + + ' If SQL_ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function DeleteItem(ByVal AccountName As String) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + + ' Dim strSql As String = "DELETE FROM " & cst_TABLE_NAME & " WHERE " + ' strSql &= m_COLS_NAME(0) & "=" & AccountName + + ' If SQL_ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + Public Function QueryItem(ByVal AccountName As String, ByRef Password As String, ByRef EmployeeID As Integer, ByRef right() As String) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + 'SELECT * FROM `帐号表` WHERE `帐号`='tony' + Dim strSql As String = "SELECT * FROM `" & cst_TABLE_NAME & "` WHERE " + 'strSql &= "`" & m_COLS_NAME(COLS.帐号) & "` COLLATE utf8_general_ci ='" & AccountName & "'" + strSql &= "`" & m_COLS_NAME(COLS.帐号) & "` ='" & AccountName & "'" + 'Dim strSql As String = "SELECT * FROM `帐号表`" + + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.用户管理, strSql, rTable) = True Then + Try + If rTable.Rows.Count > 0 Then + Password = rTable.Rows(0).Item(COLS.密码) + EmployeeID = rTable.Rows(0).Item(COLS.员工ID) + right(COL_RIGHTS.登录) = rTable.Rows(0).Item(COLS.登录) + right(COL_RIGHTS.系统记录) = rTable.Rows(0).Item(COLS.系统记录) + right(COL_RIGHTS.用户管理) = rTable.Rows(0).Item(COLS.用户管理) + right(COL_RIGHTS.料号管理) = rTable.Rows(0).Item(COLS.料号管理) + right(COL_RIGHTS.原料库存管理) = rTable.Rows(0).Item(COLS.原料库存管理) + right(COL_RIGHTS.成品库存管理) = rTable.Rows(0).Item(COLS.成品库存管理) + right(COL_RIGHTS.BOM管理) = rTable.Rows(0).Item(COLS.BOM管理) + right(COL_RIGHTS.供应商管理) = rTable.Rows(0).Item(COLS.供应商管理) + right(COL_RIGHTS.ECN管理) = rTable.Rows(0).Item(COLS.ECN管理) + right(COL_RIGHTS.公司管理) = rTable.Rows(0).Item(COLS.公司管理) + right(COL_RIGHTS.部门管理) = rTable.Rows(0).Item(COLS.部门管理) + right(COL_RIGHTS.仓库管理) = rTable.Rows(0).Item(COLS.仓库管理) + right(COL_RIGHTS.库位管理) = rTable.Rows(0).Item(COLS.库位管理) + right(COL_RIGHTS.财务管理) = rTable.Rows(0).Item(COLS.财务管理) + Return ERROR_CODE.SUCCESS + End If + Catch ex As Exception + + End Try + + End If + + Return ERROR_CODE.ACCESS + End Function +End Class + + diff --git a/WT-DMS/CBOM.vb b/WT-DMS/CBOM.vb new file mode 100644 index 0000000..d36d99a --- /dev/null +++ b/WT-DMS/CBOM.vb @@ -0,0 +1,184 @@ +Public Class CBOM + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "BOM" + Dim m_COLS_NAME() As String = { + "序号", + "BOM阶层", + "料号PN", + "单位", + "用量", + "使用位置", + "使用备注" + } + + Private Enum COLS + 序号 + BOM阶层 + 料号PN + 单位 + 用量 + 使用位置 + 使用备注 + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + + Public Sub New() + End Sub + + Public Function CreateNew(ByVal BOM_ID As String) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"DEFAULT CHARACTER SET gbk COLLATE gbk_chinese_ci " & + Dim strSql As String = "CREATE TABLE " & "BOM_" & BOM_ID & " " & + "(" & + "序号 int(11) NOT NULL UNIQUE PRIMARY KEY AUTO_INCREMENT," & + "BOM阶层 int(11) NOT NULL," & + "料号PN varchar(16) NOT NULL," & + "单位 varchar(20)," & + "用量 double NOT NULL DEFAULT 0," & + "使用位置 text," & + "使用备注 text" & + ") " & + "DEFAULT CHARACTER SET gbk;" + + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + ''查询指定列的总条数 + 'Public Function QueryColumeItemCount(ByVal BOM_ID As String, ByRef rCount As Long) As Boolean + ' rCount = 0 + + ' Dim strSql As String = "SELECT COUNT(" & m_COLS_NAME(0) & ") FROM '" & cst_TABLE_NAME & "-" & BOM_ID & "'" + ' Dim rTable As New System.Data.DataTable + ' If SQL_Query(strSql, rTable) = True Then + ' rCount = rTable.Rows(0).Item(1) + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function AddItem(ByVal BOM阶层 As String, _ + ' ByVal 料号PN As String, _ + ' ByVal 单位 As String, _ + ' ByVal 用量 As Integer, _ + ' ByVal 使用位置 As String, _ + ' ByVal 使用备注 As String) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + ' '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + ' Dim strSql As String = "INSERT INTO " & cst_TABLE_NAME & "(" + ' '加入列名 + ' For i As Integer = 0 To m_COLS_NAME.Length - 1 + ' If i > 0 Then + ' strSql &= "," + ' End If + ' strSql &= "[" & m_COLS_NAME(i) & "]" + ' Next + ' strSql &= ") VALUES (" + ' strSql &= "'" & 入库单PN & "'" + ' strSql &= "'" & BOM阶层 & "'" + ' strSql &= "'" & 料号PN & "'" + ' strSql &= "'" & 单位 & "'" + ' strSql &= "'" & 用量 & "'" + ' strSql &= "'" & 使用位置 & "'" + ' strSql &= "'" & 使用备注 & "'" + ' strSql &= ")" + + ' If SQL_ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function UpdateItem(ByVal 入库单PN As String, _ + ' ByVal 入库日期 As String, _ + ' ByVal 入库时间 As String, _ + ' ByVal 入库数量 As Integer, _ + ' ByVal 单价 As String, _ + ' ByVal 总金额 As String, _ + ' ByVal 操作员ID As String, _ + ' ByVal 料号PN As String, _ + ' ByVal 供应商ID As String) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + + ' Dim strSql As String = "UPDATE " & cst_TABLE_NAME & " SET" + ' strSql &= ", " & m_COLS_NAME(COLS.入库日期) & "=" & 入库日期 + ' strSql &= ", " & m_COLS_NAME(COLS.入库时间) & "=" & 入库时间 + ' strSql &= " " & m_COLS_NAME(COLS.入库数量) & "=" & 入库数量 + ' strSql &= ", " & m_COLS_NAME(COLS.单价) & "=" & 单价 + ' strSql &= ", " & m_COLS_NAME(COLS.总金额) & "=" & 总金额 + ' strSql &= ", " & m_COLS_NAME(COLS.操作员ID) & "=" & 操作员ID + ' strSql &= ", " & m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + ' strSql &= ", " & m_COLS_NAME(COLS.供应商ID) & "=" & 供应商ID + ' strSql &= " WHERE " + ' strSql &= m_COLS_NAME(COLS.入库单PN) & "=" & 入库单PN + + ' If SQL_ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function DeleteItem(ByVal 入库单PN As String) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + + ' Dim strSql As String = "DELETE FROM " & cst_TABLE_NAME & " WHERE " + ' strSql &= m_COLS_NAME(COLS.入库单PN) & "=" & 入库单PN + + ' If SQL_ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function QueryItem(ByVal 入库单PN As String, _ + ' ByRef 入库日期 As String, _ + ' ByRef 入库时间 As String, _ + ' ByRef 入库数量 As Integer, _ + ' ByRef 单价 As String, _ + ' ByRef 总金额 As String, _ + ' ByRef 操作员ID As String, _ + ' ByRef 料号PN As String, _ + ' ByRef 供应商ID As String) As ERROR_CODE + ' If CBool(m_AccessRight And RIGHTS.READ) = False Then + ' Return ERROR_CODE.NORIGHT + ' End If + + ' Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + ' strSql &= m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + + ' Dim rTable As New System.Data.DataTable + ' If SQL_Query(strSql, rTable) = True Then + ' 入库日期 = rTable.Rows(0).Item(1) + ' 入库时间 = rTable.Rows(0).Item(2) + ' 入库数量 = rTable.Rows(0).Item(3) + ' 单价 = rTable.Rows(0).Item(4) + ' 总金额 = rTable.Rows(0).Item(5) + ' 操作员ID = rTable.Rows(0).Item(6) + ' 料号PN = rTable.Rows(0).Item(7) + ' 供应商ID = rTable.Rows(0).Item(8) + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function +End Class diff --git a/WT-DMS/CBackupManage.vb b/WT-DMS/CBackupManage.vb new file mode 100644 index 0000000..32df482 --- /dev/null +++ b/WT-DMS/CBackupManage.vb @@ -0,0 +1,36 @@ +Public Class CBackupManage + Public Const cst_TABLE_NAME As String = "备份记录表" + Public Shared m_COLS_NAME() As String = { + "序号", + "备份时间" + } + + Public Enum COLS + 序号 + 备份时间 + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + Public Sub New() + End Sub + + Public Function SetBackupTime(ByVal timeString As String) As Boolean + Dim strSql As String = "UPDATE " & cst_TABLE_NAME & " SET " & m_COLS_NAME(COLS.备份时间) & "=" & timeString & " WHERE " & m_COLS_NAME(COLS.序号) & "=" & "1" + + return SQL_ExeCommand(COL_RIGHTS.BOM管理, strSql) + End Function + + Public Function GetBackupTime(ByRef timeString As String) As Boolean + Dim strSql As String = "SELECT " & m_COLS_NAME(COLS.备份时间) & " FROM " & cst_TABLE_NAME & " WHERE " & m_COLS_NAME(COLS.序号) & "=" & "1" + + Dim r_Table As New DataTable + If SQL_Query(COL_RIGHTS.BOM管理, strSql, r_Table) = True Then + timeString = r_Table.Rows(0).Item(0) + Return True + End If + Return False + End Function + +End Class diff --git a/WT-DMS/CCompanyManage.vb b/WT-DMS/CCompanyManage.vb new file mode 100644 index 0000000..74e8d2c --- /dev/null +++ b/WT-DMS/CCompanyManage.vb @@ -0,0 +1,37 @@ +Public Class CCompanyManage + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "CompanyManageTable" + Dim m_COLS_NAME() As String = {"公司ID", "公司名称", "注册日期", "公司地址"} + Private Enum COLS + 公司ID + 公司名称 + 注册日期 + 公司地址 + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + Public Sub New() + End Sub + + Private Function QueryItem(ByVal CopID As String, ByRef CopName As String, ByRef CopDate As String, ByRef CopAddress As String) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.公司ID) & "=" & CopID + + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.公司管理, strSql, rTable) = True Then + CopName = rTable.Rows(0).Item(1) + CopDate = rTable.Rows(0).Item(2) + CopAddress = rTable.Rows(0).Item(3) + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CDepartmentManage.vb b/WT-DMS/CDepartmentManage.vb new file mode 100644 index 0000000..2bffb29 --- /dev/null +++ b/WT-DMS/CDepartmentManage.vb @@ -0,0 +1,38 @@ +Public Class CDepartmentManage + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "DepartmentManageTable" + Dim m_COLS_NAME() As String = {"部门ID", "负责人ID", "部门地址", "联系方式"} + Private Enum COLS + 部门ID + 负责人ID + 部门地址 + 联系方式 + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + + Public Sub New() + End Sub + + Private Function QueryItem(ByVal departID As String, ByRef HeaderID As Integer, ByRef departAddress As String, ByRef departLink As String) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.部门ID) & "=" & departID + + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.部门管理, strSql, rTable) = True Then + HeaderID = rTable.Rows(0).Item(1) + departAddress = rTable.Rows(0).Item(2) + departLink = rTable.Rows(0).Item(3) + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CEmployeeManage.vb b/WT-DMS/CEmployeeManage.vb new file mode 100644 index 0000000..a883e93 --- /dev/null +++ b/WT-DMS/CEmployeeManage.vb @@ -0,0 +1,3 @@ +Public Class CEmployeeManage + +End Class diff --git a/WT-DMS/CGirdInfo.vb b/WT-DMS/CGirdInfo.vb new file mode 100644 index 0000000..01946b9 --- /dev/null +++ b/WT-DMS/CGirdInfo.vb @@ -0,0 +1,173 @@ +Imports System.IO +Public Class CGirdInfo + Public Shared LoadBusy As Boolean = False + + Public Shared Function SaveGirdInfo(ByVal gridName As String, ByRef grid As FlexCell.Grid) As Boolean + If LoadBusy = True Then Return False + + Dim strPath As String = Application.StartupPath & "\GRID" + If System.IO.Directory.Exists(strPath) = False Then + System.IO.Directory.CreateDirectory(strPath) + End If + + If System.IO.Directory.Exists(strPath) = True Then + strPath &= "\" & gridName & ".ini" + + Dim fs As New StreamWriter(strPath, False, System.Text.Encoding.Default) + '保存列宽 + For col As Integer = 0 To grid.Cols - 1 + fs.WriteLine("C" & col & "=" & grid.Column(col).Width) + Next + 'For row As Integer = 0 To grid.Rows - 1 + ' fs.Write("R" & row & "=" & grid.Row(row).Height) + 'Next + fs.Close() + End If + + Return True + End Function + + Public Shared Function LoadGridInfo(ByVal gridName As String, ByRef grid As FlexCell.Grid) As Boolean + LoadBusy = True + + Dim strPath As String = Application.StartupPath & "\GRID\" & gridName & ".ini" + If System.IO.File.Exists(strPath) = True Then + Dim fs As New StreamReader(strPath, System.Text.Encoding.Default) + Dim strLine As String = "" + Dim strSplit() As String + Dim colNum As Integer = 0 + Dim widthNum As Integer = 0 + + While fs.EndOfStream = False + strLine = fs.ReadLine() + If Not strLine Is Nothing AndAlso strLine.Length > 0 Then + strSplit = Split(strLine, "=") + If strSplit.Length >= 2 Then + Try + colNum = Strings.Mid(strSplit(0), 2) + widthNum = strSplit(1) + grid.Column(colNum).Width = widthNum + Catch ex As Exception + End Try + End If + End If + End While + + fs.Close() + End If + + LoadBusy = False + Return True + End Function + + Public Shared Function SaveRecentList(ByVal saveName As String, ByRef RecentList As System.Windows.Forms.AutoCompleteStringCollection) As Boolean + Dim strPath As String = Application.StartupPath & "\GRID" + If System.IO.Directory.Exists(strPath) = False Then + System.IO.Directory.CreateDirectory(strPath) + End If + + If System.IO.Directory.Exists(strPath) = True Then + strPath &= "\" & saveName & ".ini" + + Dim fs As New StreamWriter(strPath, False, System.Text.Encoding.Default) + For Each pItem As String In RecentList + fs.WriteLine(pItem) + Next + fs.Close() + End If + + Return True + End Function + + Public Shared Function LoadRecentList(ByVal saveName As String, ByRef RecentList As System.Windows.Forms.AutoCompleteStringCollection) As Boolean + RecentList.Clear() + + Dim strPath As String = Application.StartupPath & "\GRID\" & saveName & ".ini" + If System.IO.File.Exists(strPath) = True Then + Dim fs As New StreamReader(strPath, System.Text.Encoding.Default) + Dim strLine As String = "" + + While fs.EndOfStream = False + strLine = fs.ReadLine() + If Not strLine Is Nothing AndAlso strLine.Length > 0 Then + RecentList.Add(strLine) + End If + End While + + fs.Close() + End If + + Return True + End Function + + Public Shared Function AddToRecentList(ByVal newItem As String, ByRef RecentList As System.Windows.Forms.AutoCompleteStringCollection) As Boolean + If newItem Is Nothing OrElse newItem.Length = 0 Then Return False + + Dim upperItem As String = newItem.ToLower + Dim isExist As Boolean = False + For Each pItem As String In RecentList + If upperItem = pItem.ToLower Then + isExist = True + Exit For + End If + Next + + If isExist = False Then + RecentList.Insert(0, newItem) + Return True + End If + + Return False + End Function + + + Public Class SUB_LIST_INFO + Public name As String = "" + Public list As New System.Windows.Forms.AutoCompleteStringCollection + End Class + Public Shared Function LoadRecentSubList(ByVal parentName As String, ByRef subList As ArrayList) As Boolean + Dim m_ParentList As New System.Windows.Forms.AutoCompleteStringCollection + If LoadRecentList(parentName, m_ParentList) = True Then + For Each pItem As String In m_ParentList + Dim mSubListItem As New SUB_LIST_INFO + mSubListItem.name = parentName & "_" & pItem + LoadRecentList(mSubListItem.name, mSubListItem.list) + subList.Add(mSubListItem) + Next + End If + + Return True + End Function + + Public Shared Function SaveRecentSubList(ByRef subList As ArrayList) As Boolean + For Each pItem As SUB_LIST_INFO In subList + SaveRecentList(pItem.name, pItem.list) + Next + + Return True + End Function + + Public Shared Function AddToRecentSubList(ByVal parentName As String, ByVal subName As String, ByVal addItem As String, ByRef subList As ArrayList) As Boolean + Dim addListName As String = parentName & "_" & subName + For Each pItem As SUB_LIST_INFO In subList + If pItem.name = addListName Then + AddToRecentList(addItem, pItem.list) + End If + Next + + Return True + End Function + + Public Shared Function GetRecentSubList(ByVal parentName As String, ByVal subName As String, ByRef subList As ArrayList, ByRef RecentList As System.Windows.Forms.AutoCompleteStringCollection) As Boolean + Dim subItemName As String = parentName & "_" & subName + RecentList = Nothing + + For Each pItem As SUB_LIST_INFO In subList + If pItem.name = subItemName Then + RecentList = pItem.list + End If + Next + + Return True + End Function +End Class diff --git a/WT-DMS/CLogManage.vb b/WT-DMS/CLogManage.vb new file mode 100644 index 0000000..2f6ebc6 --- /dev/null +++ b/WT-DMS/CLogManage.vb @@ -0,0 +1,132 @@ +Public Class CLogManage + 'Dim m_SQL As New CMSQL_Interface + + Public Const cst_TABLE_NAME As String = "系统记录表" + Public Shared m_COLS_NAME() As String = { + "序号", + "日期", + "时间", + "操作对象", + "操作内容", + "帐号", + "PC名称", + "IP地址"} + Public Enum COLS + 序号 + 日期 + 时间 + 操作对象 + 操作内容 + 帐号 + PC名称 + IP地址 + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + Public Sub New() + End Sub + + Public Function AddItem(ByVal 操作对象 As String, + ByVal 操作内容 As String, + ByVal 帐号 As String + ) As ERROR_CODE + 'If CBool(AccessRight And RIGHTS.WRITE) = False Then + ' Return ERROR_CODE.NORIGHT + 'End If + + Dim 时间 As Date = Now + Dim PC名称 As String = My.Computer.Name + Dim IP地址 As String = GetLocalIPAddress() + + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "`(" + '加入列名 + For i As Integer = 1 To m_COLS_NAME.Length - 1 + If i > 1 Then + strSql &= "," + End If + strSql &= "`" & m_COLS_NAME(i) & "`" + Next + strSql &= ") VALUES (" + strSql &= "'" & 时间.ToString("yyyy-MM-dd") & "'" + strSql &= ",'" & 时间.ToString("HH:mm:ss") & "'" + strSql &= $",'{操作对象}'" '", @objName" + strSql &= $",'{操作内容}'" '", @objContent" + strSql &= ",'" & 帐号 & "'" + strSql &= ",'" & PC名称 & "'" + strSql &= ",'" & IP地址 & "'" + strSql &= ")" + + Dim paramName() As String = {操作对象, 操作内容} + Dim paramValue() As Object = {操作对象, 操作内容} + If m_SQL.ExeCommandWithParamters(strSql, paramName, paramValue) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + 'Public Function DeleteItem(ByVal index As Long) As ERROR_CODE + ' 'If CBool(AccessRight And RIGHTS.WRITE) = False Then + ' ' Return ERROR_CODE.NORIGHT + ' 'End If + + ' Dim strSql As String = "DELETE FROM " & cst_TABLE_NAME & " WHERE " + ' strSql &= m_COLS_NAME(COLS.序号) & "=" & index + + ' If m_SQL.ExeCommand(strSql) = True Then + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + 'Public Function QueryItem(ByVal index As Long, + ' ByRef 时间 As Date, + ' ByRef 操作对象 As String, + ' ByRef 操作内容 As String, + ' ByRef 帐号 As String, + ' ByRef PC名称 As String, + ' ByRef IP地址 As String) As ERROR_CODE + ' 'If CBool(AccessRight And RIGHTS.READ) = False Then + ' ' Return ERROR_CODE.NORIGHT + ' 'End If + + ' Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + ' strSql &= m_COLS_NAME(COLS.序号) & "=" & index + + ' Dim rValue(0) As Object + ' If m_SQL.DataReader(strSql, rValue) = True Then + ' 时间 = rValue(COLS.时间) + ' 操作对象 = rValue(COLS.操作对象) + ' 操作内容 = rValue(COLS.操作内容) + ' 帐号 = rValue(COLS.帐号) + ' PC名称 = rValue(COLS.PC名称) + ' IP地址 = rValue(COLS.IP地址) + ' Return ERROR_CODE.SUCCESS + ' End If + + ' Return ERROR_CODE.ACCESS + 'End Function + + Public Function GetLogCounts(ByRef Count As Long) As Boolean + 'If CBool(AccessRight And RIGHTS.READ) = False Then + ' Return ERROR_CODE.NORIGHT + 'End If + + 'SELECT COUNT(22) FROM [TABLE1] + Dim strSql As String = "SELECT COUNT(" & m_COLS_NAME(COLS.序号) & ") FROM " & cst_TABLE_NAME + + Dim rTable As New System.Data.DataTable + If m_SQL.Query(strSql, rTable) = True Then + Try + Count = rTable.Rows(0).Item(0) + Return ERROR_CODE.SUCCESS + Catch ex As Exception + End Try + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CMSQL_Interface.vb b/WT-DMS/CMSQL_Interface.vb new file mode 100644 index 0000000..41609d0 --- /dev/null +++ b/WT-DMS/CMSQL_Interface.vb @@ -0,0 +1,208 @@ +Imports MySql.Data.MySqlClient +Public Class CMSQL_Interface + Dim m_SqlConn As MySqlConnection = Nothing + Dim m_SqlAdapter As MySqlDataAdapter + Dim m_DTable As New DataTable + Dim m_BaseName As String = "" + Public Function ConnectionSetting(ByVal strHostIp As String, ByVal DataBaseName As String, ByVal user As String, ByVal password As String) As Boolean + If m_SqlConn Is Nothing Then + m_SqlConn = New MySqlConnection + Else + m_SqlConn.Close() + End If + + Dim str As String = "server=" & strHostIp & ";database=" & DataBaseName & ";uid=" & user & ";pwd=" & password & ";SslMode=none;CharSet=utf8mb4;PORT=3307" + m_SqlConn.ConnectionString = str + + m_BaseName = DataBaseName + Return (True) + End Function + + Public Function Query(ByVal strQuery As String, ByRef r_Table As DataTable) As Boolean + Dim Result As Boolean = False + Try + m_SqlConn.Open() + m_SqlAdapter = New MySqlDataAdapter(strQuery, m_SqlConn) + r_Table.Clear() + m_SqlAdapter.Fill(r_Table) + + Result = True + Catch ex As Exception + Dim msg = ex.Message + End Try + + Try + m_SqlConn.Close() + Catch ex As Exception + End Try + + Return Result + End Function + + Public Function Update(ByRef upTable As DataTable) As Boolean + Dim Result As Boolean = True + Dim myCommandBuilder As New MySql.Data.MySqlClient.MySqlCommandBuilder(m_SqlAdapter) + + m_SqlAdapter.DeleteCommand = myCommandBuilder.GetDeleteCommand + m_SqlAdapter.UpdateCommand = myCommandBuilder.GetUpdateCommand + m_SqlAdapter.InsertCommand = myCommandBuilder.GetInsertCommand + + Try + m_SqlAdapter.Update(upTable) + Catch ex As Exception + Result = False + End Try + myCommandBuilder.Dispose() + + Return Result + End Function + + 'Public Function Query(ByVal strQuery As String, ByVal colName As String, ByRef r_DataSet As DataSet) As Boolean + ' Dim Result As Boolean = False + ' Try + ' m_SqlConn.Open() + ' Dim daAdapter As MySqlDataAdapter = New MySqlDataAdapter(strQuery, m_SqlConn) + ' daAdapter.Fill(r_DataSet, colName) + + ' Result = True + ' Catch ex As Exception + ' End Try + + ' Try + ' m_SqlConn.Close() + ' Catch ex As Exception + ' End Try + + ' Return Result + 'End Function + + Public Function ExeCommand(ByVal strExe As String) As Boolean + Dim Result As Boolean = False + Dim myCommand As MySqlCommand = Nothing + Try + m_SqlConn.Open() + myCommand = New MySqlCommand(strExe, m_SqlConn) + myCommand.ExecuteNonQuery() + Result = True + Catch ex As Exception + Dim msg = ex.Message + End Try + + Try + myCommand.Dispose() + Catch ex As Exception + End Try + Try + m_SqlConn.Close() + Catch ex As Exception + End Try + + Return Result + End Function + + + Public Function ExeCommandWithParamters(ByVal strExe As String, ByRef ParamName() As String, ByRef ParamValue() As Object) As Boolean + Dim Result As Boolean = False + Dim myCommand As MySqlCommand = Nothing + Try + m_SqlConn.Open() + myCommand = New MySqlCommand(strExe, m_SqlConn) + For i As Integer = 0 To ParamName.Length - 1 + myCommand.Parameters.AddWithValue(ParamName(i), ParamValue(i)) + Next + + myCommand.ExecuteNonQuery() + Result = True + Catch ex As Exception + End Try + + Try + myCommand.Dispose() + Catch ex As Exception + End Try + Try + m_SqlConn.Close() + Catch ex As Exception + End Try + + Return Result + End Function + + Public Function DataReader(ByVal strSelect As String, ByRef valueTable() As Object) As Boolean + Dim Result As Boolean = False + Dim myCommand As MySqlCommand = Nothing + Try + m_SqlConn.Open() + myCommand = New MySqlCommand(strSelect, m_SqlConn) + Dim rData As MySql.Data.MySqlClient.MySqlDataReader + rData = myCommand.ExecuteReader(System.Data.CommandBehavior.CloseConnection) + rData.Read() + + Dim objArray(rData.FieldCount - 1) As Object + For i As Integer = 0 To rData.FieldCount - 1 + objArray(i) = rData.Item(i) + Next + + valueTable = objArray + + Result = True + Catch ex As Exception + End Try + + Try + myCommand.Dispose() + Catch ex As Exception + End Try + Try + m_SqlConn.Close() + Catch ex As Exception + End Try + + Return Result + End Function + + Public Function TransactionExeCommand(ByVal strExe As String) As String + Dim Result As String = "" + Dim myCommand As MySqlCommand = Nothing + Try + m_SqlConn.Open() + myCommand = New MySqlCommand(strExe, m_SqlConn) + myCommand.ExecuteNonQuery() + 'myCommand.Transaction.Commit() + 'Result = True + Catch ex As Exception + Try + myCommand.Transaction.Rollback() + myCommand.Dispose() + m_SqlConn.Close() + Catch ex1 As Exception + + End Try + + Result = ex.Message + Return Result + End Try + + Try + myCommand.Dispose() + m_SqlConn.Close() + Catch ex As Exception + End Try + + + Return Result + End Function + + + 'Public Function Insert(ByVal strInsert As String) As Boolean + ' Return ExeCommand(strInsert) + 'End Function + + 'Public Function Update(ByVal strUpdate As String) As Boolean + ' Return ExeCommand(strUpdate) + 'End Function + + 'Public Function Delete(ByVal strDelete As String) As Boolean + ' Return ExeCommand(strDelete) + 'End Function +End Class diff --git a/WT-DMS/CMaterialIn.vb b/WT-DMS/CMaterialIn.vb new file mode 100644 index 0000000..7e1d27b --- /dev/null +++ b/WT-DMS/CMaterialIn.vb @@ -0,0 +1,161 @@ +Public Class CMaterialIn + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "MaterialInTable" + Dim m_COLS_NAME() As String = { + "入库单PN", + "入库日期", + "入库时间", + "入库数量", + "单价", + "总金额", + "操作员ID", + "料号PN", + "供应商ID"} + + Private Enum COLS + 入库单PN + 入库日期 + 入库时间 + 入库数量 + 单价 + 总金额 + 操作员ID + 料号PN + 供应商ID + End Enum + + '权限 + Private m_AccessRight As Integer = RIGHTS.NONE + Public Property AccessRight() As Integer + Get + Return m_AccessRight + End Get + Set(ByVal value As Integer) + m_AccessRight = value + End Set + End Property + + + Public Sub New() + End Sub + + Public Function AddItem(ByVal 入库单PN As String, _ + ByVal 入库日期 As String, _ + ByVal 入库时间 As String, _ + ByVal 入库数量 As Integer, _ + ByVal 单价 As String, _ + ByVal 总金额 As String, _ + ByVal 操作员ID As String, _ + ByVal 料号PN As String, _ + ByVal 供应商ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO " & cst_TABLE_NAME & "(" + '加入列名 + For i As Integer = 0 To m_COLS_NAME.Length - 1 + If i > 0 Then + strSql &= "," + End If + strSql &= "[" & m_COLS_NAME(i) & "]" + Next + strSql &= ") VALUES (" + strSql &= "'" & 入库单PN & "'" + strSql &= "'" & 入库日期 & "'" + strSql &= "'" & 入库时间 & "'" + strSql &= "'" & 入库数量 & "'" + strSql &= "'" & 单价 & "'" + strSql &= "'" & 总金额 & "'" + strSql &= "'" & 操作员ID & "'" + strSql &= "'" & 料号PN & "'" + strSql &= "'" & 供应商ID & "'" + strSql &= ")" + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function UpdateItem(ByVal 入库单PN As String, _ + ByVal 入库日期 As String, _ + ByVal 入库时间 As String, _ + ByVal 入库数量 As Integer, _ + ByVal 单价 As String, _ + ByVal 总金额 As String, _ + ByVal 操作员ID As String, _ + ByVal 料号PN As String, _ + ByVal 供应商ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "UPDATE " & cst_TABLE_NAME & " SET" + strSql &= ", " & m_COLS_NAME(COLS.入库日期) & "=" & 入库日期 + strSql &= ", " & m_COLS_NAME(COLS.入库时间) & "=" & 入库时间 + strSql &= " " & m_COLS_NAME(COLS.入库数量) & "=" & 入库数量 + strSql &= ", " & m_COLS_NAME(COLS.单价) & "=" & 单价 + strSql &= ", " & m_COLS_NAME(COLS.总金额) & "=" & 总金额 + strSql &= ", " & m_COLS_NAME(COLS.操作员ID) & "=" & 操作员ID + strSql &= ", " & m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + strSql &= ", " & m_COLS_NAME(COLS.供应商ID) & "=" & 供应商ID + strSql &= " WHERE " + strSql &= m_COLS_NAME(COLS.入库单PN) & "=" & 入库单PN + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function DeleteItem(ByVal 入库单PN As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "DELETE FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.入库单PN) & "=" & 入库单PN + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryItem(ByVal 入库单PN As String, _ + ByRef 入库日期 As String, _ + ByRef 入库时间 As String, _ + ByRef 入库数量 As Integer, _ + ByRef 单价 As String, _ + ByRef 总金额 As String, _ + ByRef 操作员ID As String, _ + ByRef 料号PN As String, _ + ByRef 供应商ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + + Dim rTable As New System.Data.DataTable + If SQL_Query(strSql, rTable) = True Then + 入库日期 = rTable.Rows(0).Item(1) + 入库时间 = rTable.Rows(0).Item(2) + 入库数量 = rTable.Rows(0).Item(3) + 单价 = rTable.Rows(0).Item(4) + 总金额 = rTable.Rows(0).Item(5) + 操作员ID = rTable.Rows(0).Item(6) + 料号PN = rTable.Rows(0).Item(7) + 供应商ID = rTable.Rows(0).Item(8) + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CMaterialInOut.vb b/WT-DMS/CMaterialInOut.vb new file mode 100644 index 0000000..d84a30f --- /dev/null +++ b/WT-DMS/CMaterialInOut.vb @@ -0,0 +1,132 @@ +Public Class CMaterialInOut + Dim m_SQL As New CSQLInterface + Public Shared cst_TABLE_NAME As String = "原料库存表" + + '=====================新增库位库存 + Public Shared m_COLS_NAME() As String = { + "序号", + "入库出库", + "料号PN", + "订单号", + "日期", + "时间", + "数量", + "操作员ID", + "仓库", + "库位", + "用途", + "库位库存"} + + Public Enum COLS + 序号 + 入库出库 + 料号PN + 订单号 + 日期 + 时间 + 数量 + 操作员ID + 仓库 + 库位 + 用途 + 库位库存 + max + End Enum + + '入库或者出库标志 + Private IsOutStore As Boolean = False + Public Property OutStore() As Boolean + Get + Return IsOutStore + End Get + Set(ByVal value As Boolean) + IsOutStore = value + End Set + End Property + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + + Public Sub New() + IsOutStore = False + End Sub + + Public Function AddItem(ByVal 入库出库 As Boolean, + ByVal 料号PN As String, + ByVal 订单号 As String, + ByVal 日期 As String, + ByVal 时间 As String, + ByVal 数量 As Integer, + ByVal 操作员ID As String, + ByVal 仓库 As String, + ByVal 库位 As String, + ByVal 用途 As String, + ByVal 库位库存 As Integer + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.入库出库 To m_COLS_NAME.Length - 1 + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "`" & m_COLS_NAME(i) & "`" + Next + strSql &= ") VALUES (" + strSql &= "'" & IIf(入库出库, 1, 0) & "'," + strSql &= "'" & 料号PN & "'," + strSql &= "'" & 订单号 & "'," + strSql &= "'" & 日期 & "'," + strSql &= "'" & 时间 & "'," + strSql &= "'" & 数量 & "'," + strSql &= "'" & 操作员ID & "'," + strSql &= "'" & 仓库 & "'," + strSql &= "'" & 库位 & "'," + strSql &= "'" & 用途 & "'," + strSql &= "'" & 库位库存 & "'" + strSql &= ")" + + If SQL_ExeCommand(COL_RIGHTS.原料库存管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryInformation(ByRef Count As Integer, ByRef minIndex As Integer, ByRef maxIndex As Integer + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT " & + "COUNT(`" & m_COLS_NAME(COLS.序号) & "`), " & + "MIN(`" & m_COLS_NAME(COLS.序号) & "`), " & + "MAX(`" & m_COLS_NAME(COLS.序号) & "`) " & + " FROM `" & cst_TABLE_NAME & "`" + + Dim rValueTable(0) As Object + If SQL_DataReader(COL_RIGHTS.原料库存管理, strSQL, rValueTable) = True Then + Try + Count = rValueTable(0) + minIndex = rValueTable(1) + maxIndex = rValueTable(2) + Return ERROR_CODE.SUCCESS + Catch ex As Exception + + End Try + End If + + Return ERROR_CODE.ACCESS + End Function + + +End Class diff --git a/WT-DMS/CMaterialManage.vb b/WT-DMS/CMaterialManage.vb new file mode 100644 index 0000000..8b229a4 --- /dev/null +++ b/WT-DMS/CMaterialManage.vb @@ -0,0 +1,158 @@ +Public Class CMaterialManage + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "MaterialManageTable" + Dim m_COLS_NAME() As String = {"料号PN", "仓库ID", "库位ID", "数量", "物料名称", "规格描述", "单位", "单重", "供应商ID", "图片"} + Private Enum COLS + 料号PN + 仓库ID + 库位ID + 数量 + 物料名称 + 规格描述 + 单位 + 单重 + 供应商ID + 图片ID + End Enum + + '权限 + Private m_AccessRight As Integer = RIGHTS.NONE + Public Property AccessRight() As Integer + Get + Return m_AccessRight + End Get + Set(ByVal value As Integer) + m_AccessRight = value + End Set + End Property + + + Public Sub New() + End Sub + + Public Function AddItem(ByVal 料号PN As String, _ + ByVal 仓库ID As String, _ + ByVal 库位ID As String, _ + ByVal 数量 As Integer, _ + ByVal 物料名称 As String, _ + ByVal 规格描述 As String, _ + ByVal 单位 As String, _ + ByVal 单重 As String, _ + ByVal 供应商ID As String, _ + ByVal 图片ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO " & cst_TABLE_NAME & "(" + '加入列名 + For i As Integer = 0 To m_COLS_NAME.Length - 1 + If i > 0 Then + strSql &= "," + End If + strSql &= "[" & m_COLS_NAME(i) & "]" + Next + strSql &= ") VALUES (" + strSql &= "'" & 料号PN & "'" + strSql &= "'" & 仓库ID & "'" + strSql &= "'" & 库位ID & "'" + strSql &= "'" & 数量 & "'" + strSql &= "'" & 物料名称 & "'" + strSql &= "'" & 规格描述 & "'" + strSql &= "'" & 单位 & "'" + strSql &= "'" & 单重 & "'" + strSql &= "'" & 供应商ID & "'" + strSql &= "'" & 图片ID & "'" + strSql &= ")" + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function UpdateItem(ByVal 料号PN As String, _ + ByVal 仓库ID As String, _ + ByVal 库位ID As String, _ + ByVal 数量 As Integer, _ + ByVal 物料名称 As String, _ + ByVal 规格描述 As String, _ + ByVal 单位 As String, _ + ByVal 单重 As String, _ + ByVal 供应商ID As String, _ + ByVal 图片ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "UPDATE " & cst_TABLE_NAME & " SET" + strSql &= " " & m_COLS_NAME(COLS.仓库ID) & "=" & 仓库ID + strSql &= ", " & m_COLS_NAME(COLS.库位ID) & "=" & 库位ID + strSql &= ", " & m_COLS_NAME(COLS.数量) & "=" & 数量 + strSql &= ", " & m_COLS_NAME(COLS.物料名称) & "=" & 物料名称 + strSql &= ", " & m_COLS_NAME(COLS.规格描述) & "=" & 规格描述 + strSql &= ", " & m_COLS_NAME(COLS.单位) & "=" & 单位 + strSql &= ", " & m_COLS_NAME(COLS.单重) & "=" & 单重 + strSql &= ", " & m_COLS_NAME(COLS.供应商ID) & "=" & 供应商ID + strSql &= ", " & m_COLS_NAME(COLS.图片ID) & "=" & 图片ID + strSql &= " WHERE " + strSql &= m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function DeleteItem(ByVal 料号PN As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "DELETE FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryItem(ByVal 料号PN As String, _ + ByRef 仓库ID As String, _ + ByRef 库位ID As String, _ + ByRef 数量 As Integer, _ + ByRef 物料名称 As String, _ + ByRef 规格描述 As String, _ + ByRef 单位 As String, _ + ByRef 单重 As String, _ + ByRef 供应商ID As String, _ + ByRef 图片ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + + Dim rTable As New System.Data.DataTable + If SQL_Query(strSql, rTable) = True Then + 仓库ID = rTable.Rows(0).Item(1) + 库位ID = rTable.Rows(0).Item(2) + 数量 = rTable.Rows(0).Item(3) + 物料名称 = rTable.Rows(0).Item(4) + 规格描述 = rTable.Rows(0).Item(5) + 单位 = rTable.Rows(0).Item(6) + 单重 = rTable.Rows(0).Item(7) + 供应商ID = rTable.Rows(0).Item(8) + 图片ID = rTable.Rows(0).Item(9) + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CMaterialOut.vb b/WT-DMS/CMaterialOut.vb new file mode 100644 index 0000000..fb6a357 --- /dev/null +++ b/WT-DMS/CMaterialOut.vb @@ -0,0 +1,162 @@ +Public Class CMaterialOut + Dim m_SQL As New CSQLInterface + + Const cst_TABLE_NAME As String = "MaterialOutTable" + Dim m_COLS_NAME() As String = { + "出库单PN", + "出库日期", + "出库时间", + "出库数量", + "单价", + "总金额", + "操作员ID", + "料号PN", + "供应商ID"} + + Private Enum COLS + 出库单PN + 出库日期 + 出库时间 + 出库数量 + 单价 + 总金额 + 操作员ID + 料号PN + 供应商ID + End Enum + + '权限 + Private m_AccessRight As Integer = RIGHTS.NONE + Public Property AccessRight() As Integer + Get + Return m_AccessRight + End Get + Set(ByVal value As Integer) + m_AccessRight = value + End Set + End Property + + + Public Sub New() + End Sub + + Public Function AddItem(ByVal 出库单PN As String, _ + ByVal 出库日期 As String, _ + ByVal 出库时间 As String, _ + ByVal 出库数量 As Integer, _ + ByVal 单价 As String, _ + ByVal 总金额 As String, _ + ByVal 操作员ID As String, _ + ByVal 料号PN As String, _ + ByVal 供应商ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO " & cst_TABLE_NAME & "(" + '加入列名 + For i As Integer = 0 To m_COLS_NAME.Length - 1 + If i > 0 Then + strSql &= "," + End If + strSql &= "[" & m_COLS_NAME(i) & "]" + Next + strSql &= ") VALUES (" + strSql &= "'" & 出库单PN & "'" + strSql &= "'" & 出库日期 & "'" + strSql &= "'" & 出库时间 & "'" + strSql &= "'" & 出库数量 & "'" + strSql &= "'" & 单价 & "'" + strSql &= "'" & 总金额 & "'" + strSql &= "'" & 操作员ID & "'" + strSql &= "'" & 料号PN & "'" + strSql &= "'" & 供应商ID & "'" + strSql &= ")" + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function UpdateItem(ByVal 出库单PN As String, _ + ByVal 出库日期 As String, _ + ByVal 出库时间 As String, _ + ByVal 出库数量 As Integer, _ + ByVal 单价 As String, _ + ByVal 总金额 As String, _ + ByVal 操作员ID As String, _ + ByVal 料号PN As String, _ + ByVal 供应商ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "UPDATE " & cst_TABLE_NAME & " SET" + strSql &= " " & m_COLS_NAME(COLS.出库日期) & "=" & 出库日期 + strSql &= ", " & m_COLS_NAME(COLS.出库时间) & "=" & 出库时间 + strSql &= ", " & m_COLS_NAME(COLS.出库数量) & "=" & 出库数量 + strSql &= ", " & m_COLS_NAME(COLS.单价) & "=" & 单价 + strSql &= ", " & m_COLS_NAME(COLS.总金额) & "=" & 总金额 + strSql &= ", " & m_COLS_NAME(COLS.操作员ID) & "=" & 操作员ID + strSql &= ", " & m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + strSql &= ", " & m_COLS_NAME(COLS.供应商ID) & "=" & 供应商ID + strSql &= " WHERE " + strSql &= m_COLS_NAME(COLS.出库单PN) & "=" & 出库单PN + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function DeleteItem(ByVal 出库单PN As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "DELETE FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.出库单PN) & "=" & 出库单PN + + If SQL_ExeCommand(strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryItem(ByVal 出库单PN As String, _ + ByVal 出库日期 As String, _ + ByVal 出库时间 As String, _ + ByVal 出库数量 As Integer, _ + ByVal 单价 As String, _ + ByVal 总金额 As String, _ + ByVal 操作员ID As String, _ + ByVal 料号PN As String, _ + ByVal 供应商ID As String) As ERROR_CODE + If CBool(m_AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSql &= m_COLS_NAME(COLS.料号PN) & "=" & 料号PN + + Dim rTable As New System.Data.DataTable + If SQL_Query(strSql, rTable) = True Then + 出库单PN = rTable.Rows(0).Item(1) + 出库日期 = rTable.Rows(0).Item(2) + 出库时间 = rTable.Rows(0).Item(3) + 出库数量 = rTable.Rows(0).Item(4) + 单价 = rTable.Rows(0).Item(5) + 总金额 = rTable.Rows(0).Item(6) + 操作员ID = rTable.Rows(0).Item(7) + 料号PN = rTable.Rows(0).Item(8) + 供应商ID = rTable.Rows(0).Item(9) + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CPartNumber.vb b/WT-DMS/CPartNumber.vb new file mode 100644 index 0000000..6270329 --- /dev/null +++ b/WT-DMS/CPartNumber.vb @@ -0,0 +1,349 @@ +Public Class CPartNumber + Dim m_SQL As New CSQLInterface + Public Shared cst_TABLE_NAME As String = "料号表" + Public Shared m_COLS_NAME() As String = { + "序号", + "料号PN", + "物料名称", + "规格描述", + "单位", + "单重", + "图片", + "供应商ID" + } + Public Enum COLS + 序号 + 料号PN + 物料名称 + 规格描述 + 单位 + 单重 + 图片 + 供应商ID + max + End Enum + + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + + Public Function AddItem(ByVal 料号PN As String, + ByVal 物料名称 As String, + ByVal 规格描述 As String, + ByVal 单位 As String, + ByVal 单重 As Double, + ByVal 供应商ID As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.料号PN To COLS.max - 1 + If i <> COLS.图片 Then + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + + strSql &= "`" & m_COLS_NAME(i) & "`" + End If + Next + strSql &= ") VALUES (" + strSql &= "'" & 料号PN & "'," + strSql &= "'" & 物料名称 & "'," + strSql &= "'" & 规格描述 & "'," + strSql &= "'" & 单位 & "'," + strSql &= "'" & 单重 & "'," + strSql &= "'" & 供应商ID & "'" + strSql &= ")" + + If SQL_ExeCommand(COL_RIGHTS.料号管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function AddItem(ByVal 料号PN As String, + ByVal 物料名称 As String, + ByVal 规格描述 As String, + ByVal 单位 As String, + ByVal 单重 As Double, + ByVal 图片() As Byte, + ByVal 供应商ID As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.料号PN To COLS.max - 1 + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "`" & m_COLS_NAME(i) & "`" + Next + strSql &= ") VALUES (" + strSql &= "'" & 料号PN & "'," + strSql &= "'" & 物料名称 & "'," + strSql &= "'" & 规格描述 & "'," + strSql &= "'" & 单位 & "'," + strSql &= "'" & 单重 & "'," + strSql &= "@pic," + strSql &= "'" & 供应商ID & "'" + strSql &= ")" + + Dim ParamName() As String = {"@pic"} + Dim ParamValue() As Object = {图片} + + If SQL_ExeCommandWithParamters(COL_RIGHTS.料号管理, strSql, ParamName, ParamValue) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + 'UPDATE `w&t database`.`料号表` SET `物料名称` = '电阻，001', + '`规格描述` = '10k,0603，1' WHERE `料号表`.`序号` =13; + Public Function UpdateItem(ByVal 料号PN As String, + ByVal 物料名称 As String, + ByVal 规格描述 As String, + ByVal 单位 As String, + ByVal 单重 As Double, + ByVal 图片() As Byte, + ByVal 供应商ID As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "UPDATE `" & cst_TABLE_NAME & "` SET " + '加入列名 + strSql &= "`" & m_COLS_NAME(COLS.物料名称) & "` = '" & 物料名称 & "', " + strSql &= "`" & m_COLS_NAME(COLS.规格描述) & "` = '" & 规格描述 & "', " + strSql &= "`" & m_COLS_NAME(COLS.单位) & "` = '" & 单位 & "', " + strSql &= "`" & m_COLS_NAME(COLS.单重) & "` = '" & 单重 & "', " + If Not 图片 Is Nothing Then + strSql &= "`" & m_COLS_NAME(COLS.图片) & "` = @pic, " + End If + strSql &= "`" & m_COLS_NAME(COLS.供应商ID) & "` = '" & 供应商ID & "' " + strSql &= " WHERE " & "`" & m_COLS_NAME(COLS.料号PN) & "` = '" & 料号PN & "' " + + If Not 图片 Is Nothing Then + Dim ParamName() As String = {"@pic"} + Dim ParamValue() As Object = {图片} + + If SQL_ExeCommandWithParamters(COL_RIGHTS.料号管理, strSql, ParamName, ParamValue) = True Then + Return ERROR_CODE.SUCCESS + End If + Else + If SQL_ExeCommand(COL_RIGHTS.料号管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryItem(ByVal 料号PN As String, + ByRef 物料名称 As String, + ByRef 规格描述 As String, + ByRef 单位 As String, + ByRef 单重 As Double, + ByRef 图片() As Byte, + ByRef 供应商ID As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSQL &= m_COLS_NAME(COLS.料号PN) & " = '" & 料号PN & "'" + + Dim rValueTable(0) As Object + If SQL_DataReader(COL_RIGHTS.料号管理, strSQL, rValueTable) = True Then + 物料名称 = rValueTable(COLS.物料名称) + 规格描述 = rValueTable(COLS.规格描述) + 单位 = rValueTable(COLS.单位) + 单重 = rValueTable(COLS.单重) + '图片 = rValueTable(COLS.图片) + 供应商ID = rValueTable(COLS.供应商ID) + + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryItem(ByVal 料号PN As String, + ByRef 物料名称 As String, + ByRef 规格描述 As String, + ByRef 单位 As String, + ByRef 单重 As Double, + ByRef 供应商ID As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT * FROM " & cst_TABLE_NAME & " WHERE " + strSQL &= m_COLS_NAME(COLS.料号PN) & " = '" & 料号PN & "'" + + Dim rValueTable(0) As Object + If SQL_DataReader(COL_RIGHTS.料号管理, strSQL, rValueTable) = True Then + 物料名称 = rValueTable(COLS.物料名称) + 规格描述 = rValueTable(COLS.规格描述) + 单位 = rValueTable(COLS.单位) + 单重 = rValueTable(COLS.单重) + 供应商ID = rValueTable(COLS.供应商ID) + + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryItemIndex(ByVal 料号PN As String,ByRef 序号 As Integer) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT `" & m_COLS_NAME(COLS.序号) & "` " & + " FROM " & cst_TABLE_NAME & " WHERE " + strSQL &= m_COLS_NAME(COLS.料号PN) & " = '" & 料号PN & "'" + + Dim rValueTable(0) As Object + If SQL_DataReader(COL_RIGHTS.料号管理, strSQL, rValueTable) = True Then + Try + 序号 = rValueTable(0) + Return ERROR_CODE.SUCCESS + Catch ex As Exception + + End Try + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryInformation(ByRef Count As Integer, ByRef minIndex As Integer, ByRef maxIndex As Integer + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT " & + "COUNT(`" & m_COLS_NAME(COLS.序号) & "`), " & + "MIN(`" & m_COLS_NAME(COLS.序号) & "`), " & + "MAX(`" & m_COLS_NAME(COLS.序号) & "`) " & + " FROM `" & cst_TABLE_NAME & "`" + + Dim rValueTable(0) As Object + If SQL_DataReader(COL_RIGHTS.料号管理, strSQL, rValueTable) = True Then + Try + Count = rValueTable(0) + minIndex = rValueTable(1) + maxIndex = rValueTable(2) + Return ERROR_CODE.SUCCESS + Catch ex As Exception + + End Try + End If + + Return ERROR_CODE.ACCESS + End Function + + + Public Function CheckPartNumber(ByVal 料号PN As String, ByRef isExist As Boolean) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT `" & m_COLS_NAME(COLS.料号PN) & "` FROM `" & cst_TABLE_NAME & "` WHERE " + strSql &= "`" & m_COLS_NAME(COLS.料号PN) & "` COLLATE gbk_chinese_ci ='" & 料号PN & "'" + + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.料号管理, strSql, rTable) = True Then + isExist = False + + If rTable.Rows.Count > 0 Then + 'If rTable.Rows(0).Item(0) = 料号PN Then + isExist = True + 'End If + End If + + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + '================================================================================================= + '获取当前库位库存 + Public Function GetStockSum(ByVal 仓库 As String, ByVal 库位 As String, ByRef isExist As Boolean) As Integer + + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT `库位库存` FROM `原料库存表` WHERE " + strSql &= "`仓库` COLLATE gbk_chinese_ci ='" & 仓库 & "' AND `库位` COLLATE gbk_chinese_ci ='" & 库位 & "'" + + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.原料库存管理, strSql, rTable) = True Then + isExist = False + + If rTable.Rows.Count > 0 Then + isExist = True + Return rTable.Rows(rTable.Rows.Count - 1).Item(0).ToString() + End If + End If + Return 0 + End Function + '================================================================================================= + + Public Function GetAddItemCmd(ByVal 料号PN As String, + ByVal 物料名称 As String, + ByVal 规格描述 As String, + ByVal 单位 As String, + ByVal 单重 As Double, + ByVal 供应商ID As String + ) As String + + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.料号PN To COLS.max - 1 + If i <> COLS.图片 Then + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + + strSql &= "`" & m_COLS_NAME(i) & "`" + End If + Next + strSql &= ") VALUES (" + strSql &= "'" & 料号PN & "'," + strSql &= "'" & 物料名称 & "'," + strSql &= "'" & 规格描述 & "'," + strSql &= "'" & 单位 & "'," + strSql &= "'" & 单重 & "'," + strSql &= "'" & 供应商ID & "'" + strSql &= ")" + Return strSql + End Function +End Class diff --git a/WT-DMS/CProductsManage.vb b/WT-DMS/CProductsManage.vb new file mode 100644 index 0000000..c1ed718 --- /dev/null +++ b/WT-DMS/CProductsManage.vb @@ -0,0 +1,100 @@ +Public Class CProductsManage + + Dim m_SQL As New CSQLInterface + Private cst_TABLE_NAME As String = "成品库存表" + + Public Shared m_COLS_NAME() As String = { + "序号", + "入库出库", + "料号PN", + "订单号", + "日期", + "时间", + "数量", + "操作员ID", + "仓库", + "库位", + "用途"} + + Public Enum COLS + 序号 + 入库出库 + 料号PN + 订单号 + 日期 + 时间 + 数量 + 操作员ID + 仓库 + 库位 + 用途 + max + End Enum + + '入库或者出库标志 + Private IsOutStore As Boolean = False + Public Property OutStore() As Boolean + Get + Return IsOutStore + End Get + Set(ByVal value As Boolean) + IsOutStore = value + End Set + End Property + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + + Public Sub New() + IsOutStore = False + End Sub + + Public Function AddItem(ByVal 入库出库 As Boolean, + ByVal 料号PN As String, + ByVal 订单号 As String, + ByVal 日期 As String, + ByVal 时间 As String, + ByVal 数量 As Integer, + ByVal 操作员ID As String, + ByVal 仓库 As String, + ByVal 库位 As String, + ByVal 用途 As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.入库出库 To m_COLS_NAME.Length - 1 + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "`" & m_COLS_NAME(i) & "`" + Next + strSql &= ") VALUES (" + strSql &= "'" & IIf(入库出库, 1, 0) & "'," + strSql &= "'" & 料号PN & "'," + strSql &= "'" & 订单号 & "'," + strSql &= "'" & 日期 & "'," + strSql &= "'" & 时间 & "'," + strSql &= "'" & 数量 & "'," + strSql &= "'" & 操作员ID & "'," + strSql &= "'" & 仓库 & "'," + strSql &= "'" & 库位 & "'," + strSql &= "'" & 用途 & "'" + strSql &= ")" + + If SQL_ExeCommand(COL_RIGHTS.成品库存管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + +End Class diff --git a/WT-DMS/CSQLInterface.vb b/WT-DMS/CSQLInterface.vb new file mode 100644 index 0000000..b89d67a --- /dev/null +++ b/WT-DMS/CSQLInterface.vb @@ -0,0 +1,70 @@ +Imports System.Data.SqlClient + +Public Class CSQLInterface + Dim m_SqlConn As SqlConnection = Nothing + Dim m_DTable As New DataTable + Dim m_BaseName As String = "" + Public Function ConnectionSetting(ByVal strHostIp As String, ByVal DataBaseName As String, ByVal user As String, ByVal password As String) As Boolean + If m_SqlConn Is Nothing Then + m_SqlConn = New SqlConnection + Else + m_SqlConn.Close() + End If + + m_SqlConn.ConnectionString = "server=" & strHostIp & ";database=" & DataBaseName & ";uid=" & user & ";pwd=" & password + + m_BaseName = DataBaseName + Return (True) + End Function + + Public Function Query(ByVal strQuery As String, ByRef r_Table As DataTable) As Boolean + Dim Result As Boolean = False + Try + m_SqlConn.Open() + Dim daAdapter As SqlDataAdapter = New SqlDataAdapter(strQuery, m_SqlConn) + daAdapter.Fill(r_Table) + + Result = True + Catch ex As Exception + End Try + + Try + m_SqlConn.Close() + Catch ex As Exception + End Try + + Return Result + End Function + + Public Function ExeCommand(ByVal strExe As String) As Boolean + Dim Result As Boolean = False + + Try + m_SqlConn.Open() + Dim myCommand As SqlCommand = New SqlCommand(strExe, m_SqlConn) + If myCommand.ExecuteNonQuery() > 0 Then + Result = True + End If + Catch ex As Exception + End Try + + Try + m_SqlConn.Close() + Catch ex As Exception + End Try + + Return Result + End Function + + 'Public Function Insert(ByVal strInsert As String) As Boolean + ' Return ExeCommand(strInsert) + 'End Function + + 'Public Function Update(ByVal strUpdate As String) As Boolean + ' Return ExeCommand(strUpdate) + 'End Function + + 'Public Function Delete(ByVal strDelete As String) As Boolean + ' Return ExeCommand(strDelete) + 'End Function +End Class diff --git a/WT-DMS/CStore.vb b/WT-DMS/CStore.vb new file mode 100644 index 0000000..3060ae2 --- /dev/null +++ b/WT-DMS/CStore.vb @@ -0,0 +1,68 @@ +Public Class CStore + Dim m_SQL As New CSQLInterface + Private cst_TABLE_NAME As String = "仓库表" + + Public Shared m_COLS_NAME() As String = { + "仓库序号", + "仓库名称", + "仓库地点", + "仓库库位表" + } + + Public Enum COLS + 仓库序号 + 仓库名称 + 仓库地点 + 仓库库位表 + max + End Enum + + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + Public Function AddItem(ByVal 仓库名称 As String, + ByVal 仓库地点 As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.仓库名称 To COLS.max - 1 + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "`" & m_COLS_NAME(i) & "`" + Next + strSql &= ") VALUES (" + strSql &= "'" & 仓库名称 & "'," + strSql &= "'" & 仓库地点 & "'" + strSql &= ")" + + If SQL_ExeCommand(COL_RIGHTS.仓库管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryAll(ByRef rTable As Data.DataTable) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT * FROM " & cst_TABLE_NAME + + If SQL_Query(COL_RIGHTS.仓库管理, strSQL, rTable) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CStoreLocation.vb b/WT-DMS/CStoreLocation.vb new file mode 100644 index 0000000..57629bd --- /dev/null +++ b/WT-DMS/CStoreLocation.vb @@ -0,0 +1,66 @@ +Public Class CStoreLocation + Dim m_SQL As New CSQLInterface + Public TABLE_NAME As String = "" + + Public Shared m_COLS_NAME() As String = { + "序号", + "库位" + } + + Public Enum COLS + 序号 + 库位 + max + End Enum + + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + Public Function AddItem(ByVal 库位 As String + ) As ERROR_CODE + If TABLE_NAME.Length = 0 Then Return ERROR_CODE.NONE + + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & TABLE_NAME & "` (" + '加入列名 + Dim isFirst As Boolean = True + For i As Integer = COLS.库位 To COLS.max - 1 + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "`" & m_COLS_NAME(i) & "`" + Next + strSql &= ") VALUES (" + strSql &= "'" & 库位 & "'" + strSql &= ")" + + If SQL_ExeCommand(COL_RIGHTS.库位管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryAll(ByRef rTable As Data.DataTable) As ERROR_CODE + If TABLE_NAME.Length = 0 Then Return ERROR_CODE.NONE + + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT * FROM " & TABLE_NAME + + If SQL_Query(COL_RIGHTS.库位管理, strSQL, rTable) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function +End Class diff --git a/WT-DMS/CSupplier.vb b/WT-DMS/CSupplier.vb new file mode 100644 index 0000000..2c7fcfd --- /dev/null +++ b/WT-DMS/CSupplier.vb @@ -0,0 +1,185 @@ +Public Class CSupplier + Dim m_SQL As New CSQLInterface + Public Shared cst_TABLE_NAME As String = "供应商信息表" + + Public Shared m_COLS_NAME() As String = { + "序号", + "供应商ID", + "中文名称", + "英文名称", + "供应商工厂全称", + "供应商网址", + "供应商地址", + "公司资本类型", + "公司主营产品", + "公司现有人数", + "公司电话1", + "公司电话2", + "公司电话3", + "公司电话4", + "公司传真", + "主要业务联系人", + "主要业务联系人职务", + "主要业务联系人公司工作年限", + "主要业务联系人联系电话", + "主要业务联系人分机", + "主要业务联系人手机", + "主要业务联系人邮箱", + "主要品质负责人", + "主要品质负责人职务", + "主要品质负责人公司工作年限", + "主要品质负责人联系电话", + "主要品质负责人分机", + "主要品质负责人手机", + "主要品质负责人邮箱", + "对公账号", + "对公账号开户行", + "对公账号户名", + "对公账号帐号", + "对私帐号", + "对私帐号开户行", + "对私帐号户名", + "对私帐号帐号", + "年审情况" + } + + Public Enum COLS + 序号 + 供应商ID + 中文名称 + 英文名称 + 供应商工厂全称 + 供应商网址 + 供应商地址 + 公司资本类型 + 公司主营产品 + 公司现有人数 + 公司电话1 + 公司电话2 + 公司电话3 + 公司电话4 + 公司传真 + 主要业务联系人 + 主要业务联系人职务 + 主要业务联系人公司工作年限 + 主要业务联系人联系电话 + 主要业务联系人分机 + 主要业务联系人手机 + 主要业务联系人邮箱 + 主要品质负责人 + 主要品质负责人职务 + 主要品质负责人公司工作年限 + 主要品质负责人联系电话 + 主要品质负责人分机 + 主要品质负责人手机 + 主要品质负责人邮箱 + 对公账号 + 对公账号开户行 + 对公账号户名 + 对公账号帐号 + 对私帐号 + 对私帐号开户行 + 对私帐号户名 + 对私帐号帐号 + 年审情况 + max + End Enum + + '权限 + Public Shared AccessRight As Integer = RIGHTS.NONE + + Public Function AddItem(ByRef SectionName() As String, + ByRef Value() As String + ) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "INSERT INTO `" & cst_TABLE_NAME & "` (" + '加入列名 取消第一个序号 序号自增 + Dim isFirst As Boolean = True + For i As Integer = 1 To SectionName.Length - 1 + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "`" & SectionName(i) & "`" + Next + strSql &= ") VALUES (" + + isFirst = True + For i As Integer = 1 To SectionName.Length - 1 + + If isFirst = True Then + isFirst = False + Else + strSql &= "," + End If + strSql &= "'" & Value(i) & "'" + Next + strSql &= ")" + + If SQL_ExeCommand(COL_RIGHTS.供应商管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function QueryAll_IDAndName(ByRef rTable As Data.DataTable) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSQL As String = "SELECT 供应商ID,中文名称 FROM " & cst_TABLE_NAME + + If SQL_Query(COL_RIGHTS.供应商管理, strSQL, rTable) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function CheckSupplierID(ByVal 供应商ID As String, ByRef isExist As Boolean) As ERROR_CODE + If CBool(AccessRight And RIGHTS.READ) = False Then + Return ERROR_CODE.NORIGHT + End If + + Dim strSql As String = "SELECT `" & m_COLS_NAME(COLS.供应商ID) & "` FROM `" & cst_TABLE_NAME & "` WHERE " + strSql &= "`" & m_COLS_NAME(COLS.供应商ID) & "`='" & 供应商ID & "'" + + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.供应商管理, strSql, rTable) = True Then + isExist = False + + If rTable.Rows.Count > 0 Then + 'If rTable.Rows(0).Item(0) = 料号PN Then + isExist = True + 'End If + End If + + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Public Function DeleteItem(ByRef 供应商ID As String) As ERROR_CODE + If CBool(AccessRight And RIGHTS.WRITE) = False Then + Return ERROR_CODE.NORIGHT + End If + + '"INSERT INTO [dbo].[TABLE1] ([11],[22],[33],[44],[55]) VALUES ('11','2','3','4','5')" + Dim strSql As String = "DELETE FROM `" & cst_TABLE_NAME & "` WHERE " + strSql &= "`" & m_COLS_NAME(COLS.供应商ID) & "`= '" & 供应商ID & "'" + + If SQL_ExeCommand(COL_RIGHTS.供应商管理, strSql) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + +End Class diff --git a/WT-DMS/Form1.Designer.vb b/WT-DMS/Form1.Designer.vb new file mode 100644 index 0000000..04a2eaa --- /dev/null +++ b/WT-DMS/Form1.Designer.vb @@ -0,0 +1,317 @@ + _ +Partial Class Form1 + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() + Me.系统ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.注销ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.退出ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.料号管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.录入ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() + Me.查询ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() + Me.原料库存管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.录入ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.删除ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.查询ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.出入库记录ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.成品库存管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.录入ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.删除ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.查询ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.BOM管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.BOMToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.合并备料查询ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.供应商管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.财务管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.录入ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() + Me.查询ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.tsmi_录入_销售部 = New System.Windows.Forms.ToolStripMenuItem() + Me.tsmi_查询_销售部 = New System.Windows.Forms.ToolStripMenuItem() + Me.用户管理ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.备份管理ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.系统记录ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.关于ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() + Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() + Me.MenuStrip1.SuspendLayout() + Me.SuspendLayout() + ' + 'MenuStrip1 + ' + Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.系统ToolStripMenuItem, Me.料号管理ToolStripMenuItem, Me.原料库存管理ToolStripMenuItem, Me.成品库存管理ToolStripMenuItem, Me.BOM管理ToolStripMenuItem, Me.供应商管理ToolStripMenuItem, Me.财务管理ToolStripMenuItem, Me.用户管理ToolStripMenuItem, Me.备份管理ToolStripMenuItem1, Me.系统记录ToolStripMenuItem, Me.关于ToolStripMenuItem}) + Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) + Me.MenuStrip1.Name = "MenuStrip1" + Me.MenuStrip1.Size = New System.Drawing.Size(956, 25) + Me.MenuStrip1.TabIndex = 1 + Me.MenuStrip1.Text = "MenuStrip1" + ' + '系统ToolStripMenuItem + ' + Me.系统ToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.注销ToolStripMenuItem, Me.退出ToolStripMenuItem}) + Me.系统ToolStripMenuItem.Name = "系统ToolStripMenuItem" + Me.系统ToolStripMenuItem.Size = New System.Drawing.Size(59, 21) + Me.系统ToolStripMenuItem.Text = "系统(&S)" + ' + '注销ToolStripMenuItem + ' + Me.注销ToolStripMenuItem.Name = "注销ToolStripMenuItem" + Me.注销ToolStripMenuItem.Size = New System.Drawing.Size(116, 22) + Me.注销ToolStripMenuItem.Text = "注销(&L)" + ' + '退出ToolStripMenuItem + ' + Me.退出ToolStripMenuItem.Name = "退出ToolStripMenuItem" + Me.退出ToolStripMenuItem.Size = New System.Drawing.Size(116, 22) + Me.退出ToolStripMenuItem.Text = "退出(&X)" + ' + '料号管理ToolStripMenuItem + ' + Me.料号管理ToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.录入ToolStripMenuItem2, Me.查询ToolStripMenuItem3}) + Me.料号管理ToolStripMenuItem.Name = "料号管理ToolStripMenuItem" + Me.料号管理ToolStripMenuItem.Size = New System.Drawing.Size(86, 21) + Me.料号管理ToolStripMenuItem.Text = "料号管理(&N)" + ' + '录入ToolStripMenuItem2 + ' + Me.录入ToolStripMenuItem2.Name = "录入ToolStripMenuItem2" + Me.录入ToolStripMenuItem2.Size = New System.Drawing.Size(180, 22) + Me.录入ToolStripMenuItem2.Text = "录入" + ' + '查询ToolStripMenuItem3 + ' + Me.查询ToolStripMenuItem3.Name = "查询ToolStripMenuItem3" + Me.查询ToolStripMenuItem3.Size = New System.Drawing.Size(180, 22) + Me.查询ToolStripMenuItem3.Text = "查询" + ' + '原料库存管理ToolStripMenuItem + ' + Me.原料库存管理ToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.录入ToolStripMenuItem, Me.删除ToolStripMenuItem, Me.查询ToolStripMenuItem, Me.出入库记录ToolStripMenuItem}) + Me.原料库存管理ToolStripMenuItem.Name = "原料库存管理ToolStripMenuItem" + Me.原料库存管理ToolStripMenuItem.Size = New System.Drawing.Size(112, 21) + Me.原料库存管理ToolStripMenuItem.Text = "原料库存管理(&M)" + ' + '录入ToolStripMenuItem + ' + Me.录入ToolStripMenuItem.Name = "录入ToolStripMenuItem" + Me.录入ToolStripMenuItem.Size = New System.Drawing.Size(141, 22) + Me.录入ToolStripMenuItem.Text = "入库" + ' + '删除ToolStripMenuItem + ' + Me.删除ToolStripMenuItem.Name = "删除ToolStripMenuItem" + Me.删除ToolStripMenuItem.Size = New System.Drawing.Size(141, 22) + Me.删除ToolStripMenuItem.Text = "出库" + ' + '查询ToolStripMenuItem + ' + Me.查询ToolStripMenuItem.Name = "查询ToolStripMenuItem" + Me.查询ToolStripMenuItem.Size = New System.Drawing.Size(141, 22) + Me.查询ToolStripMenuItem.Text = "查询" + ' + '出入库记录ToolStripMenuItem + ' + Me.出入库记录ToolStripMenuItem.Name = "出入库记录ToolStripMenuItem" + Me.出入库记录ToolStripMenuItem.Size = New System.Drawing.Size(141, 22) + Me.出入库记录ToolStripMenuItem.Text = "出/入库记录" + ' + '成品库存管理ToolStripMenuItem + ' + Me.成品库存管理ToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.录入ToolStripMenuItem1, Me.删除ToolStripMenuItem1, Me.查询ToolStripMenuItem1}) + Me.成品库存管理ToolStripMenuItem.Enabled = False + Me.成品库存管理ToolStripMenuItem.Name = "成品库存管理ToolStripMenuItem" + Me.成品库存管理ToolStripMenuItem.Size = New System.Drawing.Size(107, 21) + Me.成品库存管理ToolStripMenuItem.Text = "成品库存管理(&P)" + ' + '录入ToolStripMenuItem1 + ' + Me.录入ToolStripMenuItem1.Name = "录入ToolStripMenuItem1" + Me.录入ToolStripMenuItem1.Size = New System.Drawing.Size(100, 22) + Me.录入ToolStripMenuItem1.Text = "入库" + ' + '删除ToolStripMenuItem1 + ' + Me.删除ToolStripMenuItem1.Name = "删除ToolStripMenuItem1" + Me.删除ToolStripMenuItem1.Size = New System.Drawing.Size(100, 22) + Me.删除ToolStripMenuItem1.Text = "出库" + ' + '查询ToolStripMenuItem1 + ' + Me.查询ToolStripMenuItem1.Name = "查询ToolStripMenuItem1" + Me.查询ToolStripMenuItem1.Size = New System.Drawing.Size(100, 22) + Me.查询ToolStripMenuItem1.Text = "查询" + ' + 'BOM管理ToolStripMenuItem + ' + Me.BOM管理ToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BOMToolStripMenuItem, Me.合并备料查询ToolStripMenuItem}) + Me.BOM管理ToolStripMenuItem.Name = "BOM管理ToolStripMenuItem" + Me.BOM管理ToolStripMenuItem.Size = New System.Drawing.Size(90, 21) + Me.BOM管理ToolStripMenuItem.Text = "BOM管理(&B)" + ' + 'BOMToolStripMenuItem + ' + Me.BOMToolStripMenuItem.Name = "BOMToolStripMenuItem" + Me.BOMToolStripMenuItem.Size = New System.Drawing.Size(148, 22) + Me.BOMToolStripMenuItem.Text = "BOM管理" + ' + '合并备料查询ToolStripMenuItem + ' + Me.合并备料查询ToolStripMenuItem.Name = "合并备料查询ToolStripMenuItem" + Me.合并备料查询ToolStripMenuItem.Size = New System.Drawing.Size(148, 22) + Me.合并备料查询ToolStripMenuItem.Text = "合并备料查询" + ' + '供应商管理ToolStripMenuItem + ' + Me.供应商管理ToolStripMenuItem.Name = "供应商管理ToolStripMenuItem" + Me.供应商管理ToolStripMenuItem.Size = New System.Drawing.Size(97, 21) + Me.供应商管理ToolStripMenuItem.Text = "供应商管理(&G)" + ' + '财务管理ToolStripMenuItem + ' + Me.财务管理ToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.录入ToolStripMenuItem3, Me.查询ToolStripMenuItem2, Me.ToolStripSeparator1, Me.tsmi_录入_销售部, Me.tsmi_查询_销售部}) + Me.财务管理ToolStripMenuItem.Name = "财务管理ToolStripMenuItem" + Me.财务管理ToolStripMenuItem.Size = New System.Drawing.Size(82, 21) + Me.财务管理ToolStripMenuItem.Text = "财务管理(&F)" + ' + '录入ToolStripMenuItem3 + ' + Me.录入ToolStripMenuItem3.Name = "录入ToolStripMenuItem3" + Me.录入ToolStripMenuItem3.Size = New System.Drawing.Size(160, 22) + Me.录入ToolStripMenuItem3.Text = "录入（开发部）" + ' + '查询ToolStripMenuItem2 + ' + Me.查询ToolStripMenuItem2.Name = "查询ToolStripMenuItem2" + Me.查询ToolStripMenuItem2.Size = New System.Drawing.Size(160, 22) + Me.查询ToolStripMenuItem2.Text = "查询（开发部）" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(157, 6) + ' + 'tsmi_录入_销售部 + ' + Me.tsmi_录入_销售部.Name = "tsmi_录入_销售部" + Me.tsmi_录入_销售部.Size = New System.Drawing.Size(160, 22) + Me.tsmi_录入_销售部.Text = "录入（销售部）" + ' + 'tsmi_查询_销售部 + ' + Me.tsmi_查询_销售部.Name = "tsmi_查询_销售部" + Me.tsmi_查询_销售部.Size = New System.Drawing.Size(160, 22) + Me.tsmi_查询_销售部.Text = "查询（销售部）" + ' + '用户管理ToolStripMenuItem + ' + Me.用户管理ToolStripMenuItem.Name = "用户管理ToolStripMenuItem" + Me.用户管理ToolStripMenuItem.Size = New System.Drawing.Size(85, 21) + Me.用户管理ToolStripMenuItem.Text = "用户管理(&U)" + ' + '备份管理ToolStripMenuItem1 + ' + Me.备份管理ToolStripMenuItem1.Name = "备份管理ToolStripMenuItem1" + Me.备份管理ToolStripMenuItem1.Size = New System.Drawing.Size(68, 21) + Me.备份管理ToolStripMenuItem1.Text = "备份管理" + ' + '系统记录ToolStripMenuItem + ' + Me.系统记录ToolStripMenuItem.Name = "系统记录ToolStripMenuItem" + Me.系统记录ToolStripMenuItem.Size = New System.Drawing.Size(82, 21) + Me.系统记录ToolStripMenuItem.Text = "系统记录(&L)" + ' + '关于ToolStripMenuItem + ' + Me.关于ToolStripMenuItem.Name = "关于ToolStripMenuItem" + Me.关于ToolStripMenuItem.Size = New System.Drawing.Size(61, 21) + Me.关于ToolStripMenuItem.Text = "关于(&H)" + ' + 'StatusStrip1 + ' + Me.StatusStrip1.Location = New System.Drawing.Point(0, 493) + Me.StatusStrip1.Name = "StatusStrip1" + Me.StatusStrip1.Size = New System.Drawing.Size(956, 22) + Me.StatusStrip1.TabIndex = 2 + Me.StatusStrip1.Text = "StatusStrip1" + ' + 'ToolStrip1 + ' + Me.ToolStrip1.Location = New System.Drawing.Point(0, 25) + Me.ToolStrip1.Name = "ToolStrip1" + Me.ToolStrip1.Size = New System.Drawing.Size(956, 25) + Me.ToolStrip1.TabIndex = 3 + Me.ToolStrip1.Text = "ToolStrip1" + ' + 'Form1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(956, 515) + Me.Controls.Add(Me.ToolStrip1) + Me.Controls.Add(Me.StatusStrip1) + Me.Controls.Add(Me.MenuStrip1) + Me.IsMdiContainer = True + Me.MainMenuStrip = Me.MenuStrip1 + Me.Name = "Form1" + Me.Text = "W&T Data Manage System" + Me.WindowState = System.Windows.Forms.FormWindowState.Maximized + Me.MenuStrip1.ResumeLayout(False) + Me.MenuStrip1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip + Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip + Friend WithEvents 系统ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 注销ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 退出ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 料号管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 原料库存管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 成品库存管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents BOM管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 供应商管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 用户管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 系统记录ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip + Friend WithEvents 关于ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 录入ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 删除ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 查询ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 录入ToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 删除ToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 查询ToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 录入ToolStripMenuItem2 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 查询ToolStripMenuItem3 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 出入库记录ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 财务管理ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 录入ToolStripMenuItem3 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 查询ToolStripMenuItem2 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents tsmi_录入_销售部 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents tsmi_查询_销售部 As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents BOMToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 合并备料查询ToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents 备份管理ToolStripMenuItem1 As System.Windows.Forms.ToolStripMenuItem + +End Class diff --git a/WT-DMS/Form1.resx b/WT-DMS/Form1.resx new file mode 100644 index 0000000..268a900 --- /dev/null +++ b/WT-DMS/Form1.resx @@ -0,0 +1,132 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + 130, 17 + + + 256, 17 + + + 47 + + \ No newline at end of file diff --git a/WT-DMS/Form1.vb b/WT-DMS/Form1.vb new file mode 100644 index 0000000..c6cad44 --- /dev/null +++ b/WT-DMS/Form1.vb @@ -0,0 +1,358 @@ +Public Class Form1 + Public QuitReson As QUIT_RESON = QUIT_RESON.close + + Public Enum FORM_TYPE + none + 料号管理 + 料号查询 + 物料入库 + 物料出库 + 物料查询 + 物料入出库记录 + BOM管理 + 供应商管理 + 用户管理 + 系统记录 + 财务明细录入_开发 + 财务明细查询_开发 + 财务明细录入_销售 + 财务明细查询_销售 + 合并用料查询 + 备份管理 + max + End Enum + + Dim g_Form_Track(FORM_TYPE.max - 1) As Form + + + Dim m_AccountManage As New CAccountManage + + Dim m_LastError As String = "" + + Private Function GetLastError() As String + Return m_LastError + End Function + + 'Private Function LoginCheck() As Boolean + ' Dim pLoginForm As New LoginForm1 + + ' pLoginForm.ShowDialog() + ' Return pLoginForm.LoginResult + 'End Function + + '根据权限设置相应菜单的禁用状态 + Private Sub SetAccessState() + '开启最低权限 + Current_Rights(COL_RIGHTS.仓库管理) = Current_Rights(COL_RIGHTS.仓库管理) Or RIGHTS.READ + Current_Rights(COL_RIGHTS.库位管理) = Current_Rights(COL_RIGHTS.库位管理) Or RIGHTS.READ + + + '设置相应权限 + CAccountManage.AccessRight = Current_Rights(COL_RIGHTS.用户管理) + CBOM.AccessRight = Current_Rights(COL_RIGHTS.BOM管理) + 'CCompanyManage.AccessRight = Current_Rights(COL_RIGHTS. + 'CDepartmentManage.AccessRight = Current_Rights( + CLogManage.AccessRight = Current_Rights(COL_RIGHTS.系统记录) + CMaterialInOut.AccessRight = Current_Rights(COL_RIGHTS.原料库存管理) + CPartNumber.AccessRight = Current_Rights(COL_RIGHTS.料号管理) + CProductsManage.AccessRight = Current_Rights(COL_RIGHTS.成品库存管理) + CStore.AccessRight = Current_Rights(COL_RIGHTS.仓库管理) + CStoreLocation.AccessRight = Current_Rights(COL_RIGHTS.库位管理) + CSupplier.AccessRight = Current_Rights(COL_RIGHTS.供应商管理) + + 料号管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.料号管理)) + 查询ToolStripMenuItem3.Enabled = CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.READ) + 录入ToolStripMenuItem2.Enabled = CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.WRITE) + + 原料库存管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.原料库存管理)) And 料号管理ToolStripMenuItem.Enabled + 录入ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.WRITE) And 查询ToolStripMenuItem3.Enabled + 删除ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.WRITE) And 查询ToolStripMenuItem3.Enabled + 查询ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.READ) And 查询ToolStripMenuItem3.Enabled + + '成品库存管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.成品库存管理)) + '录入ToolStripMenuItem1.Enabled = CBool(Current_Rights(COL_RIGHTS.成品库存管理) And RIGHTS.WRITE) + '删除ToolStripMenuItem1.Enabled = CBool(Current_Rights(COL_RIGHTS.成品库存管理) And RIGHTS.WRITE) + '查询ToolStripMenuItem1.Enabled = CBool(Current_Rights(COL_RIGHTS.成品库存管理) And RIGHTS.READ) + + 'BOM管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.BOM管理)) + 供应商管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.供应商管理) And RIGHTS.WRITE) + 用户管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.用户管理) And RIGHTS.WRITE) + 系统记录ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.系统记录) And RIGHTS.READ) + + 财务管理ToolStripMenuItem.Enabled = CBool(Current_Rights(COL_RIGHTS.财务管理) And RIGHTS.WRITE) + 录入ToolStripMenuItem3.Enabled = CBool(Current_Rights(COL_RIGHTS.财务管理) And RIGHTS.WRITE) + 查询ToolStripMenuItem2.Enabled = CBool(Current_Rights(COL_RIGHTS.财务管理) And RIGHTS.READ) + End Sub + + Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + Me.Text &= " (Build:" & My.Application.Info.Version.ToString & ") " & "用户:" & Current_UserName + + MainForm = Me + + '根据权限设置相应菜单的禁用状态 + SetAccessState() + End Sub + + Private Sub 关于ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 关于ToolStripMenuItem.Click + Dim pAbout As New AboutBox1 + pAbout.ShowDialog() + End Sub + + Private Sub 用户管理ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 用户管理ToolStripMenuItem.Click + If g_Form_Track(FORM_TYPE.用户管理) Is Nothing OrElse g_Form_Track(FORM_TYPE.用户管理).IsDisposed Then + g_Form_Track(FORM_TYPE.用户管理) = New form_UserManage + g_Form_Track(FORM_TYPE.用户管理).Text = "Form" & FORM_TYPE.用户管理 & "-" & g_Form_Track(FORM_TYPE.用户管理).Text + End If + g_Form_Track(FORM_TYPE.用户管理).MdiParent = Me + g_Form_Track(FORM_TYPE.用户管理).Show() + g_Form_Track(FORM_TYPE.用户管理).BringToFront() + End Sub + + Private Sub 新建ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + 'Dim m_BomOper As New CBOM + 'If m_BomOper.CreateNew("333") = ERROR_CODE.SUCCESS Then + ' MsgBox("Create OK") + 'Else + ' MsgBox("Create Fail") + 'End If + End Sub + + Private Sub 注销ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 注销ToolStripMenuItem.Click + QuitReson = QUIT_RESON.logout + Me.Close() + End Sub + + Private Sub 退出ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 退出ToolStripMenuItem.Click + QuitReson = QUIT_RESON.close + Me.Close() + End Sub + + Private Sub 系统记录ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 系统记录ToolStripMenuItem.Click + If CBool(Current_Rights(COL_RIGHTS.系统记录) & RIGHTS.READ) = False Then + MsgBox("权限不足，请联系管理员!") + Return + End If + + If g_Form_Track(FORM_TYPE.系统记录) Is Nothing OrElse g_Form_Track(FORM_TYPE.系统记录).IsDisposed Then + g_Form_Track(FORM_TYPE.系统记录) = New Form_SysLog + g_Form_Track(FORM_TYPE.系统记录).Text = "Form" & FORM_TYPE.系统记录 & "-" & g_Form_Track(FORM_TYPE.系统记录).Text + End If + g_Form_Track(FORM_TYPE.系统记录).MdiParent = Me + g_Form_Track(FORM_TYPE.系统记录).Show() + g_Form_Track(FORM_TYPE.系统记录).BringToFront() + End Sub + + Private Function StoreSelect(ByRef storeName As String, ByRef 库位表名 As String) As Boolean + Dim pdlg As New dlg_StoreSelect + If dlg_StoreSelect.ShowDialog() <> DialogResult.OK Then Return False + + storeName = dlg_StoreSelect.combo_Store.Text + 库位表名 = dlg_StoreSelect.m_SelPosName + Return True + End Function + + Private Sub 录入ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 录入ToolStripMenuItem.Click + If CBool(Current_Rights(COL_RIGHTS.原料库存管理) & RIGHTS.WRITE) = False Then + MsgBox("权限不足，请联系管理员!") + Return + End If + + Dim StoreName As String = "" + Dim PosName As String = "" + If g_Form_Track(FORM_TYPE.物料入库) Is Nothing OrElse g_Form_Track(FORM_TYPE.物料入库).IsDisposed Then + g_Form_Track(FORM_TYPE.物料入库) = New form_Material + End If + CType(g_Form_Track(FORM_TYPE.物料入库), form_Material).OutStore = False '指定为入库操作 + g_Form_Track(FORM_TYPE.物料入库).Text = "物料入库" + g_Form_Track(FORM_TYPE.物料入库).Text = "Form" & FORM_TYPE.物料入库 & "-" & g_Form_Track(FORM_TYPE.物料入库).Text + g_Form_Track(FORM_TYPE.物料入库).MdiParent = Me + g_Form_Track(FORM_TYPE.物料入库).Show() + g_Form_Track(FORM_TYPE.物料入库).BringToFront() + End Sub + + Private Sub 删除ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 删除ToolStripMenuItem.Click + If CBool(Current_Rights(COL_RIGHTS.原料库存管理) & RIGHTS.WRITE) = False Then + MsgBox("权限不足，请联系管理员!") + Return + End If + + Dim StoreName As String = "" + Dim PosName As String = "" + If g_Form_Track(FORM_TYPE.物料出库) Is Nothing OrElse g_Form_Track(FORM_TYPE.物料出库).IsDisposed Then + g_Form_Track(FORM_TYPE.物料出库) = New form_Material + End If + CType(g_Form_Track(FORM_TYPE.物料出库), form_Material).OutStore = True '指定为出库操作 + g_Form_Track(FORM_TYPE.物料出库).Text = "物料出库" + g_Form_Track(FORM_TYPE.物料出库).Text = "Form" & FORM_TYPE.物料出库 & "-" & g_Form_Track(FORM_TYPE.物料出库).Text + g_Form_Track(FORM_TYPE.物料出库).MdiParent = Me + g_Form_Track(FORM_TYPE.物料出库).Show() + g_Form_Track(FORM_TYPE.物料出库).BringToFront() + End Sub + + Private Sub 供应商管理ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 供应商管理ToolStripMenuItem.Click + If g_Form_Track(FORM_TYPE.供应商管理) Is Nothing OrElse g_Form_Track(FORM_TYPE.供应商管理).IsDisposed Then + g_Form_Track(FORM_TYPE.供应商管理) = New form_SupplierManage + g_Form_Track(FORM_TYPE.供应商管理).Text = "Form" & FORM_TYPE.供应商管理 & "-" & g_Form_Track(FORM_TYPE.供应商管理).Text + End If + g_Form_Track(FORM_TYPE.供应商管理).MdiParent = Me + g_Form_Track(FORM_TYPE.供应商管理).Show() + g_Form_Track(FORM_TYPE.供应商管理).BringToFront() + End Sub + + 'Private Sub 录入ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 录入ToolStripMenuItem1.Click + ' If CBool(Current_Rights(COL_RIGHTS.成品库存管理) & RIGHTS.WRITE) = False Then + ' MsgBox("权限不足，请联系管理员!") + ' Return + ' End If + + ' Dim StoreName As String = "" + ' Dim PosName As String = "" + ' Dim pForm As New form_Product + ' pForm.OutStore = False '指定为入库操作 + ' pForm.Text = "成品入库" + ' pForm.MdiParent = Me + ' pForm.Show() + 'End Sub + + 'Private Sub 删除ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 删除ToolStripMenuItem1.Click + ' If CBool(Current_Rights(COL_RIGHTS.成品库存管理) & RIGHTS.WRITE) = False Then + ' MsgBox("权限不足，请联系管理员!") + ' Return + ' End If + + ' Dim StoreName As String = "" + ' Dim PosName As String = "" + ' Dim pForm As New form_Product + ' pForm.OutStore = True '指定为出库操作 + ' pForm.Text = "成品出库" + ' pForm.MdiParent = Me + ' pForm.Show() + 'End Sub + + Private Sub 查询ToolStripMenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 查询ToolStripMenuItem3.Click + If g_Form_Track(FORM_TYPE.料号查询) Is Nothing OrElse g_Form_Track(FORM_TYPE.料号查询).IsDisposed Then + g_Form_Track(FORM_TYPE.料号查询) = New form_QuerySim + g_Form_Track(FORM_TYPE.料号查询).Text = "Form" & FORM_TYPE.料号查询 & "-" & g_Form_Track(FORM_TYPE.料号查询).Text + End If + g_Form_Track(FORM_TYPE.料号查询).MdiParent = Me + g_Form_Track(FORM_TYPE.料号查询).Show() + g_Form_Track(FORM_TYPE.料号查询).BringToFront() + End Sub + + Private Sub 录入ToolStripMenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 录入ToolStripMenuItem2.Click + If g_Form_Track(FORM_TYPE.料号管理) Is Nothing OrElse g_Form_Track(FORM_TYPE.料号管理).IsDisposed Then + g_Form_Track(FORM_TYPE.料号管理) = New form_PartNumber + g_Form_Track(FORM_TYPE.料号管理).Text = "Form" & FORM_TYPE.料号管理 & "-" & g_Form_Track(FORM_TYPE.料号管理).Text + End If + g_Form_Track(FORM_TYPE.料号管理).MdiParent = Me + g_Form_Track(FORM_TYPE.料号管理).Show() + g_Form_Track(FORM_TYPE.料号管理).BringToFront() + End Sub + + Private Sub 查询ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 查询ToolStripMenuItem.Click + If g_Form_Track(FORM_TYPE.物料查询) Is Nothing OrElse g_Form_Track(FORM_TYPE.物料查询).IsDisposed Then + g_Form_Track(FORM_TYPE.物料查询) = New Form_QueryStorage + g_Form_Track(FORM_TYPE.物料查询).Text = "Form" & FORM_TYPE.物料查询 & "-" & g_Form_Track(FORM_TYPE.物料查询).Text + End If + + g_Form_Track(FORM_TYPE.物料查询).MdiParent = Me + g_Form_Track(FORM_TYPE.物料查询).Show() + g_Form_Track(FORM_TYPE.物料查询).BringToFront() + End Sub + + Private Sub 出入库记录ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 出入库记录ToolStripMenuItem.Click + If g_Form_Track(FORM_TYPE.物料入出库记录) Is Nothing OrElse g_Form_Track(FORM_TYPE.物料入出库记录).IsDisposed Then + g_Form_Track(FORM_TYPE.物料入出库记录) = New Form_QueryStorageRecord + g_Form_Track(FORM_TYPE.物料入出库记录).Text = "Form" & FORM_TYPE.物料入出库记录 & "-" & g_Form_Track(FORM_TYPE.物料入出库记录).Text + End If + + g_Form_Track(FORM_TYPE.物料入出库记录).MdiParent = Me + g_Form_Track(FORM_TYPE.物料入出库记录).Show() + g_Form_Track(FORM_TYPE.物料入出库记录).BringToFront() + End Sub + + Private Sub BOM管理ToolStripMenuItem_Click(sender As Object, e As EventArgs) + + End Sub + + Private Sub 录入ToolStripMenuItem3_Click(sender As Object, e As EventArgs) Handles 录入ToolStripMenuItem3.Click + If g_Form_Track(FORM_TYPE.财务明细录入_开发) Is Nothing OrElse g_Form_Track(FORM_TYPE.财务明细录入_开发).IsDisposed Then + g_Form_Track(FORM_TYPE.财务明细录入_开发) = New Form_FinancialRecords_Development + g_Form_Track(FORM_TYPE.财务明细录入_开发).Text = "Form" & FORM_TYPE.财务明细录入_开发 & "-" & g_Form_Track(FORM_TYPE.财务明细录入_开发).Text + End If + + g_Form_Track(FORM_TYPE.财务明细录入_开发).MdiParent = Me + g_Form_Track(FORM_TYPE.财务明细录入_开发).Show() + g_Form_Track(FORM_TYPE.财务明细录入_开发).BringToFront() + End Sub + + Private Sub 查询ToolStripMenuItem2_Click(sender As Object, e As EventArgs) Handles 查询ToolStripMenuItem2.Click + If g_Form_Track(FORM_TYPE.财务明细查询_开发) Is Nothing OrElse g_Form_Track(FORM_TYPE.财务明细查询_开发).IsDisposed Then + g_Form_Track(FORM_TYPE.财务明细查询_开发) = New Form_FinancialQuery_Development + g_Form_Track(FORM_TYPE.财务明细查询_开发).Text = "Form" & FORM_TYPE.财务明细查询_开发 & "-" & g_Form_Track(FORM_TYPE.财务明细查询_开发).Text + End If + + g_Form_Track(FORM_TYPE.财务明细查询_开发).MdiParent = Me + g_Form_Track(FORM_TYPE.财务明细查询_开发).Show() + g_Form_Track(FORM_TYPE.财务明细查询_开发).BringToFront() + End Sub + + Private Sub tsmi_录入_销售部_Click(sender As Object, e As EventArgs) Handles tsmi_录入_销售部.Click + If g_Form_Track(FORM_TYPE.财务明细录入_销售) Is Nothing OrElse g_Form_Track(FORM_TYPE.财务明细录入_销售).IsDisposed Then + g_Form_Track(FORM_TYPE.财务明细录入_销售) = New Form_FinancialRecords_Sales + g_Form_Track(FORM_TYPE.财务明细录入_销售).Text = "Form" & FORM_TYPE.财务明细录入_销售 & "-" & g_Form_Track(FORM_TYPE.财务明细录入_销售).Text + End If + + g_Form_Track(FORM_TYPE.财务明细录入_销售).MdiParent = Me + g_Form_Track(FORM_TYPE.财务明细录入_销售).Show() + g_Form_Track(FORM_TYPE.财务明细录入_销售).BringToFront() + End Sub + + Private Sub tsmi_查询_销售部_Click(sender As Object, e As EventArgs) Handles tsmi_查询_销售部.Click + If g_Form_Track(FORM_TYPE.财务明细查询_销售) Is Nothing OrElse g_Form_Track(FORM_TYPE.财务明细查询_销售).IsDisposed Then + g_Form_Track(FORM_TYPE.财务明细查询_销售) = New Form_FinancialQuery_Sales + g_Form_Track(FORM_TYPE.财务明细查询_销售).Text = "Form" & FORM_TYPE.财务明细查询_销售 & "-" & g_Form_Track(FORM_TYPE.财务明细查询_销售).Text + End If + + g_Form_Track(FORM_TYPE.财务明细查询_销售).MdiParent = Me + g_Form_Track(FORM_TYPE.财务明细查询_销售).Show() + g_Form_Track(FORM_TYPE.财务明细查询_销售).BringToFront() + End Sub + + Private Sub BOMToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BOMToolStripMenuItem.Click + If g_Form_Track(FORM_TYPE.BOM管理) Is Nothing OrElse g_Form_Track(FORM_TYPE.BOM管理).IsDisposed Then + g_Form_Track(FORM_TYPE.BOM管理) = New form_BomManage + g_Form_Track(FORM_TYPE.BOM管理).Text = "Form" & FORM_TYPE.BOM管理 & "-" & g_Form_Track(FORM_TYPE.BOM管理).Text + End If + + g_Form_Track(FORM_TYPE.BOM管理).MdiParent = Me + g_Form_Track(FORM_TYPE.BOM管理).Show() + g_Form_Track(FORM_TYPE.BOM管理).BringToFront() + End Sub + + Private Sub 合并备料查询ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 合并备料查询ToolStripMenuItem.Click + If g_Form_Track(FORM_TYPE.合并用料查询) Is Nothing OrElse g_Form_Track(FORM_TYPE.合并用料查询).IsDisposed Then + g_Form_Track(FORM_TYPE.合并用料查询) = New Form_合并备料查询 + g_Form_Track(FORM_TYPE.合并用料查询).Text = "Form" & FORM_TYPE.合并用料查询 & "-" & g_Form_Track(FORM_TYPE.合并用料查询).Text + End If + + g_Form_Track(FORM_TYPE.合并用料查询).MdiParent = Me + g_Form_Track(FORM_TYPE.合并用料查询).Show() + g_Form_Track(FORM_TYPE.合并用料查询).BringToFront() + End Sub + + Private Sub 备份管理ToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles 备份管理ToolStripMenuItem1.Click + If g_Form_Track(FORM_TYPE.备份管理) Is Nothing OrElse g_Form_Track(FORM_TYPE.备份管理).IsDisposed Then + g_Form_Track(FORM_TYPE.备份管理) = New Form_备份管理 + g_Form_Track(FORM_TYPE.备份管理).Text = "Form" & FORM_TYPE.备份管理 & "-" & g_Form_Track(FORM_TYPE.备份管理).Text + End If + + g_Form_Track(FORM_TYPE.备份管理).MdiParent = Me + g_Form_Track(FORM_TYPE.备份管理).Show() + g_Form_Track(FORM_TYPE.备份管理).BringToFront() + End Sub + + +End Class + + diff --git a/WT-DMS/Form_FinancialQuery_Development.Designer.vb b/WT-DMS/Form_FinancialQuery_Development.Designer.vb new file mode 100644 index 0000000..0364758 --- /dev/null +++ b/WT-DMS/Form_FinancialQuery_Development.Designer.vb @@ -0,0 +1,103 @@ + _ +Partial Class Form_FinancialQuery_Development + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_FinancialQuery_Development)) + Me.Grid1 = New FlexCell.Grid() + Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() + Me.tsb_Query = New System.Windows.Forms.ToolStripButton() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.tsb_ExportToExcel = New System.Windows.Forms.ToolStripButton() + Me.ToolStrip1.SuspendLayout() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.AllowUserSort = True + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(0, 28) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(948, 539) + Me.Grid1.TabIndex = 16 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'ToolStrip1 + ' + Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsb_Query, Me.ToolStripSeparator1, Me.tsb_ExportToExcel}) + Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) + Me.ToolStrip1.Name = "ToolStrip1" + Me.ToolStrip1.Size = New System.Drawing.Size(948, 25) + Me.ToolStrip1.TabIndex = 19 + Me.ToolStrip1.Text = "ToolStrip1" + ' + 'tsb_Query + ' + Me.tsb_Query.Image = CType(resources.GetObject("tsb_Query.Image"), System.Drawing.Image) + Me.tsb_Query.ImageTransparentColor = System.Drawing.Color.Magenta + Me.tsb_Query.Name = "tsb_Query" + Me.tsb_Query.Size = New System.Drawing.Size(52, 22) + Me.tsb_Query.Text = "查询" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25) + ' + 'tsb_ExportToExcel + ' + Me.tsb_ExportToExcel.Image = CType(resources.GetObject("tsb_ExportToExcel.Image"), System.Drawing.Image) + Me.tsb_ExportToExcel.ImageTransparentColor = System.Drawing.Color.Magenta + Me.tsb_ExportToExcel.Name = "tsb_ExportToExcel" + Me.tsb_ExportToExcel.Size = New System.Drawing.Size(93, 22) + Me.tsb_ExportToExcel.Text = "导出为Excel" + ' + 'Form_FinancialQuery_Development + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(948, 569) + Me.Controls.Add(Me.ToolStrip1) + Me.Controls.Add(Me.Grid1) + Me.Name = "Form_FinancialQuery_Development" + Me.Text = "帐务明细查询-开发部" + Me.ToolStrip1.ResumeLayout(False) + Me.ToolStrip1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip + Friend WithEvents tsb_ExportToExcel As System.Windows.Forms.ToolStripButton + Friend WithEvents tsb_Query As System.Windows.Forms.ToolStripButton + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator +End Class diff --git a/WT-DMS/Form_FinancialQuery_Development.resx b/WT-DMS/Form_FinancialQuery_Development.resx new file mode 100644 index 0000000..23998a4 --- /dev/null +++ b/WT-DMS/Form_FinancialQuery_Development.resx @@ -0,0 +1,170 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/w///4AKOo/wAP//gAo6jwAAD/+ACjqPAPAA/4AKOo8P/wAPgAo6j///8A+A + CjqP////D4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/////4AKOo//////gAo6j/////+ACjqP/////4AKOo//////gAo6j/////+A + CjqP/////4AKOo//////gAo6iIiIiIiACjo= + + + + 17, 17 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + \ No newline at end of file diff --git a/WT-DMS/Form_FinancialQuery_Development.vb b/WT-DMS/Form_FinancialQuery_Development.vb new file mode 100644 index 0000000..fbc2684 --- /dev/null +++ b/WT-DMS/Form_FinancialQuery_Development.vb @@ -0,0 +1,63 @@ +Public Class Form_FinancialQuery_Development + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + + Public Shared cst_TABLE_NAME As String = "收支明细表_开发" + + Private Sub tsb_Query_Click(sender As Object, e As EventArgs) Handles tsb_Query.Click + RefreshList() + End Sub + + Private Function QueryAllFinancialItems() As Boolean + Dim result As Boolean = False + Dim strSQL As String = "SELECT * FROM `" & cst_TABLE_NAME & "` GROUP BY `序号`" + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.财务管理, strSQL, m_Table) = True Then + result = True + End If + + Return result + End Function + + Private Function RefreshList() As Boolean + QueryAllFinancialItems() + + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '绑定到数据源时可以指定固定行数，但绑定后不能改变Grid.FixedRows属性的值 + 'Grid1.SetDataBinding(m_Table, "products", True, 2) + Grid1.SetDataBinding(m_Table, "", True, 1) + + CGirdInfo.LoadGridInfo("财务管理_查询", Grid1) + + Grid1.Locked = True + + Return True + End Function + + Private Sub Grid1_ColWidthChange(Sender As Object, e As FlexCell.Grid.ColWidthChangeEventArgs) Handles Grid1.ColWidthChange + CGirdInfo.SaveGirdInfo("财务管理_查询", Grid1) + End Sub + + Private Sub tsb_ExportToExcel_Click(sender As Object, e As EventArgs) Handles tsb_ExportToExcel.Click + Dim dlg As New SaveFileDialog + dlg.DefaultExt = "xls" + dlg.Filter = "Excel File (*.xls)|*.xls" + If dlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then + Return + End If + + If Grid1.ExportToExcel(dlg.FileName, True, False) = True Then + MsgBox("导出为Excel OK！") + Else + MsgBox("导出为Excel Error！") + End If + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/Form_FinancialQuery_Sales.Designer.vb b/WT-DMS/Form_FinancialQuery_Sales.Designer.vb new file mode 100644 index 0000000..2d2e335 --- /dev/null +++ b/WT-DMS/Form_FinancialQuery_Sales.Designer.vb @@ -0,0 +1,101 @@ + _ +Partial Class Form_FinancialQuery_Sales + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_FinancialQuery_Sales)) + Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() + Me.tsb_Query = New System.Windows.Forms.ToolStripButton() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.tsb_ExportToExcel = New System.Windows.Forms.ToolStripButton() + Me.Grid1 = New FlexCell.Grid() + Me.ToolStrip1.SuspendLayout() + Me.SuspendLayout() + ' + 'ToolStrip1 + ' + Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsb_Query, Me.ToolStripSeparator1, Me.tsb_ExportToExcel}) + Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) + Me.ToolStrip1.Name = "ToolStrip1" + Me.ToolStrip1.Size = New System.Drawing.Size(893, 25) + Me.ToolStrip1.TabIndex = 21 + Me.ToolStrip1.Text = "ToolStrip1" + ' + 'tsb_Query + ' + Me.tsb_Query.Image = CType(resources.GetObject("tsb_Query.Image"), System.Drawing.Image) + Me.tsb_Query.ImageTransparentColor = System.Drawing.Color.Magenta + Me.tsb_Query.Name = "tsb_Query" + Me.tsb_Query.Size = New System.Drawing.Size(52, 22) + Me.tsb_Query.Text = "查询" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 25) + ' + 'tsb_ExportToExcel + ' + Me.tsb_ExportToExcel.Image = CType(resources.GetObject("tsb_ExportToExcel.Image"), System.Drawing.Image) + Me.tsb_ExportToExcel.ImageTransparentColor = System.Drawing.Color.Magenta + Me.tsb_ExportToExcel.Name = "tsb_ExportToExcel" + Me.tsb_ExportToExcel.Size = New System.Drawing.Size(93, 22) + Me.tsb_ExportToExcel.Text = "导出为Excel" + ' + 'Grid1 + ' + Me.Grid1.AllowUserSort = True + Me.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Dock = System.Windows.Forms.DockStyle.Fill + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(0, 25) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(893, 535) + Me.Grid1.TabIndex = 22 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Form_FinancialQuery_Sales + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(893, 560) + Me.Controls.Add(Me.Grid1) + Me.Controls.Add(Me.ToolStrip1) + Me.Name = "Form_FinancialQuery_Sales" + Me.Text = "帐务明细查询-销售部" + Me.ToolStrip1.ResumeLayout(False) + Me.ToolStrip1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip + Friend WithEvents tsb_Query As System.Windows.Forms.ToolStripButton + Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator + Friend WithEvents tsb_ExportToExcel As System.Windows.Forms.ToolStripButton + Friend WithEvents Grid1 As FlexCell.Grid +End Class diff --git a/WT-DMS/Form_FinancialQuery_Sales.resx b/WT-DMS/Form_FinancialQuery_Sales.resx new file mode 100644 index 0000000..0935aea --- /dev/null +++ b/WT-DMS/Form_FinancialQuery_Sales.resx @@ -0,0 +1,170 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/w///4AKOo/wAP//gAo6jwAAD/+ACjqPAPAA/4AKOo8P/wAPgAo6j///8A+A + CjqP////D4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/////4AKOo//////gAo6j/////+ACjqP/////4AKOo//////gAo6j/////+A + CjqP/////4AKOo//////gAo6iIiIiIiACjo= + + + \ No newline at end of file diff --git a/WT-DMS/Form_FinancialQuery_Sales.vb b/WT-DMS/Form_FinancialQuery_Sales.vb new file mode 100644 index 0000000..dce93e6 --- /dev/null +++ b/WT-DMS/Form_FinancialQuery_Sales.vb @@ -0,0 +1,63 @@ +Public Class Form_FinancialQuery_Sales + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + + Public Shared cst_TABLE_NAME As String = "收支明细表_销售" + + Private Sub tsb_Query_Click(sender As Object, e As EventArgs) Handles tsb_Query.Click + RefreshList() + End Sub + + Private Function QueryAllFinancialItems() As Boolean + Dim result As Boolean = False + Dim strSQL As String = "SELECT * FROM `" & cst_TABLE_NAME & "` GROUP BY `序号`" + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.财务管理, strSQL, m_Table) = True Then + result = True + End If + + Return result + End Function + + Private Function RefreshList() As Boolean + QueryAllFinancialItems() + + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '绑定到数据源时可以指定固定行数，但绑定后不能改变Grid.FixedRows属性的值 + 'Grid1.SetDataBinding(m_Table, "products", True, 2) + Grid1.SetDataBinding(m_Table, "", True, 1) + + CGirdInfo.LoadGridInfo("财务管理_查询_销售", Grid1) + + Grid1.Locked = True + + Return True + End Function + + Private Sub Grid1_ColWidthChange(Sender As Object, e As FlexCell.Grid.ColWidthChangeEventArgs) Handles Grid1.ColWidthChange + CGirdInfo.SaveGirdInfo("财务管理_查询_销售", Grid1) + End Sub + + Private Sub tsb_ExportToExcel_Click(sender As Object, e As EventArgs) Handles tsb_ExportToExcel.Click + Dim dlg As New SaveFileDialog + dlg.DefaultExt = "xls" + dlg.Filter = "Excel File (*.xls)|*.xls" + If dlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then + Return + End If + + If Grid1.ExportToExcel(dlg.FileName, True, False) = True Then + MsgBox("导出为Excel OK！") + Else + MsgBox("导出为Excel Error！") + End If + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/Form_FinancialRecords_Development.Designer.vb b/WT-DMS/Form_FinancialRecords_Development.Designer.vb new file mode 100644 index 0000000..b28f2ba --- /dev/null +++ b/WT-DMS/Form_FinancialRecords_Development.Designer.vb @@ -0,0 +1,139 @@ + _ +Partial Class Form_FinancialRecords_Development + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_FinancialRecords_Development)) + Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() + Me.新建NToolStripButton = New System.Windows.Forms.ToolStripButton() + Me.保存SToolStripButton = New System.Windows.Forms.ToolStripButton() + Me.toolStripSeparator = New System.Windows.Forms.ToolStripSeparator() + Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() + Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() + Me.Grid1 = New FlexCell.Grid() + Me.Label1 = New System.Windows.Forms.Label() + Me.ToolStrip1.SuspendLayout() + Me.SuspendLayout() + ' + 'ToolStrip1 + ' + Me.ToolStrip1.AutoSize = False + Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.新建NToolStripButton, Me.保存SToolStripButton, Me.toolStripSeparator, Me.ToolStripButton1, Me.ToolStripButton2}) + Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) + Me.ToolStrip1.Name = "ToolStrip1" + Me.ToolStrip1.Size = New System.Drawing.Size(828, 48) + Me.ToolStrip1.TabIndex = 0 + Me.ToolStrip1.Text = "ToolStrip1" + ' + '新建NToolStripButton + ' + Me.新建NToolStripButton.Image = CType(resources.GetObject("新建NToolStripButton.Image"), System.Drawing.Image) + Me.新建NToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta + Me.新建NToolStripButton.Name = "新建NToolStripButton" + Me.新建NToolStripButton.Size = New System.Drawing.Size(70, 45) + Me.新建NToolStripButton.Text = "新建(&N)" + ' + '保存SToolStripButton + ' + Me.保存SToolStripButton.Image = CType(resources.GetObject("保存SToolStripButton.Image"), System.Drawing.Image) + Me.保存SToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta + Me.保存SToolStripButton.Name = "保存SToolStripButton" + Me.保存SToolStripButton.Size = New System.Drawing.Size(67, 45) + Me.保存SToolStripButton.Text = "保存(&S)" + ' + 'toolStripSeparator + ' + Me.toolStripSeparator.Name = "toolStripSeparator" + Me.toolStripSeparator.Size = New System.Drawing.Size(6, 48) + ' + 'ToolStripButton1 + ' + Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text + Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image) + Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta + Me.ToolStripButton1.Name = "ToolStripButton1" + Me.ToolStripButton1.Size = New System.Drawing.Size(48, 45) + Me.ToolStripButton1.Text = "增加行" + ' + 'ToolStripButton2 + ' + Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text + Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image) + Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta + Me.ToolStripButton2.Name = "ToolStripButton2" + Me.ToolStripButton2.Size = New System.Drawing.Size(48, 45) + Me.ToolStripButton2.Text = "删除行" + ' + 'Grid1 + ' + Me.Grid1.AllowUserSort = True + Me.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Dock = System.Windows.Forms.DockStyle.Fill + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(0, 48) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(828, 442) + Me.Grid1.TabIndex = 16 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.BackColor = System.Drawing.Color.Gainsboro + Me.Label1.Font = New System.Drawing.Font("微软雅黑", 26.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Label1.ForeColor = System.Drawing.Color.Blue + Me.Label1.Location = New System.Drawing.Point(348, 1) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(125, 46) + Me.Label1.TabIndex = 17 + Me.Label1.Text = "开发部" + ' + 'Form_FinancialRecords_Development + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(828, 490) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.Grid1) + Me.Controls.Add(Me.ToolStrip1) + Me.Name = "Form_FinancialRecords_Development" + Me.Text = "帐务明细录入-开发部" + Me.ToolStrip1.ResumeLayout(False) + Me.ToolStrip1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip + Friend WithEvents 新建NToolStripButton As System.Windows.Forms.ToolStripButton + Friend WithEvents 保存SToolStripButton As System.Windows.Forms.ToolStripButton + Friend WithEvents toolStripSeparator As System.Windows.Forms.ToolStripSeparator + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton + Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton + Friend WithEvents Label1 As System.Windows.Forms.Label +End Class diff --git a/WT-DMS/Form_FinancialRecords_Development.resx b/WT-DMS/Form_FinancialRecords_Development.resx new file mode 100644 index 0000000..256d783 --- /dev/null +++ b/WT-DMS/Form_FinancialRecords_Development.resx @@ -0,0 +1,197 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEPSURBVDhPrdPZasJAFAZgX8q+Q32N9o2kXkjphQsigoJC + ixa1VAWXiohG7IakbmjcNcYl5i8TCQSdGXPhgcPczHwz5xzGZrtWRN+bOM1wqo5gvAJfrIBy4w/cu8hh + VjyG3nDjuOcjkbTABB58cSRy9SMiiPSXhF6rTMDpedEPG0ktJfD8wQT26gEEMSAq4I3mqYCmaZCVHQZj + WQfst3f0Ep7CGSqw3amYzBWI/TkfcAdTZ4B60LCQt+hJK3yJEz7g8ifOAGWzhzRdo9WdofYt8QFSnzlI + 42bLDdqDBZqtMUpC3zpgbtxPe4rq5xDZSsc6YG6c8DtCodZDsihaA4x5s1bmGI0Zkw2X8lofWHf+AdjM + 9sNc+xBlAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIsSURBVDhPrZPdS5NxFMf3L3TfTdBFtzU1hmuxGjzlHMqq + YVgRvT2RL+XSZZqoWJlGLV8gW+HSScvpJJxU+AamSI2hTCVLM1e0xKGm2EQw+PY7v+j5tTIvoh+cy8/n + POec76NS/Y/37GkUVL72ZbR5l/DYvYDGhgjuO2ZQW/MJ9tsh3CifQmnJBAoLXiMvdxQXzgeh9Cawtweo + qV7FRm9ldQ3GtF4cTnvCSxF4Wxe5oLLiy195giMLK9htfg61WoblkEcI3I/muaC05PO6gp/w+/Ai4kw+ + FFyexgFzkxA462e54JLt3R+CX+GRyQi2SV5Yc8aRmuIUgrq7YS7IzhqNEfwODwbD2Kx3Q5YDMJkcQlBd + 9ZEL5DMBRbAe3OP/gE2JDThy9AWSkmqF4GblNLq7wE4JHD/5CpZjA3zbtDCamT6bOv+A+3DQ0glJsgvB + 1bJJdPjAMgA0ub6xu39F+fU5vlRaGM2cmRFU4OTUdhgMFUJwpXAcnmbgoXONBScKY3pOTJlP2JB+roh3 + Tk5h8H4P9PoyIbDljTEYqLoT5Z1JwEKCOK2EobezGJuag5x7DXuNbRzW7nFBpysSAoql4x6UzyYBwWfz + b+FNaB6hmSVcLLYjXu9icCPidz2ANjFfCDIzhtncy3zmrQYPtuyQ0NLRD1/XILr7/Bh4OYR9JgvUunok + MHi7pg4ajVUIKNOnT/XzeFLCKCR0ZzoVbZsWRjNTVyqCdyZkxwr+9a/+Dk60OMVjMFpXAAAAAElFTkSu + QmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/w///4AKOo/wAP//gAo6jwAAD/+ACjqPAPAA/4AKOo8P/wAPgAo6j///8A+A + CjqP////D4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/////4AKOo//////gAo6j/////+ACjqP/////4AKOo//////gAo6j/////+A + CjqP/////4AKOo//////gAo6iIiIiIiACjo= + + + \ No newline at end of file diff --git a/WT-DMS/Form_FinancialRecords_Development.vb b/WT-DMS/Form_FinancialRecords_Development.vb new file mode 100644 index 0000000..d6a137c --- /dev/null +++ b/WT-DMS/Form_FinancialRecords_Development.vb @@ -0,0 +1,564 @@ +Public Class Form_FinancialRecords_Development + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + + Public Shared cst_TABLE_NAME As String = "收支明细表_开发" + + Public Enum COLS + 序号 + 日期 + 收入 + 支出 + 余额 + 收支类别 + 收支子类别 + 机种 + 交易方 + 业务类型 + 事由 + 经手人 + 单据类型 + 单据编号 + 备注1 + 备注2 + 备注3 + 记录日期 + 记录时间 + max + End Enum + + Public Enum COLS_PROP + Name + Insert + Visible + End Enum + + '名称/Query + Public Shared m_COLS_NAME(,) As String = { + {"序号", "0", "1"}, + {"日期", "1", "1"}, + {"收入", "1", "1"}, + {"支出", "1", "1"}, + {"余额", "1", "1"}, + {"收支类别", "1", "1"}, + {"收支子类别", "1", "1"}, + {"机种", "1", "1"}, + {"交易方", "1", "1"}, + {"业务类型", "1", "1"}, + {"事由", "1", "1"}, + {"经手人", "1", "1"}, + {"单据类型", "1", "1"}, + {"单据编号", "1", "1"}, + {"备注1", "1", "1"}, + {"备注2", "1", "1"}, + {"备注3", "1", "1"}, + {"记录日期", "1", "1"}, + {"记录时间", "1", "1"} + } + + Private m_ColsType() As FlexCell.CellTypeEnum = { + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.Calendar, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox + } + + + Dim gridItemRecords_收支类别 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_机种 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_交易方 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_业务类型 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_单据类型 As New System.Windows.Forms.AutoCompleteStringCollection + + Dim gridSubList_收支类别 As New ArrayList + + Dim gridItemRecords_收支子类别 As New System.Windows.Forms.AutoCompleteStringCollection + + Private Sub FillGridHeaderByDataTable() + Grid1.NewFile() + + Grid1.AllowUserSort = False + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + Grid1.Cols = COLS.max + Dim colIndex As Integer = 0 + For col As Integer = 0 To COLS.max - 1 + If m_COLS_NAME(col, COLS_PROP.Visible) = "1" Then + Grid1.Cell(0, colIndex).Text = m_COLS_NAME(col, 0) + Grid1.Column(colIndex).CellType = m_ColsType(col) + colIndex += 1 + End If + Next + + SetGridDataSource() + + + '调整宽度 + Grid1.Column(COLS.序号).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_序号 + Grid1.Column(COLS.日期).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_日期 + Grid1.Column(COLS.收入).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收入 + Grid1.Column(COLS.支出).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_支出 + Grid1.Column(COLS.余额).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_余额 + Grid1.Column(COLS.收支类别).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支类别 + Grid1.Column(COLS.收支子类别).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支子类别 + Grid1.Column(COLS.机种).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_机种 + Grid1.Column(COLS.交易方).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_交易方 + Grid1.Column(COLS.业务类型).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_业务类型 + Grid1.Column(COLS.事由).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_事由 + Grid1.Column(COLS.经手人).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_经手人 + Grid1.Column(COLS.单据类型).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据类型 + Grid1.Column(COLS.单据编号).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据编号 + Grid1.Column(COLS.备注1).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注1 + Grid1.Column(COLS.备注2).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注2 + Grid1.Column(COLS.备注3).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注3 + Me.Height = My.Settings.FORM_FINAN_RECORD_HEIGHT + Me.Width = My.Settings.FORM_FINAN_RECORD_WIDTH + + + Grid1.Column(COLS.余额).Locked = True + Grid1.Column(COLS.记录日期).Locked = True + Grid1.Column(COLS.记录时间).Locked = True + + + Grid1.AllowUserSort = True + Grid1.Locked = False + Grid1.Column(COLS.序号).Locked = True + + Grid1.Rows = 500 + + '更新序号 + UpdateItemSN() + + Application.DoEvents() + End Sub + + Private Sub SetGridDataSource() + With Grid1.ComboBox(COLS.收支类别) + .DataSource = Nothing + .DataSource = gridItemRecords_收支类别 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.收支子类别) + .DataSource = Nothing + .DataSource = gridItemRecords_收支子类别 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.机种) + .DataSource = Nothing + .DataSource = gridItemRecords_机种 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.交易方) + .DataSource = Nothing + .DataSource = gridItemRecords_交易方 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.业务类型) + .DataSource = Nothing + .DataSource = gridItemRecords_业务类型 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.单据类型) + .DataSource = Nothing + .DataSource = gridItemRecords_单据类型 + .Locked = False + .AutoComplete = True + End With + End Sub + + Private Sub Form_FinancialRecords_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_序号 = Grid1.Column(COLS.序号).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_日期 = Grid1.Column(COLS.日期).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收入 = Grid1.Column(COLS.收入).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_支出 = Grid1.Column(COLS.支出).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_余额 = Grid1.Column(COLS.余额).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支类别 = Grid1.Column(COLS.收支类别).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支子类别 = Grid1.Column(COLS.收支子类别).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_机种 = Grid1.Column(COLS.机种).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_交易方 = Grid1.Column(COLS.交易方).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_业务类型 = Grid1.Column(COLS.业务类型).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_事由 = Grid1.Column(COLS.事由).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_经手人 = Grid1.Column(COLS.经手人).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据类型 = Grid1.Column(COLS.单据类型).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据编号 = Grid1.Column(COLS.单据编号).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注1 = Grid1.Column(COLS.备注1).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注2 = Grid1.Column(COLS.备注2).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注3 = Grid1.Column(COLS.备注3).Width + My.Settings.FORM_FINAN_RECORD_HEIGHT = Me.Height + My.Settings.FORM_FINAN_RECORD_WIDTH = Me.Width + + My.Settings.Save() + CGirdInfo.SaveRecentList("财务_收支类别", gridItemRecords_收支类别) + 'CGirdInfo.SaveRecentList("财务_收支子类别", gridItemRecords_收支子类别) + CGirdInfo.SaveRecentList("财务_机种", gridItemRecords_机种) + CGirdInfo.SaveRecentList("财务_交易方", gridItemRecords_交易方) + CGirdInfo.SaveRecentList("财务_业务类型", gridItemRecords_业务类型) + CGirdInfo.SaveRecentList("财务_单据类型", gridItemRecords_单据类型) + CGirdInfo.SaveRecentSubList(gridSubList_收支类别) + End Sub + + Private Sub Form_FinancialRecords_Load(sender As Object, e As EventArgs) Handles MyBase.Load + CGirdInfo.LoadRecentList("财务_收支类别", gridItemRecords_收支类别) + 'CGirdInfo.LoadRecentList("财务_收支子类别", gridItemRecords_收支子类别) + CGirdInfo.LoadRecentList("财务_机种", gridItemRecords_机种) + CGirdInfo.LoadRecentList("财务_交易方", gridItemRecords_交易方) + CGirdInfo.LoadRecentList("财务_业务类型", gridItemRecords_业务类型) + CGirdInfo.LoadRecentList("财务_单据类型", gridItemRecords_单据类型) + CGirdInfo.LoadRecentSubList("财务_收支类别", gridSubList_收支类别) + + gridItemRecords_收支子类别 = Nothing + + FillGridHeaderByDataTable() + End Sub + + + Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click + Grid1.Selection.InsertRows() + UpdateItemSN() + End Sub + + Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click + Grid1.Selection.DeleteByRow() + UpdateItemSN() + End Sub + + Private Sub 新建NToolStripButton_Click(sender As Object, e As EventArgs) Handles 新建NToolStripButton.Click + FillGridHeaderByDataTable() + End Sub + Private Sub 保存SToolStripButton_Click(sender As Object, e As EventArgs) Handles 保存SToolStripButton.Click + If CheckAllRowValid() = False Then + MsgBox("输入信息存在错误!") + Return + End If + + '计算余额 + Dim dblBalance As Double = 0 + If GetLatestBalance(dblBalance) = False Then + MsgBox("查询余额失败!") + Return + End If + + '计算各个有效列对应的余额 + Dim dblIncom As Double = 0 + Dim dblExpenditure As Double = 0 + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.序号).BackColor = Color.Green Then + dblIncom = Grid1.Cell(row, COLS.收入).Text + dblExpenditure = Grid1.Cell(row, COLS.支出).Text + dblBalance += dblIncom + dblBalance -= dblExpenditure + + Grid1.Cell(row, COLS.余额).Text = dblBalance + End If + Next + + '更新"记录日期"及"记录时间" + Dim mCurrDateTime As Date = Now + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.序号).BackColor = Color.Green Then + Grid1.Cell(row, COLS.记录日期).Text = mCurrDateTime.ToString("yyyy-MM-dd") + Grid1.Cell(row, COLS.记录时间).Text = mCurrDateTime.ToString("HH:mm:ss") + End If + Next + + + '将列表中的数据保存到数据库中 + If SaveFinancialRecordItems() = True Then + MsgBox("保存成功!") + Else + MsgBox("保存失败!") + End If + + '更新历史列表 + SaveRecentList() + End Sub + + Private Function SaveRecentList() As Boolean + For row As Integer = 1 To Grid1.Rows - 1 + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.机种).Text, gridItemRecords_机种) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.交易方).Text, gridItemRecords_交易方) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.业务类型).Text, gridItemRecords_业务类型) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.单据类型).Text, gridItemRecords_单据类型) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.收支类别).Text, gridItemRecords_收支类别) + If Grid1.Cell(row, COLS.收支类别).Text.Length > 0 AndAlso Grid1.Cell(row, COLS.收支子类别).Text.Length > 0 Then + CGirdInfo.AddToRecentSubList("财务_收支类别", Grid1.Cell(row, COLS.收支类别).Text, Grid1.Cell(row, COLS.收支子类别).Text, gridSubList_收支类别) + End If + Next + + SetGridDataSource() + + Return True + End Function + + Private Function CheckRowValid(ByVal rowIndex As Integer) As Boolean + Dim checkResult As Boolean = True + + If Grid1.Cell(rowIndex, COLS.日期).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.日期).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.日期).BackColor = Color.Green + End If + + Dim strVal1 As String = Grid1.Cell(rowIndex, COLS.收入).Text + Dim strVal2 As String = Grid1.Cell(rowIndex, COLS.支出).Text + Dim DataValid1 As Boolean = False + Dim DataValid2 As Boolean = False + If strVal1.Length > 0 AndAlso strVal1 <> "0" Then + DataValid1 = isDoubleValue(strVal1) + + If DataValid1 = False Then + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Red + Else + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Green + End If + End If + If strVal2.Length > 0 AndAlso strVal2 <> "0" Then + DataValid2 = isDoubleValue(strVal2) + + If DataValid2 = False Then + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Red + Else + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Green + End If + End If + + If (DataValid1 = True AndAlso DataValid2 = True) OrElse + (DataValid1 = False AndAlso DataValid2 = False) Then + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Red + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Red + checkResult = False + Else + If DataValid1 = False Then + Grid1.Cell(rowIndex, COLS.收入).Text = "0" + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Green + End If + If DataValid2 = False Then + Grid1.Cell(rowIndex, COLS.支出).Text = "0" + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Green + End If + End If + + + If Grid1.Cell(rowIndex, COLS.收支类别).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.收支类别).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.收支类别).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.收支子类别).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.收支子类别).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.收支子类别).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.机种).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.机种).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.机种).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.交易方).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.交易方).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.交易方).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.业务类型).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.业务类型).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.业务类型).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.事由).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.事由).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.事由).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.经手人).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.经手人).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.经手人).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.单据类型).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.单据类型).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.单据类型).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.单据编号).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.单据编号).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.单据编号).BackColor = Color.Green + End If + + + Return checkResult + End Function + + Private Function CheckAllRowValid() As Boolean + '清除表状态 + For row As Integer = 1 To Grid1.Rows - 1 + For col As Integer = 0 To Grid1.Cols - 1 + Grid1.Cell(row, col).BackColor = Color.White + Next + Next + + Dim checkResult As Boolean = True + Dim isEmpty As Boolean = True + For row As Integer = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.日期).Text.Length > 0 Then + isEmpty = False + If CheckRowValid(row) = False Then + checkResult = False + Else + Grid1.Cell(row, COLS.序号).BackColor = Color.Green + End If + End If + Next + + If isEmpty = True Then + checkResult = False + MsgBox("列表为空！") + End If + + Return checkResult + End Function + + Private Function SaveFinancialRecordItems() As Boolean + Dim row As Integer + Dim col As Integer + Dim result As Boolean = True + + 'INSERT INTO table_name(col_name,...) values(expr,...) + Dim strInsert As String = "INSERT INTO `" & cst_TABLE_NAME & "` " + Dim insertItems As String = "" + For col = 0 To COLS.max - 1 + If m_COLS_NAME(col, COLS_PROP.Insert) = "1" Then + If insertItems.Length > 0 Then + insertItems &= "," + End If + insertItems &= "`" & m_COLS_NAME(col, 0) & "`" + End If + Next + + '增加“操作人”字段 + insertItems &= ",`操作人`" + + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.序号).BackColor = Color.Green Then + Dim insertValues As String = "" + + For col = 0 To COLS.max - 1 + If m_COLS_NAME(col, COLS_PROP.Insert) = "1" Then + If insertValues.Length > 0 Then + insertValues &= "," + End If + + If Grid1.Column(col).CellType = FlexCell.CellTypeEnum.CheckBox Then + If Grid1.Cell(row, col).BooleanValue = True Then + insertValues &= "'1'" + Else + insertValues &= "'0'" + End If + Else + insertValues &= "'" & Grid1.Cell(row, col).Text & "'" + End If + End If + Next + + insertValues &= "," & "'" & Current_UserName & "'" + + Dim strSQL As String = strInsert & "(" & insertItems & ") values(" & insertValues & ")" + If SQL_ExeCommand(COL_RIGHTS.财务管理, strSQL) = False Then + result = False + Exit For + End If + End If + Next + + Return result + End Function + + Private Sub UpdateItemSN() + For row As Integer = 1 To Grid1.Rows - 1 + Grid1.Cell(row, COLS.序号).Text = row + Next + End Sub + + Private Sub Grid1_CellChange(Sender As Object, e As FlexCell.Grid.CellChangeEventArgs) Handles Grid1.CellChange + If e.Row > 0 AndAlso e.Col = COLS.收支类别 Then + Grid1.Cell(e.Row, COLS.收支子类别).Text = "" + + ''查找当前“收支类别”对应的子类别 + 'If Grid1.Cell(e.Row, COLS.收支类别).Text.Length > 0 Then + ' CGirdInfo.GetRecentSubList("财务_收支类别", Grid1.Cell(e.Row, COLS.收支类别).Text, gridSubList_收支类别, gridItemRecords_收支子类别) + ' SetGridDataSource() + 'End If + End If + End Sub + + Private Sub Grid1_RowColChange(Sender As Object, e As FlexCell.Grid.RowColChangeEventArgs) Handles Grid1.RowColChange + If e.Row > 0 AndAlso e.Col = COLS.收支子类别 Then + '查找当前“收支类别”对应的子类别 + If Grid1.Cell(e.Row, COLS.收支类别).Text.Length > 0 Then + CGirdInfo.GetRecentSubList("财务_收支类别", Grid1.Cell(e.Row, COLS.收支类别).Text, gridSubList_收支类别, gridItemRecords_收支子类别) + SetGridDataSource() + End If + End If + End Sub + + Private Function GetLatestBalance(ByRef rBalance As Double) As Boolean + Dim result As Boolean = False + Dim strSQL As String = "SELECT `" & m_COLS_NAME(COLS.余额, COLS_PROP.Name) & "` FROM `" & cst_TABLE_NAME & "` WHERE `" & m_COLS_NAME(COLS.序号, COLS_PROP.Name) & "`= (SELECT max(`" & m_COLS_NAME(COLS.序号, COLS_PROP.Name) & "`) FROM `" & cst_TABLE_NAME & "`)" + + rBalance = 0 + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.财务管理, strSQL, m_Table) = True Then + Try + rBalance = m_Table.Rows(0).Item(0) + Catch ex As Exception + End Try + result = True + End If + + Return result + End Function +End Class \ No newline at end of file diff --git a/WT-DMS/Form_FinancialRecords_Sales.Designer.vb b/WT-DMS/Form_FinancialRecords_Sales.Designer.vb new file mode 100644 index 0000000..e5c4537 --- /dev/null +++ b/WT-DMS/Form_FinancialRecords_Sales.Designer.vb @@ -0,0 +1,139 @@ + _ +Partial Class Form_FinancialRecords_Sales + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_FinancialRecords_Sales)) + Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() + Me.新建NToolStripButton = New System.Windows.Forms.ToolStripButton() + Me.保存SToolStripButton = New System.Windows.Forms.ToolStripButton() + Me.toolStripSeparator = New System.Windows.Forms.ToolStripSeparator() + Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() + Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() + Me.Label1 = New System.Windows.Forms.Label() + Me.Grid1 = New FlexCell.Grid() + Me.ToolStrip1.SuspendLayout() + Me.SuspendLayout() + ' + 'ToolStrip1 + ' + Me.ToolStrip1.AutoSize = False + Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.新建NToolStripButton, Me.保存SToolStripButton, Me.toolStripSeparator, Me.ToolStripButton1, Me.ToolStripButton2}) + Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) + Me.ToolStrip1.Name = "ToolStrip1" + Me.ToolStrip1.Size = New System.Drawing.Size(855, 48) + Me.ToolStrip1.TabIndex = 18 + Me.ToolStrip1.Text = "ToolStrip1" + ' + '新建NToolStripButton + ' + Me.新建NToolStripButton.Image = CType(resources.GetObject("新建NToolStripButton.Image"), System.Drawing.Image) + Me.新建NToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta + Me.新建NToolStripButton.Name = "新建NToolStripButton" + Me.新建NToolStripButton.Size = New System.Drawing.Size(70, 45) + Me.新建NToolStripButton.Text = "新建(&N)" + ' + '保存SToolStripButton + ' + Me.保存SToolStripButton.Image = CType(resources.GetObject("保存SToolStripButton.Image"), System.Drawing.Image) + Me.保存SToolStripButton.ImageTransparentColor = System.Drawing.Color.Magenta + Me.保存SToolStripButton.Name = "保存SToolStripButton" + Me.保存SToolStripButton.Size = New System.Drawing.Size(67, 45) + Me.保存SToolStripButton.Text = "保存(&S)" + ' + 'toolStripSeparator + ' + Me.toolStripSeparator.Name = "toolStripSeparator" + Me.toolStripSeparator.Size = New System.Drawing.Size(6, 48) + ' + 'ToolStripButton1 + ' + Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text + Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image) + Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta + Me.ToolStripButton1.Name = "ToolStripButton1" + Me.ToolStripButton1.Size = New System.Drawing.Size(48, 45) + Me.ToolStripButton1.Text = "增加行" + ' + 'ToolStripButton2 + ' + Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text + Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image) + Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta + Me.ToolStripButton2.Name = "ToolStripButton2" + Me.ToolStripButton2.Size = New System.Drawing.Size(48, 45) + Me.ToolStripButton2.Text = "删除行" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.BackColor = System.Drawing.Color.Gainsboro + Me.Label1.Font = New System.Drawing.Font("微软雅黑", 26.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Label1.ForeColor = System.Drawing.Color.Blue + Me.Label1.Location = New System.Drawing.Point(361, 2) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(125, 46) + Me.Label1.TabIndex = 21 + Me.Label1.Text = "销售部" + ' + 'Grid1 + ' + Me.Grid1.AllowUserSort = True + Me.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Dock = System.Windows.Forms.DockStyle.Fill + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(0, 48) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(855, 468) + Me.Grid1.TabIndex = 22 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Form_FinancialRecords_Sales + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(855, 516) + Me.Controls.Add(Me.Grid1) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.ToolStrip1) + Me.Name = "Form_FinancialRecords_Sales" + Me.Text = "帐务明细录入-销售部" + Me.ToolStrip1.ResumeLayout(False) + Me.ToolStrip1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip + Friend WithEvents 新建NToolStripButton As System.Windows.Forms.ToolStripButton + Friend WithEvents 保存SToolStripButton As System.Windows.Forms.ToolStripButton + Friend WithEvents toolStripSeparator As System.Windows.Forms.ToolStripSeparator + Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton + Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Grid1 As FlexCell.Grid +End Class diff --git a/WT-DMS/Form_FinancialRecords_Sales.resx b/WT-DMS/Form_FinancialRecords_Sales.resx new file mode 100644 index 0000000..495bd87 --- /dev/null +++ b/WT-DMS/Form_FinancialRecords_Sales.resx @@ -0,0 +1,200 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + 17, 17 + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEPSURBVDhPrdPZasJAFAZgX8q+Q32N9o2kXkjphQsigoJC + ixa1VAWXiohG7IakbmjcNcYl5i8TCQSdGXPhgcPczHwz5xzGZrtWRN+bOM1wqo5gvAJfrIBy4w/cu8hh + VjyG3nDjuOcjkbTABB58cSRy9SMiiPSXhF6rTMDpedEPG0ktJfD8wQT26gEEMSAq4I3mqYCmaZCVHQZj + WQfst3f0Ep7CGSqw3amYzBWI/TkfcAdTZ4B60LCQt+hJK3yJEz7g8ifOAGWzhzRdo9WdofYt8QFSnzlI + 42bLDdqDBZqtMUpC3zpgbtxPe4rq5xDZSsc6YG6c8DtCodZDsihaA4x5s1bmGI0Zkw2X8lofWHf+AdjM + 9sNc+xBlAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIsSURBVDhPrZPdS5NxFMf3L3TfTdBFtzU1hmuxGjzlHMqq + YVgRvT2RL+XSZZqoWJlGLV8gW+HSScvpJJxU+AamSI2hTCVLM1e0xKGm2EQw+PY7v+j5tTIvoh+cy8/n + POec76NS/Y/37GkUVL72ZbR5l/DYvYDGhgjuO2ZQW/MJ9tsh3CifQmnJBAoLXiMvdxQXzgeh9Cawtweo + qV7FRm9ldQ3GtF4cTnvCSxF4Wxe5oLLiy195giMLK9htfg61WoblkEcI3I/muaC05PO6gp/w+/Ai4kw+ + FFyexgFzkxA462e54JLt3R+CX+GRyQi2SV5Yc8aRmuIUgrq7YS7IzhqNEfwODwbD2Kx3Q5YDMJkcQlBd + 9ZEL5DMBRbAe3OP/gE2JDThy9AWSkmqF4GblNLq7wE4JHD/5CpZjA3zbtDCamT6bOv+A+3DQ0glJsgvB + 1bJJdPjAMgA0ub6xu39F+fU5vlRaGM2cmRFU4OTUdhgMFUJwpXAcnmbgoXONBScKY3pOTJlP2JB+roh3 + Tk5h8H4P9PoyIbDljTEYqLoT5Z1JwEKCOK2EobezGJuag5x7DXuNbRzW7nFBpysSAoql4x6UzyYBwWfz + b+FNaB6hmSVcLLYjXu9icCPidz2ANjFfCDIzhtncy3zmrQYPtuyQ0NLRD1/XILr7/Bh4OYR9JgvUunok + MHi7pg4ajVUIKNOnT/XzeFLCKCR0ZzoVbZsWRjNTVyqCdyZkxwr+9a/+Dk60OMVjMFpXAAAAAElFTkSu + QmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIISURBVDhPpZP7S1NxGMbPPxKaXVUkMEq8IpKUCoY/hGgI + ymqkDYYXcCjDZOANURSjCNGFQUTsl4GXVMxKk62YU4fXQpaIlygHQxBRH8/zwvyaIAYe+HLgnPN8nue9 + HA3nvDTq63oW/jm13XOwvPTB3DYFY5MH+bXfcN8ygfTSMSSXfESicQDxBqdYHwH29g9w2tnZ3UcguIvN + rR3417exuBJE5N1n/wfwLgXEOc38Bc6xNRHb+/y4nm49G0Bnit2zf9H6bkliE/jKuYxrd6oVgDWfjB+K + TWeKMyrGEVfowITvD9re/9ABVQrAhh0HHK+ZselMMaN/mvwtDb+aVqkA7HYIwIj3ysfluPTorJnP6Ezx + oHsD1s5ZXEktUwCOioB5f1CEPR9+wTG6iuiserTo8dkwng7HT/R+XUPF8xlcTjErAOdMcW6NW8STiwG8 + 7vej8oUPN/PsEv3t8Ao0TZP3T1u8uJRkUgAuSYHtO97oLxmXd5t9Ho8aPTK+GzntqNfrLm2fFoihwYOI + xGIF4KjoGBLzY1OrF9k6OOFxnwDC4wxIMX1G0pMhgVyMNyoA13PAtS7OrJk1PrC69LUdQWxuF6IybHrX + LRI7JrtZdoDAo1XmbjMyD+tjSXxGcXRmnYg5ttD9QuxDhN0uUgDOmbvNTpPOJaGAo2K36cyaGZvOFIfd + KlSA8/zRh9ABIDUG+1JpAAAAAElFTkSuQmCC + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/w///4AKOo/wAP//gAo6jwAAD/+ACjqPAPAA/4AKOo8P/wAPgAo6j///8A+A + CjqP////D4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/////4AKOo//////gAo6j/////+ACjqP/////4AKOo//////gAo6j/////+A + CjqP/////4AKOo//////gAo6iIiIiIiACjo= + + + + 66 + + \ No newline at end of file diff --git a/WT-DMS/Form_FinancialRecords_Sales.vb b/WT-DMS/Form_FinancialRecords_Sales.vb new file mode 100644 index 0000000..ad8a685 --- /dev/null +++ b/WT-DMS/Form_FinancialRecords_Sales.vb @@ -0,0 +1,564 @@ +Public Class Form_FinancialRecords_Sales + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + + Public Shared cst_TABLE_NAME As String = "收支明细表_销售" + + Public Enum COLS + 序号 + 日期 + 收入 + 支出 + 余额 + 收支类别 + 收支子类别 + 机种 + 交易方 + 业务类型 + 事由 + 经手人 + 单据类型 + 单据编号 + 备注1 + 备注2 + 备注3 + 记录日期 + 记录时间 + max + End Enum + + Public Enum COLS_PROP + Name + Insert + Visible + End Enum + + '名称/Query + Public Shared m_COLS_NAME(,) As String = { + {"序号", "0", "1"}, + {"日期", "1", "1"}, + {"收入", "1", "1"}, + {"支出", "1", "1"}, + {"余额", "1", "1"}, + {"收支类别", "1", "1"}, + {"收支子类别", "1", "1"}, + {"机种", "1", "1"}, + {"交易方", "1", "1"}, + {"业务类型", "1", "1"}, + {"事由", "1", "1"}, + {"经手人", "1", "1"}, + {"单据类型", "1", "1"}, + {"单据编号", "1", "1"}, + {"备注1", "1", "1"}, + {"备注2", "1", "1"}, + {"备注3", "1", "1"}, + {"记录日期", "1", "1"}, + {"记录时间", "1", "1"} + } + + Private m_ColsType() As FlexCell.CellTypeEnum = { + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.Calendar, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.ComboBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox, + FlexCell.CellTypeEnum.TextBox + } + + + Dim gridItemRecords_收支类别 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_机种 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_交易方 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_业务类型 As New System.Windows.Forms.AutoCompleteStringCollection + Dim gridItemRecords_单据类型 As New System.Windows.Forms.AutoCompleteStringCollection + + Dim gridSubList_收支类别 As New ArrayList + + Dim gridItemRecords_收支子类别 As New System.Windows.Forms.AutoCompleteStringCollection + + Private Sub FillGridHeaderByDataTable() + Grid1.NewFile() + + Grid1.AllowUserSort = False + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + Grid1.Cols = COLS.max + Dim colIndex As Integer = 0 + For col As Integer = 0 To COLS.max - 1 + If m_COLS_NAME(col, COLS_PROP.Visible) = "1" Then + Grid1.Cell(0, colIndex).Text = m_COLS_NAME(col, 0) + Grid1.Column(colIndex).CellType = m_ColsType(col) + colIndex += 1 + End If + Next + + SetGridDataSource() + + + '调整宽度 + Grid1.Column(COLS.序号).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_序号 + Grid1.Column(COLS.日期).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_日期 + Grid1.Column(COLS.收入).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收入 + Grid1.Column(COLS.支出).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_支出 + Grid1.Column(COLS.余额).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_余额 + Grid1.Column(COLS.收支类别).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支类别 + Grid1.Column(COLS.收支子类别).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支子类别 + Grid1.Column(COLS.机种).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_机种 + Grid1.Column(COLS.交易方).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_交易方 + Grid1.Column(COLS.业务类型).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_业务类型 + Grid1.Column(COLS.事由).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_事由 + Grid1.Column(COLS.经手人).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_经手人 + Grid1.Column(COLS.单据类型).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据类型 + Grid1.Column(COLS.单据编号).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据编号 + Grid1.Column(COLS.备注1).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注1 + Grid1.Column(COLS.备注2).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注2 + Grid1.Column(COLS.备注3).Width = My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注3 + Me.Height = My.Settings.FORM_FINAN_RECORD_HEIGHT + Me.Width = My.Settings.FORM_FINAN_RECORD_WIDTH + + + Grid1.Column(COLS.余额).Locked = True + Grid1.Column(COLS.记录日期).Locked = True + Grid1.Column(COLS.记录时间).Locked = True + + + Grid1.AllowUserSort = True + Grid1.Locked = False + Grid1.Column(COLS.序号).Locked = True + + Grid1.Rows = 500 + + '更新序号 + UpdateItemSN() + + Application.DoEvents() + End Sub + + Private Sub SetGridDataSource() + With Grid1.ComboBox(COLS.收支类别) + .DataSource = Nothing + .DataSource = gridItemRecords_收支类别 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.收支子类别) + .DataSource = Nothing + .DataSource = gridItemRecords_收支子类别 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.机种) + .DataSource = Nothing + .DataSource = gridItemRecords_机种 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.交易方) + .DataSource = Nothing + .DataSource = gridItemRecords_交易方 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.业务类型) + .DataSource = Nothing + .DataSource = gridItemRecords_业务类型 + .Locked = False + .AutoComplete = True + End With + With Grid1.ComboBox(COLS.单据类型) + .DataSource = Nothing + .DataSource = gridItemRecords_单据类型 + .Locked = False + .AutoComplete = True + End With + End Sub + + Private Sub Form_FinancialRecords_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_序号 = Grid1.Column(COLS.序号).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_日期 = Grid1.Column(COLS.日期).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收入 = Grid1.Column(COLS.收入).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_支出 = Grid1.Column(COLS.支出).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_余额 = Grid1.Column(COLS.余额).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支类别 = Grid1.Column(COLS.收支类别).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_收支子类别 = Grid1.Column(COLS.收支子类别).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_机种 = Grid1.Column(COLS.机种).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_交易方 = Grid1.Column(COLS.交易方).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_业务类型 = Grid1.Column(COLS.业务类型).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_事由 = Grid1.Column(COLS.事由).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_经手人 = Grid1.Column(COLS.经手人).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据类型 = Grid1.Column(COLS.单据类型).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_单据编号 = Grid1.Column(COLS.单据编号).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注1 = Grid1.Column(COLS.备注1).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注2 = Grid1.Column(COLS.备注2).Width + My.Settings.FORM_FINAN_RECORD_COL_WIDTH_备注3 = Grid1.Column(COLS.备注3).Width + My.Settings.FORM_FINAN_RECORD_HEIGHT = Me.Height + My.Settings.FORM_FINAN_RECORD_WIDTH = Me.Width + + My.Settings.Save() + CGirdInfo.SaveRecentList("财务_收支类别_销售", gridItemRecords_收支类别) + 'CGirdInfo.SaveRecentList("财务_收支子类别_销售", gridItemRecords_收支子类别) + CGirdInfo.SaveRecentList("财务_机种_销售", gridItemRecords_机种) + CGirdInfo.SaveRecentList("财务_交易方_销售", gridItemRecords_交易方) + CGirdInfo.SaveRecentList("财务_业务类型_销售", gridItemRecords_业务类型) + CGirdInfo.SaveRecentList("财务_单据类型_销售", gridItemRecords_单据类型) + CGirdInfo.SaveRecentSubList(gridSubList_收支类别) + End Sub + + Private Sub Form_FinancialRecords_Load(sender As Object, e As EventArgs) Handles MyBase.Load + CGirdInfo.LoadRecentList("财务_收支类别_销售", gridItemRecords_收支类别) + 'CGirdInfo.LoadRecentList("财务_收支子类别", gridItemRecords_收支子类别) + CGirdInfo.LoadRecentList("财务_机种_销售", gridItemRecords_机种) + CGirdInfo.LoadRecentList("财务_交易方_销售", gridItemRecords_交易方) + CGirdInfo.LoadRecentList("财务_业务类型_销售", gridItemRecords_业务类型) + CGirdInfo.LoadRecentList("财务_单据类型_销售", gridItemRecords_单据类型) + CGirdInfo.LoadRecentSubList("财务_收支类别_销售", gridSubList_收支类别) + + gridItemRecords_收支子类别 = Nothing + + FillGridHeaderByDataTable() + End Sub + + + Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click + Grid1.Selection.InsertRows() + UpdateItemSN() + End Sub + + Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click + Grid1.Selection.DeleteByRow() + UpdateItemSN() + End Sub + + Private Sub 新建NToolStripButton_Click(sender As Object, e As EventArgs) Handles 新建NToolStripButton.Click + FillGridHeaderByDataTable() + End Sub + Private Sub 保存SToolStripButton_Click(sender As Object, e As EventArgs) Handles 保存SToolStripButton.Click + If CheckAllRowValid() = False Then + MsgBox("输入信息存在错误!") + Return + End If + + '计算余额 + Dim dblBalance As Double = 0 + If GetLatestBalance(dblBalance) = False Then + MsgBox("查询余额失败!") + Return + End If + + '计算各个有效列对应的余额 + Dim dblIncom As Double = 0 + Dim dblExpenditure As Double = 0 + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.序号).BackColor = Color.Green Then + dblIncom = Grid1.Cell(row, COLS.收入).Text + dblExpenditure = Grid1.Cell(row, COLS.支出).Text + dblBalance += dblIncom + dblBalance -= dblExpenditure + + Grid1.Cell(row, COLS.余额).Text = dblBalance + End If + Next + + '更新"记录日期"及"记录时间" + Dim mCurrDateTime As Date = Now + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.序号).BackColor = Color.Green Then + Grid1.Cell(row, COLS.记录日期).Text = mCurrDateTime.ToString("yyyy-MM-dd") + Grid1.Cell(row, COLS.记录时间).Text = mCurrDateTime.ToString("HH:mm:ss") + End If + Next + + + '将列表中的数据保存到数据库中 + If SaveFinancialRecordItems() = True Then + MsgBox("保存成功!") + Else + MsgBox("保存失败!") + End If + + '更新历史列表 + SaveRecentList() + End Sub + + Private Function SaveRecentList() As Boolean + For row As Integer = 1 To Grid1.Rows - 1 + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.机种).Text, gridItemRecords_机种) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.交易方).Text, gridItemRecords_交易方) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.业务类型).Text, gridItemRecords_业务类型) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.单据类型).Text, gridItemRecords_单据类型) + CGirdInfo.AddToRecentList(Grid1.Cell(row, COLS.收支类别).Text, gridItemRecords_收支类别) + If Grid1.Cell(row, COLS.收支类别).Text.Length > 0 AndAlso Grid1.Cell(row, COLS.收支子类别).Text.Length > 0 Then + CGirdInfo.AddToRecentSubList("财务_收支类别_销售", Grid1.Cell(row, COLS.收支类别).Text, Grid1.Cell(row, COLS.收支子类别).Text, gridSubList_收支类别) + End If + Next + + SetGridDataSource() + + Return True + End Function + + Private Function CheckRowValid(ByVal rowIndex As Integer) As Boolean + Dim checkResult As Boolean = True + + If Grid1.Cell(rowIndex, COLS.日期).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.日期).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.日期).BackColor = Color.Green + End If + + Dim strVal1 As String = Grid1.Cell(rowIndex, COLS.收入).Text + Dim strVal2 As String = Grid1.Cell(rowIndex, COLS.支出).Text + Dim DataValid1 As Boolean = False + Dim DataValid2 As Boolean = False + If strVal1.Length > 0 AndAlso strVal1 <> "0" Then + DataValid1 = isDoubleValue(strVal1) + + If DataValid1 = False Then + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Red + Else + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Green + End If + End If + If strVal2.Length > 0 AndAlso strVal2 <> "0" Then + DataValid2 = isDoubleValue(strVal2) + + If DataValid2 = False Then + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Red + Else + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Green + End If + End If + + If (DataValid1 = True AndAlso DataValid2 = True) OrElse + (DataValid1 = False AndAlso DataValid2 = False) Then + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Red + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Red + checkResult = False + Else + If DataValid1 = False Then + Grid1.Cell(rowIndex, COLS.收入).Text = "0" + Grid1.Cell(rowIndex, COLS.收入).BackColor = Color.Green + End If + If DataValid2 = False Then + Grid1.Cell(rowIndex, COLS.支出).Text = "0" + Grid1.Cell(rowIndex, COLS.支出).BackColor = Color.Green + End If + End If + + + If Grid1.Cell(rowIndex, COLS.收支类别).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.收支类别).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.收支类别).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.收支子类别).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.收支子类别).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.收支子类别).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.机种).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.机种).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.机种).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.交易方).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.交易方).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.交易方).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.业务类型).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.业务类型).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.业务类型).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.事由).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.事由).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.事由).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.经手人).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.经手人).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.经手人).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.单据类型).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.单据类型).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.单据类型).BackColor = Color.Green + End If + + If Grid1.Cell(rowIndex, COLS.单据编号).Text.Length = 0 Then + Grid1.Cell(rowIndex, COLS.单据编号).BackColor = Color.Red + checkResult = False + Else + Grid1.Cell(rowIndex, COLS.单据编号).BackColor = Color.Green + End If + + + Return checkResult + End Function + + Private Function CheckAllRowValid() As Boolean + '清除表状态 + For row As Integer = 1 To Grid1.Rows - 1 + For col As Integer = 0 To Grid1.Cols - 1 + Grid1.Cell(row, col).BackColor = Color.White + Next + Next + + Dim checkResult As Boolean = True + Dim isEmpty As Boolean = True + For row As Integer = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.日期).Text.Length > 0 Then + isEmpty = False + If CheckRowValid(row) = False Then + checkResult = False + Else + Grid1.Cell(row, COLS.序号).BackColor = Color.Green + End If + End If + Next + + If isEmpty = True Then + checkResult = False + MsgBox("列表为空！") + End If + + Return checkResult + End Function + + Private Function SaveFinancialRecordItems() As Boolean + Dim row As Integer + Dim col As Integer + Dim result As Boolean = True + + 'INSERT INTO table_name(col_name,...) values(expr,...) + Dim strInsert As String = "INSERT INTO `" & cst_TABLE_NAME & "` " + Dim insertItems As String = "" + For col = 0 To COLS.max - 1 + If m_COLS_NAME(col, COLS_PROP.Insert) = "1" Then + If insertItems.Length > 0 Then + insertItems &= "," + End If + insertItems &= "`" & m_COLS_NAME(col, 0) & "`" + End If + Next + + '增加“操作人”字段 + insertItems &= ",`操作人`" + + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.序号).BackColor = Color.Green Then + Dim insertValues As String = "" + + For col = 0 To COLS.max - 1 + If m_COLS_NAME(col, COLS_PROP.Insert) = "1" Then + If insertValues.Length > 0 Then + insertValues &= "," + End If + + If Grid1.Column(col).CellType = FlexCell.CellTypeEnum.CheckBox Then + If Grid1.Cell(row, col).BooleanValue = True Then + insertValues &= "'1'" + Else + insertValues &= "'0'" + End If + Else + insertValues &= "'" & Grid1.Cell(row, col).Text & "'" + End If + End If + Next + + insertValues &= "," & "'" & Current_UserName & "'" + + Dim strSQL As String = strInsert & "(" & insertItems & ") values(" & insertValues & ")" + If SQL_ExeCommand(COL_RIGHTS.财务管理, strSQL) = False Then + result = False + Exit For + End If + End If + Next + + Return result + End Function + + Private Sub UpdateItemSN() + For row As Integer = 1 To Grid1.Rows - 1 + Grid1.Cell(row, COLS.序号).Text = row + Next + End Sub + + Private Sub Grid1_CellChange(Sender As Object, e As FlexCell.Grid.CellChangeEventArgs) Handles Grid1.CellChange + If e.Row > 0 AndAlso e.Col = COLS.收支类别 Then + Grid1.Cell(e.Row, COLS.收支子类别).Text = "" + + ''查找当前“收支类别”对应的子类别 + 'If Grid1.Cell(e.Row, COLS.收支类别).Text.Length > 0 Then + ' CGirdInfo.GetRecentSubList("财务_收支类别", Grid1.Cell(e.Row, COLS.收支类别).Text, gridSubList_收支类别, gridItemRecords_收支子类别) + ' SetGridDataSource() + 'End If + End If + End Sub + + Private Sub Grid1_RowColChange(Sender As Object, e As FlexCell.Grid.RowColChangeEventArgs) Handles Grid1.RowColChange + If e.Row > 0 AndAlso e.Col = COLS.收支子类别 Then + '查找当前“收支类别”对应的子类别 + If Grid1.Cell(e.Row, COLS.收支类别).Text.Length > 0 Then + CGirdInfo.GetRecentSubList("财务_收支类别_销售", Grid1.Cell(e.Row, COLS.收支类别).Text, gridSubList_收支类别, gridItemRecords_收支子类别) + SetGridDataSource() + End If + End If + End Sub + + Private Function GetLatestBalance(ByRef rBalance As Double) As Boolean + Dim result As Boolean = False + Dim strSQL As String = "SELECT `" & m_COLS_NAME(COLS.余额, COLS_PROP.Name) & "` FROM `" & cst_TABLE_NAME & "` WHERE `" & m_COLS_NAME(COLS.序号, COLS_PROP.Name) & "`= (SELECT max(`" & m_COLS_NAME(COLS.序号, COLS_PROP.Name) & "`) FROM `" & cst_TABLE_NAME & "`)" + + rBalance = 0 + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.财务管理, strSQL, m_Table) = True Then + Try + rBalance = m_Table.Rows(0).Item(0) + Catch ex As Exception + End Try + result = True + End If + + Return result + End Function +End Class \ No newline at end of file diff --git a/WT-DMS/Form_LogManage.Designer.vb b/WT-DMS/Form_LogManage.Designer.vb new file mode 100644 index 0000000..9fe5b28 --- /dev/null +++ b/WT-DMS/Form_LogManage.Designer.vb @@ -0,0 +1,81 @@ + _ +Partial Class Form_LogManage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_LogManage)) + Me.Grid1 = New FlexCell.Grid() + Me.btAdd = New System.Windows.Forms.Button() + Me.btDelete = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(12, 12) + Me.Grid1.MultiSelect = False + Me.Grid1.Name = "Grid1" + Me.Grid1.Size = New System.Drawing.Size(600, 503) + Me.Grid1.TabIndex = 1 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'btAdd + ' + Me.btAdd.Location = New System.Drawing.Point(618, 12) + Me.btAdd.Name = "btAdd" + Me.btAdd.Size = New System.Drawing.Size(93, 23) + Me.btAdd.TabIndex = 2 + Me.btAdd.Text = "Add" + Me.btAdd.UseVisualStyleBackColor = True + ' + 'btDelete + ' + Me.btDelete.Location = New System.Drawing.Point(618, 41) + Me.btDelete.Name = "btDelete" + Me.btDelete.Size = New System.Drawing.Size(93, 23) + Me.btDelete.TabIndex = 2 + Me.btDelete.Text = "Delete" + Me.btDelete.UseVisualStyleBackColor = True + ' + 'Form_LogManage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(723, 527) + Me.Controls.Add(Me.btDelete) + Me.Controls.Add(Me.btAdd) + Me.Controls.Add(Me.Grid1) + Me.Name = "Form_LogManage" + Me.Text = "系统记录管理" + Me.ResumeLayout(False) + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents btAdd As System.Windows.Forms.Button + Friend WithEvents btDelete As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/Form_LogManage.resx b/WT-DMS/Form_LogManage.resx new file mode 100644 index 0000000..16faba9 --- /dev/null +++ b/WT-DMS/Form_LogManage.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAD/j/////+AAP+P/w///4AA/4/wAP//gAD/jwAAD/+AAP+PAPAA/4AA/48P/wAPgAD/j///8A+A + AP+P////D4AA/4//////gAD/iIiIiIiAAP8= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAD/j/////+AAP+P/////4AA/4//////gAD/j/////+AAP+P/////4AA/4//////gAD/j/////+A + AP+P/////4AA/4//////gAD/iIiIiIiAAP8= + + + \ No newline at end of file diff --git a/WT-DMS/Form_LogManage.vb b/WT-DMS/Form_LogManage.vb new file mode 100644 index 0000000..c660e89 --- /dev/null +++ b/WT-DMS/Form_LogManage.vb @@ -0,0 +1,3 @@ +Public Class Form_LogManage + +End Class \ No newline at end of file diff --git a/WT-DMS/Form_QueryStorage.Designer.vb b/WT-DMS/Form_QueryStorage.Designer.vb new file mode 100644 index 0000000..8750e2d --- /dev/null +++ b/WT-DMS/Form_QueryStorage.Designer.vb @@ -0,0 +1,157 @@ + _ +Partial Class Form_QueryStorage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_QueryStorage)) + Me.Grid1 = New FlexCell.Grid() + Me.Label1 = New System.Windows.Forms.Label() + Me.tb_PN = New System.Windows.Forms.TextBox() + Me.bt_Add = New System.Windows.Forms.Button() + Me.bt_Query = New System.Windows.Forms.Button() + Me.bt_Delete = New System.Windows.Forms.Button() + Me.bt_Clear = New System.Windows.Forms.Button() + Me.lbl_Result = New System.Windows.Forms.Label() + Me.btn_SaveAs = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(12, 82) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(741, 524) + Me.Grid1.TabIndex = 5 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(13, 13) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(29, 12) + Me.Label1.TabIndex = 3 + Me.Label1.Text = "料号" + ' + 'tb_PN + ' + Me.tb_PN.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_PN.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PN.Location = New System.Drawing.Point(60, 10) + Me.tb_PN.MaxLength = 32 + Me.tb_PN.Name = "tb_PN" + Me.tb_PN.Size = New System.Drawing.Size(239, 21) + Me.tb_PN.TabIndex = 0 + ' + 'bt_Add + ' + Me.bt_Add.Location = New System.Drawing.Point(220, 37) + Me.bt_Add.Name = "bt_Add" + Me.bt_Add.Size = New System.Drawing.Size(79, 23) + Me.bt_Add.TabIndex = 1 + Me.bt_Add.Text = "添加料号" + Me.bt_Add.UseVisualStyleBackColor = True + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(305, 10) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(100, 50) + Me.bt_Query.TabIndex = 2 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'bt_Delete + ' + Me.bt_Delete.Location = New System.Drawing.Point(12, 37) + Me.bt_Delete.Name = "bt_Delete" + Me.bt_Delete.Size = New System.Drawing.Size(75, 23) + Me.bt_Delete.TabIndex = 3 + Me.bt_Delete.Text = "删除" + Me.bt_Delete.UseVisualStyleBackColor = True + ' + 'bt_Clear + ' + Me.bt_Clear.Location = New System.Drawing.Point(93, 37) + Me.bt_Clear.Name = "bt_Clear" + Me.bt_Clear.Size = New System.Drawing.Size(75, 23) + Me.bt_Clear.TabIndex = 4 + Me.bt_Clear.Text = "清空" + Me.bt_Clear.UseVisualStyleBackColor = True + ' + 'lbl_Result + ' + Me.lbl_Result.AutoSize = True + Me.lbl_Result.ForeColor = System.Drawing.Color.Blue + Me.lbl_Result.Location = New System.Drawing.Point(12, 67) + Me.lbl_Result.Name = "lbl_Result" + Me.lbl_Result.Size = New System.Drawing.Size(0, 12) + Me.lbl_Result.TabIndex = 8 + ' + 'btn_SaveAs + ' + Me.btn_SaveAs.Location = New System.Drawing.Point(458, 10) + Me.btn_SaveAs.Name = "btn_SaveAs" + Me.btn_SaveAs.Size = New System.Drawing.Size(159, 50) + Me.btn_SaveAs.TabIndex = 9 + Me.btn_SaveAs.Text = "另存为。。。" + Me.btn_SaveAs.UseVisualStyleBackColor = True + ' + 'Form_QueryStorage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(765, 618) + Me.Controls.Add(Me.btn_SaveAs) + Me.Controls.Add(Me.lbl_Result) + Me.Controls.Add(Me.bt_Clear) + Me.Controls.Add(Me.bt_Delete) + Me.Controls.Add(Me.bt_Query) + Me.Controls.Add(Me.bt_Add) + Me.Controls.Add(Me.tb_PN) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.Grid1) + Me.MinimumSize = New System.Drawing.Size(100, 100) + Me.Name = "Form_QueryStorage" + Me.Text = "物料库存查询" + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents tb_PN As System.Windows.Forms.TextBox + Friend WithEvents bt_Add As System.Windows.Forms.Button + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents bt_Delete As System.Windows.Forms.Button + Friend WithEvents bt_Clear As System.Windows.Forms.Button + Friend WithEvents lbl_Result As System.Windows.Forms.Label + Friend WithEvents btn_SaveAs As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/Form_QueryStorage.resx b/WT-DMS/Form_QueryStorage.resx new file mode 100644 index 0000000..0f89e9c --- /dev/null +++ b/WT-DMS/Form_QueryStorage.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/Form_QueryStorage.vb b/WT-DMS/Form_QueryStorage.vb new file mode 100644 index 0000000..3f518d1 --- /dev/null +++ b/WT-DMS/Form_QueryStorage.vb @@ -0,0 +1,379 @@ +Public Class Form_QueryStorage + Dim m_Table As New System.Data.DataTable + Dim 仓库列表 As New ArrayList + Dim m_PartNumber As New CPartNumber + Dim m_InitOver As Boolean = False + + Public Enum COLS + 序号 + 料号 + 物料名称 + 规格描述 + 总数量 + START + End Enum + + Private Function GetStoreList() As Boolean + Dim m_Store As New CStore + + 仓库列表.Clear() + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If m_Store.QueryAll(m_Table) = ERROR_CODE.SUCCESS Then + For i As Integer = 0 To m_Table.Rows.Count - 1 + 仓库列表.Add(m_Table.Rows(i).Item(CStore.COLS.仓库名称)) + Next + Return True + End If + + Return False + End Function + + Private Sub Set_GridTitles() + Grid1.Rows = 500 + Grid1.Cols = 5 + Grid1.Cell(0, COLS.序号).Text = "序号" + Grid1.Cell(0, COLS.料号).Text = "料号" + Grid1.Cell(0, COLS.物料名称).Text = "物料名称" + Grid1.Cell(0, COLS.规格描述).Text = "规格描述" + Grid1.Cell(0, COLS.总数量).Text = "总数量" + Dim col As Integer = COLS.START + For Each pItem As String In 仓库列表 + Grid1.Cols += 1 + Grid1.Cell(0, col).Text = pItem + col += 1 + 'V1.6.0.0 Momo: 查库存同时查库位 + Grid1.Cols += 1 + Grid1.Cell(0, col).Text = "库位" 'V1.6.0.0 Momo: 查库存同时查库位 + col += 1 + + Next + + Grid1.FixedRows = 1 + Grid1.FixedCols = 1 + End Sub + + Private Sub Form_QueryStorage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + + Me.Width = My.Settings.FORM_QUERYSTORAGE_WIDTH + Me.Height = My.Settings.FORM_QUERYSTORAGE_HEIGHT + Me.Left = My.Settings.FORM_QUERYSTORAGE_X + Me.Top = My.Settings.FORM_QUERYSTORAGE_Y + Me.WindowState = My.Settings.FORM_QUERYSTORAGE_WINSTATE + + + If CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.READ) = False OrElse + CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.READ) = False Then + bt_Query.Enabled = False + bt_Add.Enabled = False + End If + + If GetStoreList() = False Then + MsgBox("无法获取仓库列表，请检查网络连接！") + End If + + Set_GridTitles() + + CGirdInfo.LoadGridInfo("物料库存查询", Grid1) + + m_InitOver = True + End Sub + + Private Sub bt_Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Add.Click + + Grid1.NewFile() + Set_GridTitles() + + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + + QueryData_Quick() + + Grid1.AllowUserSort = False + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + 'Grid1.SetDataBinding(m_Table, "", True, 1) + If m_Table.Rows.Count < 500 Then + Grid1.Rows = 500 + Else + Grid1.Rows = m_Table.Rows.Count + End If + + For i As Integer = 0 To m_Table.Rows.Count - 1 + Grid1.Cell(i + 1, COLS.料号).Text = m_Table.Rows(i).Item(0) + Next + + For i As Integer = 1 To Grid1.Rows - 1 + Grid1.Cell(i, 0).Text = i + Next + + CGirdInfo.LoadGridInfo("料号查询", Grid1) + Grid1.AllowUserSort = True + + 'Grid1.Locked = True + End Sub + + Private Sub bt_Clear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Clear.Click + Grid1.Rows = 1 + End Sub + + Private Sub bt_Delete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Delete.Click + If Grid1.Selection.FirstRow >= 1 Then + Grid1.RemoveItem(Grid1.Selection.FirstRow) + Grid1.Selection.ClearAll() + End If + End Sub + + Private Function QueryStorageCount(ByVal storeIndex As Integer, ByVal PartNumber As String, ByRef rCount As Integer) As Boolean + Dim strSelect As String = "SELECT SUM(`" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.数量) & "`) FROM " + strSelect &= "`" & CMaterialInOut.cst_TABLE_NAME & "` " + strSelect &= " WHERE `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.料号PN) & "` COLLATE gbk_chinese_ci = '" & PartNumber & "' " + strSelect &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.仓库) & "` = '" & 仓库列表.Item(storeIndex) & "' " + + '查询入库数量 + Dim result As Boolean = False + Dim Count_In As Integer = 0 + Dim strSQL As String = strSelect + strSQL &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.入库出库) & "` = '0'" + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.原料库存管理, strSQL, m_Table) = True Then + Try + Count_In = m_Table.Rows(0).Item(0) + Catch ex As Exception + Count_In = 0 + End Try + + result = True + End If + + '查询出库数量 + Dim Count_Out As Integer = 0 + strSQL = strSelect + strSQL &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.入库出库) & "` = '1'" + If result Then + result = False + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.原料库存管理, strSQL, m_Table) = True Then + Try + Count_Out = m_Table.Rows(0).Item(0) + Catch ex As Exception + Count_Out = 0 + End Try + result = True + End If + End If + + rCount = Count_In - Count_Out + + Return result + End Function + + Private Function QueryStorageLocation(ByVal storeIndex As Integer, ByVal PartNumber As String, ByRef dataTable As System.Data.DataTable) As Boolean + Dim strSelect As String = "SELECT DISTINCT `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.库位) & "` FROM " + strSelect &= "`" & CMaterialInOut.cst_TABLE_NAME & "` " + strSelect &= " WHERE `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.料号PN) & "` COLLATE gbk_chinese_ci = '" & PartNumber & "' " + strSelect &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.仓库) & "` = '" & 仓库列表.Item(storeIndex) & "' " + + '查询入库数量 + Dim result As Boolean = False + Dim strSQL As String = strSelect + strSQL &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.库位库存) & "` > '0'" + dataTable.Rows.Clear() + dataTable.Columns.Clear() + If SQL_Query(COL_RIGHTS.原料库存管理, strSQL, dataTable) = True Then + result = True + End If + + Return result + End Function + + Private Sub bt_Query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Query.Click + lbl_Result.Text = "" + Grid1.AutoRedraw = False + + '检测查询列是否有效 + If Grid1.Rows > 1 Then + Dim col As Integer + Dim row As Integer + + '清除每行的颜色 + For row = 1 To Grid1.Rows - 1 + Grid1.Cell(row, 1).BackColor = Grid1.Cell(0, 0).BackColor + Next + + Dim result As Boolean + Dim rCount As Integer = 0 + Dim TotalCount As Integer = 0 + Dim OK_Cnt As Integer = 0 + Dim Fail_Cnt As Integer = 0 + + Dim m_物料名称 As String = "" + Dim m_规格描述 As String = "" + Dim m_单位 As String = "" + Dim m_单重 As Double = 0.0 + Dim m_供应商ID As String = "" + + For row = 1 To Grid1.Rows - 1 + Grid1.Cell(row, 0).Text = row + result = False + TotalCount = 0 + col = COLS.START + For i As Integer = 0 To 仓库列表.Count - 1 + 'V1.6.0.0 Momo 增加对空白栏的检测 + Dim temp_tb_PN = Grid1.Cell(row, COLS.料号).Text + If temp_tb_PN.Length > 0 Then + '检测料号是否有效 + Dim isExist As Boolean = True + If m_PartNumber.CheckPartNumber(temp_tb_PN, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + 'MsgBox("当前料号不存在: " & tb_PN.Text) + result = False + Else + '查询料号信息 + m_物料名称 = "" + m_规格描述 = "" + m_单位 = "" + m_单重 = 0.0 + m_供应商ID = "" + If m_PartNumber.QueryItem(temp_tb_PN, m_物料名称, m_规格描述, m_单位, m_单重, m_供应商ID) = ERROR_CODE.SUCCESS Then + Grid1.Cell(row, COLS.物料名称).Text = m_物料名称 + Grid1.Cell(row, COLS.规格描述).Text = m_规格描述 + End If + + If QueryStorageCount(i, Grid1.Cell(row, COLS.料号).Text, rCount) = True Then + Grid1.Cell(row, col).Text = rCount + TotalCount += rCount + Grid1.Cell(row, 1).ForeColor = Color.Green + result = True + Else + Grid1.Cell(row, 1).ForeColor = Color.Red + result = False + End If + + Dim strLoc As String = "" + If QueryStorageLocation(i, Grid1.Cell(row, COLS.料号).Text, m_Table) = True Then + If m_Table.Rows.Count > 0 Then + For k As Integer = 0 To m_Table.Rows.Count - 1 + Dim isExit As Boolean + If m_PartNumber.GetStockSum(仓库列表.Item(i), m_Table.Rows(k).Item(0), isExit) <= 0 Then '若库位库存量为0则跳过本次循环 + Continue For + End If + If strLoc.Length > 0 Then + strLoc &= "," + End If + strLoc &= m_Table.Rows(k).Item(0) + Next + End If + End If + Grid1.Cell(row, col + 1).Text = strLoc + Grid1.Cell(row, 4).Font = New Font("Arial", 8) + Grid1.Cell(row, 4).FontSize = 11 + Grid1.Cell(row, 4).Alignment = FlexCell.AlignmentEnum.CenterCenter + Grid1.Cell(row, 4).FontBold = True + Grid1.Cell(row, 4).ForeColor = Color.Blue + + Grid1.Cell(row, 5).Alignment = FlexCell.AlignmentEnum.CenterCenter + Grid1.Cell(row, 6).Alignment = FlexCell.AlignmentEnum.CenterCenter + Grid1.Cell(row, 7).Alignment = FlexCell.AlignmentEnum.CenterCenter + Grid1.Cell(row, 8).Alignment = FlexCell.AlignmentEnum.CenterCenter + + End If + Else + 'MsgBox("访问数据库失败: 请检查网络连接或联系管理员!") + result = False + End If + Else + result = False + End If + col += 2 + Next i + + If result = True Then + Grid1.Cell(row, COLS.总数量).Text = TotalCount + OK_Cnt += 1 + Else + Fail_Cnt += 1 + End If + Next row + + lbl_Result.Text = "查询完成: 共" & OK_Cnt + Fail_Cnt & "条, 成功" & OK_Cnt & "条" + End If + + 'Format + + Grid1.Refresh() + Grid1.AutoRedraw = True + End Sub + + Private Sub Grid1_ColWidthChange(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.ColWidthChangeEventArgs) Handles Grid1.ColWidthChange + CGirdInfo.SaveGirdInfo("物料库存查询", Grid1) + End Sub + + Private Sub Form_QueryStorage_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize + If m_InitOver = True Then + My.Settings.FORM_QUERYSTORAGE_WIDTH = Me.Width + My.Settings.FORM_QUERYSTORAGE_HEIGHT = Me.Height + My.Settings.FORM_QUERYSTORAGE_WINSTATE = Me.WindowState + My.Settings.Save() + End If + End Sub + + Private Sub Form_QueryStorage_LocationChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LocationChanged + If m_InitOver = True Then + My.Settings.FORM_QUERYSTORAGE_X = Me.Left + My.Settings.FORM_QUERYSTORAGE_Y = Me.Top + My.Settings.Save() + End If + End Sub + ' V1.6.0.0 Momo 库存页面增加模糊查询 + Private Sub QueryData_Quick() + Dim strSQL As String = "SELECT `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`" + strSQL &= " FROM `" & CPartNumber.cst_TABLE_NAME & "`" + + If tb_PN.Text.Length > 0 Then + strSQL &= " WHERE " + + Dim strSplit() As String + Dim firstLike As Boolean = True + If tb_PN.Text.Length > 0 Then + strSplit = Split(tb_PN.Text, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= form_QuerySim.GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + End If + SQL_Query(COL_RIGHTS.料号管理, strSQL, m_Table) + End Sub + + Private Sub btn_SaveAs_Click(sender As Object, e As EventArgs) Handles btn_SaveAs.Click + Dim dlg As New SaveFileDialog() + dlg.DefaultExt = "xls" + dlg.Filter = "Excel File|*.xls" + If dlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return + + If Grid1.ExportToExcel(dlg.FileName, True, True) Then + MsgBox("保存为Excel成功：" & dlg.FileName) + Else + MsgBox("保存失败!") + End If + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/Form_QueryStorageRecord.Designer.vb b/WT-DMS/Form_QueryStorageRecord.Designer.vb new file mode 100644 index 0000000..9216455 --- /dev/null +++ b/WT-DMS/Form_QueryStorageRecord.Designer.vb @@ -0,0 +1,121 @@ + _ +Partial Class Form_QueryStorageRecord + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_QueryStorageRecord)) + Me.Grid1 = New FlexCell.Grid() + Me.Label1 = New System.Windows.Forms.Label() + Me.tb_PN = New System.Windows.Forms.TextBox() + Me.bt_Query = New System.Windows.Forms.Button() + Me.lbl_Result = New System.Windows.Forms.Label() + Me.btn_SaveAs = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(12, 72) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(741, 534) + Me.Grid1.TabIndex = 5 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(13, 13) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(137, 12) + Me.Label1.TabIndex = 3 + Me.Label1.Text = "料号: (不支持模糊查询)" + ' + 'tb_PN + ' + Me.tb_PN.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_PN.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PN.Location = New System.Drawing.Point(12, 28) + Me.tb_PN.MaxLength = 32 + Me.tb_PN.Name = "tb_PN" + Me.tb_PN.Size = New System.Drawing.Size(292, 21) + Me.tb_PN.TabIndex = 0 + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(306, 13) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(100, 37) + Me.bt_Query.TabIndex = 2 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'lbl_Result + ' + Me.lbl_Result.AutoSize = True + Me.lbl_Result.ForeColor = System.Drawing.Color.Blue + Me.lbl_Result.Location = New System.Drawing.Point(12, 57) + Me.lbl_Result.Name = "lbl_Result" + Me.lbl_Result.Size = New System.Drawing.Size(0, 12) + Me.lbl_Result.TabIndex = 8 + ' + 'btn_SaveAs + ' + Me.btn_SaveAs.Location = New System.Drawing.Point(417, 13) + Me.btn_SaveAs.Name = "btn_SaveAs" + Me.btn_SaveAs.Size = New System.Drawing.Size(179, 37) + Me.btn_SaveAs.TabIndex = 9 + Me.btn_SaveAs.Text = "保存为Excel表格" + Me.btn_SaveAs.UseVisualStyleBackColor = True + ' + 'Form_QueryStorageRecord + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(765, 618) + Me.Controls.Add(Me.btn_SaveAs) + Me.Controls.Add(Me.lbl_Result) + Me.Controls.Add(Me.bt_Query) + Me.Controls.Add(Me.tb_PN) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.Grid1) + Me.MinimumSize = New System.Drawing.Size(100, 100) + Me.Name = "Form_QueryStorageRecord" + Me.Text = "物料出入库记录查询" + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents tb_PN As System.Windows.Forms.TextBox + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents lbl_Result As System.Windows.Forms.Label + Friend WithEvents btn_SaveAs As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/Form_QueryStorageRecord.resx b/WT-DMS/Form_QueryStorageRecord.resx new file mode 100644 index 0000000..0f89e9c --- /dev/null +++ b/WT-DMS/Form_QueryStorageRecord.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/Form_QueryStorageRecord.vb b/WT-DMS/Form_QueryStorageRecord.vb new file mode 100644 index 0000000..992bc27 --- /dev/null +++ b/WT-DMS/Form_QueryStorageRecord.vb @@ -0,0 +1,218 @@ +Public Class Form_QueryStorageRecord + Dim m_Table As New System.Data.DataTable + Dim 仓库列表 As New ArrayList + Dim m_PartNumber As New CPartNumber + Dim m_InitOver As Boolean = False + + Public Enum COLS + 序号 + 日期 + 时间 + 仓库 + 库位 + 入库 + 出库 + 库位库存 + 总结余 + 用途 + 操作员ID + max + End Enum + + Public Shared m_COLS_NAME() As String = { + "序号", + "日期", + "时间", + "仓库", + "库位", + "入库", + "出库", + "库位库存", + "总结余", + "用途", + "操作员ID" + } + + + Private Sub Set_GridTitles() + Grid1.NewFile() + + Grid1.Rows = 1 + Grid1.Cols = COLS.max + + For i As Integer = 0 To COLS.max - 1 + Grid1.Cell(0, i).Text = m_COLS_NAME(i) + Next + + Grid1.FixedRows = 1 + Grid1.FixedCols = 1 + End Sub + + Private Sub Form_QueryStorage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + Me.Width = My.Settings.FORM_QUERYSTORAGE_WIDTH + Me.Height = My.Settings.FORM_QUERYSTORAGE_HEIGHT + Me.Left = My.Settings.FORM_QUERYSTORAGE_X + Me.Top = My.Settings.FORM_QUERYSTORAGE_Y + Me.WindowState = My.Settings.FORM_QUERYSTORAGE_WINSTATE + + If CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.READ) = False OrElse + CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.READ) = False Then + bt_Query.Enabled = False + End If + + Set_GridTitles() + + m_InitOver = True + End Sub + + Private Function QueryStorageInOutRecords(ByVal PartNumber As String, ByRef dataTable As Data.DataTable) As Boolean + ' Dim selectItem As String = "`日期`,`时间`,`仓库`,`库位`,`入库出库`,`数量`,`用途`,`操作员ID`" + + '================================================================================================= + '获取需要的数据列 + Dim selectItem As String = "`日期`,`时间`,`仓库`,`库位`,`入库出库`,`数量`,`用途`,`操作员ID`,`库位库存`" + '================================================================================================= + Dim strSelect As String = "SELECT " & selectItem + strSelect &= " FROM `" & CMaterialInOut.cst_TABLE_NAME & "` " + ' strSelect &= " WHERE `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.料号PN) & "` COLLATE gbk_chinese_ci = '" & PartNumber & "' " + strSelect &= " WHERE `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.料号PN) & "`= '" & PartNumber & "' " + '查询入库数量 + Dim result As Boolean = False + Dim strSQL As String = strSelect + dataTable.Rows.Clear() + dataTable.Columns.Clear() + If SQL_Query(COL_RIGHTS.原料库存管理, strSQL, dataTable) = True Then + result = True + End If + + Return result + End Function + + Private Sub bt_Query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Query.Click + lbl_Result.Text = "" + + If tb_PN.Text.Length = 0 Then + MsgBox("请指定料号!") + Return + End If + + Dim row As Integer + Dim totalCount As Long = 0 + Dim inOutFlag As Boolean = False + + Set_GridTitles() + + If QueryStorageInOutRecords(tb_PN.Text, m_Table) = True Then + If m_Table.Rows.Count > 0 Then + Grid1.Rows = m_Table.Rows.Count + 1 + For row = 0 To m_Table.Rows.Count - 1 + Dim insertRow As Integer = row + 1 + + Grid1.Cell(insertRow, COLS.序号).Text = row + 1 + Grid1.Cell(insertRow, COLS.日期).Text = m_Table.Rows.Item(row).Item(0).ToString + Grid1.Cell(insertRow, COLS.时间).Text = m_Table.Rows.Item(row).Item(1).ToString + Grid1.Cell(insertRow, COLS.仓库).Text = m_Table.Rows.Item(row).Item(2).ToString + Grid1.Cell(insertRow, COLS.库位).Text = m_Table.Rows.Item(row).Item(3).ToString + + inOutFlag = CBool(m_Table.Rows.Item(row).Item(4)) + If inOutFlag = True Then + Grid1.Cell(insertRow, COLS.入库).Text = "0" + Grid1.Cell(insertRow, COLS.出库).Text = m_Table.Rows.Item(row).Item(5) + Else + Grid1.Cell(insertRow, COLS.入库).Text = m_Table.Rows.Item(row).Item(5) + Grid1.Cell(insertRow, COLS.出库).Text = "0" + End If + ' Grid1.Cell(insertRow, COLS.数量).Text = m_Table.Rows.Item(row).Item(5) + + '================================================================================================= + '添加内容至表格 + Grid1.Cell(insertRow, COLS.库位库存).Text = m_Table.Rows.Item(row).Item(8) + + '================================================================================================= + Dim numCount As Long = 0 + Try + numCount = CLng(m_Table.Rows.Item(row).Item(5)) + If inOutFlag = True Then + totalCount -= numCount + Else + totalCount += numCount + End If + Catch ex As Exception + MsgBox("库存信息错误!") + Return + End Try + + Grid1.Cell(insertRow, COLS.总结余).Text = totalCount + Grid1.Cell(insertRow, COLS.用途).Text = m_Table.Rows.Item(row).Item(6) + Grid1.Cell(insertRow, COLS.操作员ID).Text = m_Table.Rows.Item(row).Item(7) + Next + End If + + lbl_Result.Text = "查询完成: 共" & m_Table.Rows.Count & "条" + End If + End Sub + + Private Sub Grid1_ColWidthChange(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.ColWidthChangeEventArgs) Handles Grid1.ColWidthChange + CGirdInfo.SaveGirdInfo("物料库存查询", Grid1) + End Sub + + Private Sub Form_QueryStorage_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize + If m_InitOver = True Then + My.Settings.FORM_QUERYSTORAGE_WIDTH = Me.Width + My.Settings.FORM_QUERYSTORAGE_HEIGHT = Me.Height + My.Settings.FORM_QUERYSTORAGE_WINSTATE = Me.WindowState + My.Settings.Save() + End If + End Sub + + Private Sub Form_QueryStorage_LocationChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LocationChanged + If m_InitOver = True Then + My.Settings.FORM_QUERYSTORAGE_X = Me.Left + My.Settings.FORM_QUERYSTORAGE_Y = Me.Top + My.Settings.Save() + End If + End Sub + ' V1.6.0.0 Momo 库存页面增加模糊查询 + Private Sub QueryData_Quick() + Dim strSQL As String = "SELECT `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`" + strSQL &= " FROM `" & CPartNumber.cst_TABLE_NAME & "`" + + If tb_PN.Text.Length > 0 Then + strSQL &= " WHERE " + + Dim strSplit() As String + Dim firstLike As Boolean = True + If tb_PN.Text.Length > 0 Then + strSplit = Split(tb_PN.Text, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= form_QuerySim.GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + End If + SQL_Query(COL_RIGHTS.料号管理, strSQL, m_Table) + End Sub + + Private Sub btn_SaveAs_Click(sender As Object, e As EventArgs) Handles btn_SaveAs.Click + Dim dlg As New SaveFileDialog() + dlg.DefaultExt = "xls" + dlg.Filter = "Excel File|*.xls" + If dlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return + + If Grid1.ExportToExcel(dlg.FileName, True, True) Then + MsgBox("保存为Excel成功：" & dlg.FileName) + Else + MsgBox("保存失败!") + End If + End Sub + +End Class \ No newline at end of file diff --git a/WT-DMS/Form_SysLog.Designer.vb b/WT-DMS/Form_SysLog.Designer.vb new file mode 100644 index 0000000..d69f04f --- /dev/null +++ b/WT-DMS/Form_SysLog.Designer.vb @@ -0,0 +1,70 @@ + _ +Partial Class Form_SysLog + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_SysLog)) + Me.Grid1 = New FlexCell.Grid() + Me.btRefresh = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(12, 41) + Me.Grid1.MultiSelect = False + Me.Grid1.Name = "Grid1" + Me.Grid1.Size = New System.Drawing.Size(699, 443) + Me.Grid1.TabIndex = 1 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'btRefresh + ' + Me.btRefresh.Location = New System.Drawing.Point(12, 12) + Me.btRefresh.Name = "btRefresh" + Me.btRefresh.Size = New System.Drawing.Size(105, 23) + Me.btRefresh.TabIndex = 6 + Me.btRefresh.Text = "刷新" + Me.btRefresh.UseVisualStyleBackColor = True + ' + 'Form_SysLog + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(723, 496) + Me.Controls.Add(Me.btRefresh) + Me.Controls.Add(Me.Grid1) + Me.MinimumSize = New System.Drawing.Size(100, 100) + Me.Name = "Form_SysLog" + Me.Text = "系统记录" + Me.ResumeLayout(False) + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents btRefresh As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/Form_SysLog.resx b/WT-DMS/Form_SysLog.resx new file mode 100644 index 0000000..559091c --- /dev/null +++ b/WT-DMS/Form_SysLog.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAMAj/////+AAwCP/w///4ADAI/wAP//gAMAjwAAD/+AAwCPAPAA/4ADAI8P/wAPgAMAj///8A+A + AwCP////D4ADAI//////gAMAiIiIiIiAAwA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAMAj/////+AAwCP/////4ADAI//////gAMAj/////+AAwCP/////4ADAI//////gAMAj/////+A + AwCP/////4ADAI//////gAMAiIiIiIiAAwA= + + + \ No newline at end of file diff --git a/WT-DMS/Form_SysLog.vb b/WT-DMS/Form_SysLog.vb new file mode 100644 index 0000000..8b25030 --- /dev/null +++ b/WT-DMS/Form_SysLog.vb @@ -0,0 +1,97 @@ +Public Class Form_SysLog + Dim m_LogManage As New CLogManage + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + + Private Sub GetDataSet() + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + + SQL_Query(COL_RIGHTS.系统记录, "SELECT * FROM `" & CLogManage.cst_TABLE_NAME & "` GROUP BY `" & CLogManage.m_COLS_NAME(CLogManage.COLS.序号) & "`", m_Table) + End Sub + + 'Private Sub bt_Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + ' If m_LogManage.AddItem("系统记录表", "添加一条", "tony") = ERROR_CODE.SUCCESS Then + ' MsgBox("OK") + ' Else + ' MsgBox("error") + ' End If + 'End Sub + + 'Private Sub btDel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + ' m_LogManage.DeleteItem(1) + 'End Sub + + 'Private Sub btQuery_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + + ' Dim rDate As Date = Now + ' Dim rData(6) As String + + ' m_LogManage.QueryItem(2, rDate, rData(1), rData(2), rData(3), rData(4), rData(5)) + 'End Sub + + 'Private Sub btGetCount_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + ' Dim count As Integer + ' m_LogManage.GetLogCounts(count) + ' MsgBox(count) + 'End Sub + + Private Sub btRefresh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btRefresh.Click + RefreshList() + End Sub + + Private Function RefreshList() As Boolean + GetDataSet() + + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '绑定到数据源时可以指定固定行数，但绑定后不能改变Grid.FixedRows属性的值 + 'Grid1.SetDataBinding(m_Table, "products", True, 2) + Grid1.SetDataBinding(m_Table, "", True, 1) + + CGirdInfo.LoadGridInfo("系统记录", Grid1) + + Grid1.Locked = True + + Return True + End Function + + Private Sub Form_SysLog_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + RefreshList() + CGirdInfo.LoadGridInfo("系统记录", Grid1) + + Me.Left = My.Settings.FORM_SYSLOG_X + Me.Top = My.Settings.FORM_SYSLOG_Y + Me.Width = My.Settings.FORM_SYSLOG_WIDTH + Me.Height = My.Settings.FORM_SYSLOG_HEIGHT + + m_InitOver = True + End Sub + + Private Sub Form_SysLog_LocationChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LocationChanged + If m_InitOver = True Then + My.Settings.FORM_SYSLOG_X = Me.Left + My.Settings.FORM_SYSLOG_Y = Me.Top + My.Settings.Save() + End If + End Sub + + Private Sub Form_SysLog_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize + If m_InitOver = True Then + My.Settings.FORM_SYSLOG_HEIGHT = Me.Height + My.Settings.FORM_SYSLOG_WIDTH = Me.Width + My.Settings.Save() + End If + End Sub + + Private Sub Grid1_ColWidthChange(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.ColWidthChangeEventArgs) Handles Grid1.ColWidthChange + CGirdInfo.SaveGirdInfo("系统记录", Grid1) + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/Form_合并备料查询.Designer.vb b/WT-DMS/Form_合并备料查询.Designer.vb new file mode 100644 index 0000000..cc8e3ef --- /dev/null +++ b/WT-DMS/Form_合并备料查询.Designer.vb @@ -0,0 +1,144 @@ + _ +Partial Class Form_合并备料查询 + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form_合并备料查询)) + Me.Grid_Input = New FlexCell.Grid() + Me.Grid_QueryInfo = New FlexCell.Grid() + Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() + Me.Label1 = New System.Windows.Forms.Label() + Me.bt_Go = New System.Windows.Forms.Button() + Me.bt_ExportResult = New System.Windows.Forms.Button() + CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainer1.Panel1.SuspendLayout() + Me.SplitContainer1.Panel2.SuspendLayout() + Me.SplitContainer1.SuspendLayout() + Me.SuspendLayout() + ' + 'Grid_Input + ' + Me.Grid_Input.AllowUserSort = True + Me.Grid_Input.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.Grid_Input.CheckedImage = CType(resources.GetObject("Grid_Input.CheckedImage"), System.Drawing.Bitmap) + Me.Grid_Input.Cols = 7 + Me.Grid_Input.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid_Input.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid_Input.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid_Input.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid_Input.Location = New System.Drawing.Point(4, 56) + Me.Grid_Input.Name = "Grid_Input" + Me.Grid_Input.Rows = 500 + Me.Grid_Input.Size = New System.Drawing.Size(365, 585) + Me.Grid_Input.TabIndex = 7 + Me.Grid_Input.UncheckedImage = CType(resources.GetObject("Grid_Input.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Grid_QueryInfo + ' + Me.Grid_QueryInfo.AllowUserSort = True + Me.Grid_QueryInfo.CheckedImage = CType(resources.GetObject("Grid_QueryInfo.CheckedImage"), System.Drawing.Bitmap) + Me.Grid_QueryInfo.Cols = 7 + Me.Grid_QueryInfo.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid_QueryInfo.Dock = System.Windows.Forms.DockStyle.Fill + Me.Grid_QueryInfo.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid_QueryInfo.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid_QueryInfo.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid_QueryInfo.Location = New System.Drawing.Point(0, 0) + Me.Grid_QueryInfo.Name = "Grid_QueryInfo" + Me.Grid_QueryInfo.Rows = 500 + Me.Grid_QueryInfo.Size = New System.Drawing.Size(738, 644) + Me.Grid_QueryInfo.TabIndex = 7 + Me.Grid_QueryInfo.UncheckedImage = CType(resources.GetObject("Grid_QueryInfo.UncheckedImage"), System.Drawing.Bitmap) + ' + 'SplitContainer1 + ' + Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill + Me.SplitContainer1.Location = New System.Drawing.Point(0, 0) + Me.SplitContainer1.Name = "SplitContainer1" + ' + 'SplitContainer1.Panel1 + ' + Me.SplitContainer1.Panel1.Controls.Add(Me.bt_ExportResult) + Me.SplitContainer1.Panel1.Controls.Add(Me.bt_Go) + Me.SplitContainer1.Panel1.Controls.Add(Me.Label1) + Me.SplitContainer1.Panel1.Controls.Add(Me.Grid_Input) + ' + 'SplitContainer1.Panel2 + ' + Me.SplitContainer1.Panel2.Controls.Add(Me.Grid_QueryInfo) + Me.SplitContainer1.Size = New System.Drawing.Size(1113, 644) + Me.SplitContainer1.SplitterDistance = 371 + Me.SplitContainer1.TabIndex = 8 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(2, 38) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(95, 12) + Me.Label1.TabIndex = 8 + Me.Label1.Text = "待查询机种列表:" + ' + 'bt_Go + ' + Me.bt_Go.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_Go.Location = New System.Drawing.Point(259, 3) + Me.bt_Go.Name = "bt_Go" + Me.bt_Go.Size = New System.Drawing.Size(109, 47) + Me.bt_Go.TabIndex = 9 + Me.bt_Go.Text = "查询" + Me.bt_Go.UseVisualStyleBackColor = True + ' + 'bt_ExportResult + ' + Me.bt_ExportResult.Location = New System.Drawing.Point(113, 3) + Me.bt_ExportResult.Name = "bt_ExportResult" + Me.bt_ExportResult.Size = New System.Drawing.Size(62, 47) + Me.bt_ExportResult.TabIndex = 10 + Me.bt_ExportResult.Text = "导出查询结果" + Me.bt_ExportResult.UseVisualStyleBackColor = True + ' + 'Form_合并备料查询 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1113, 644) + Me.Controls.Add(Me.SplitContainer1) + Me.Name = "Form_合并备料查询" + Me.Text = "Form_合并备料查询" + Me.SplitContainer1.Panel1.ResumeLayout(False) + Me.SplitContainer1.Panel1.PerformLayout() + Me.SplitContainer1.Panel2.ResumeLayout(False) + CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainer1.ResumeLayout(False) + Me.ResumeLayout(False) + + End Sub + Friend WithEvents Grid_Input As FlexCell.Grid + Friend WithEvents Grid_QueryInfo As FlexCell.Grid + Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer + Friend WithEvents bt_Go As System.Windows.Forms.Button + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents bt_ExportResult As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/Form_合并备料查询.resx b/WT-DMS/Form_合并备料查询.resx new file mode 100644 index 0000000..bb96169 --- /dev/null +++ b/WT-DMS/Form_合并备料查询.resx @@ -0,0 +1,153 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/w///4AKOo/wAP//gAo6jwAAD/+ACjqPAPAA/4AKOo8P/wAPgAo6j///8A+A + CjqP////D4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/////4AKOo//////gAo6j/////+ACjqP/////4AKOo//////gAo6j/////+A + CjqP/////4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/w///4AKOo/wAP//gAo6jwAAD/+ACjqPAPAA/4AKOo8P/wAPgAo6j///8A+A + CjqP////D4AKOo//////gAo6iIiIiIiACjo= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAo6j/////+ACjqP/////4AKOo//////gAo6j/////+ACjqP/////4AKOo//////gAo6j/////+A + CjqP/////4AKOo//////gAo6iIiIiIiACjo= + + + \ No newline at end of file diff --git a/WT-DMS/Form_合并备料查询.vb b/WT-DMS/Form_合并备料查询.vb new file mode 100644 index 0000000..a144754 --- /dev/null +++ b/WT-DMS/Form_合并备料查询.vb @@ -0,0 +1,391 @@ +Public Class Form_合并备料查询 + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + Dim m_PartNumber As New CPartNumber + + Dim validBomPnList As New ArrayList + Dim validBomBackupCountList As New ArrayList + + Public Enum COLS_INPUT + 序号 + 料号PN + 数量 + max + End Enum + + Public Shared m_COLS_NAME_INPUT(,) As String = { + {"序号", "0"}, + {"料号PN", "1"}, + {"数量", "1"} + } + + Public Enum COLS_QUERYINFO + 序号 + 料号PN + 物料名称 + 规格描述 + 单位 + 总数量 + 库存数量 + 剩余数量 + max + End Enum + + Public Shared m_COLS_NAME_QUERYINFO(,) As String = { + {"序号", "0"}, + {"料号PN", "1"}, + {"物料名称", "0"}, + {"规格描述", "0"}, + {"单位", "0"}, + {"总数量", "0"}, + {"库存数量", "0"}, + {"剩余数量", "0"} + } + + + Private Sub Form_合并备料查询_Load(sender As Object, e As EventArgs) Handles MyBase.Load + InitGrid_Input() + End Sub + + Private Sub InitGrid_Input() + Grid_Input.NewFile() + + Grid_Input.AllowUserSort = False + Grid_Input.DisplayFocusRect = False + Grid_Input.ExtendLastCol = True + Grid_Input.DisplayRowArrow = True + Grid_Input.BoldFixedCell = False + Grid_Input.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + Grid_Input.Cols = COLS_INPUT.max + For col As Integer = 0 To COLS_INPUT.max - 1 + Grid_Input.Cell(0, col).Text = m_COLS_NAME_INPUT(col, 0) + Next + + '调整宽度 + Grid_Input.Column(COLS_INPUT.序号).Width = 50 + Grid_Input.Column(COLS_INPUT.料号PN).Width = 100 + Grid_Input.Column(COLS_INPUT.数量).Width = 50 + + Grid_Input.AllowUserSort = True + Grid_Input.Locked = False + Grid_Input.Column(COLS_INPUT.序号).Locked = True + + Grid_Input.Rows = 500 + + Application.DoEvents() + End Sub + + Private Sub InitGrid_QueryInfo(ByVal BomPnCount As Integer, ByRef bomArray As ArrayList) + Grid_QueryInfo.NewFile() + + Grid_QueryInfo.AllowUserSort = False + Grid_QueryInfo.DisplayFocusRect = False + Grid_QueryInfo.ExtendLastCol = True + Grid_QueryInfo.DisplayRowArrow = True + Grid_QueryInfo.BoldFixedCell = False + Grid_QueryInfo.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + Grid_QueryInfo.Cols = COLS_QUERYINFO.max + For col As Integer = 0 To COLS_QUERYINFO.max - 1 + Grid_QueryInfo.Cell(0, col).Text = m_COLS_NAME_QUERYINFO(col, 0) + Next + + If BomPnCount > 0 Then + For i = 0 To BomPnCount - 1 + Grid_QueryInfo.Cols += 1 + Grid_QueryInfo.Cell(0, Grid_QueryInfo.Cols - 1).Text = bomArray.Item(i) + Next + End If + + '调整宽度 + Grid_QueryInfo.Column(COLS_QUERYINFO.序号).Width = My.Settings.FORM_合并用料查询_COL_WIDTH_序号 + Grid_QueryInfo.Column(COLS_QUERYINFO.料号PN).Width = My.Settings.FORM_合并用料查询_COL_WIDTH_料号PN + Grid_QueryInfo.Column(COLS_QUERYINFO.物料名称).Width = My.Settings.FORM_合并用料查询_COL_WIDTH_物料名称 + Grid_QueryInfo.Column(COLS_QUERYINFO.规格描述).Width = My.Settings.FORM_合并用料查询_COL_WIDTH_规格描述 + Grid_QueryInfo.Column(COLS_QUERYINFO.单位).Width = My.Settings.FORM_合并用料查询_COL_WIDTH_单位 + Me.Height = My.Settings.FORM_合并用料查询_HEIGHT + Me.Width = My.Settings.FORM_合并用料查询_WIDTH + + Grid_QueryInfo.AllowUserSort = True + Grid_QueryInfo.Locked = True + Grid_QueryInfo.Rows = 1 + + Application.DoEvents() + End Sub + + + Private Function QueryBom(ByVal BomName As String, ByRef dataTable As Data.DataTable) As Boolean + Dim strSelect As String = "SELECT * FROM `" & "bom_" & BomName & "`" + + '查询入库数量 + Dim result As Boolean = False + Dim strSQL As String = strSelect + dataTable.Rows.Clear() + dataTable.Columns.Clear() + If SQL_Query(COL_RIGHTS.BOM管理, strSQL, dataTable) = True Then + result = True + End If + + Return result + End Function + + Private Function CheckBomExist(ByVal bomName As String, ByRef isExist As Boolean) As Boolean + Dim strSQL As String = "CHECK TABLE `" & "bom_" & bomName & "`" 'CHECK TABLE `BOM_U01-ATMEGA328P-TQFP32` + Dim result As Boolean = False + m_Table.Rows.Clear() + m_Table.Columns.Clear() + isExist = False + If SQL_Query(COL_RIGHTS.BOM管理, strSQL, m_Table) = True Then + If m_Table.Rows.Count > 0 Then + If m_Table.Rows(0).Item(3) = "OK" Then + isExist = True + End If + End If + result = True + End If + + Return result + End Function + + Private Sub bt_Go_Click(sender As Object, e As EventArgs) Handles bt_Go.Click + '检测Input表格是否存在错误 + Dim inputSn As String = "" + Dim validBomPnCount As Integer = 0 + validBomPnList.Clear() + validBomBackupCountList.Clear() + Dim notEmptyCount As Integer = 0 + Dim curRowResult As Boolean = False + + For row = 1 To Grid_Input.Rows - 1 + Grid_Input.Cell(row, COLS_INPUT.序号).Text = "" + Grid_Input.Cell(row, COLS_INPUT.料号PN).BackColor = Color.White + Grid_Input.Cell(row, COLS_INPUT.数量).BackColor = Color.White + Next + For row = 1 To Grid_Input.Rows - 1 + inputSn = Grid_Input.Cell(row, COLS_INPUT.料号PN).Text + If inputSn.Length > 0 Then + notEmptyCount += 1 + '检查输入料号是否有效 + curRowResult = True + + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(inputSn, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + Grid_Input.Cell(row, COLS_INPUT.料号PN).BackColor = Color.Red + curRowResult = False + End If + Else + MsgBox("查询BOM料号错误!") + Return + End If + + '检测输入料号的料表是否已经存在 + If CheckBomExist(inputSn, isExist) = True Then + If isExist = False Then + Grid_Input.Cell(row, COLS_INPUT.料号PN).BackColor = Color.Red + curRowResult = False + End If + Else + MsgBox("无法查询输入料号对应的料表是否存在，请检查网络连接!") + Return + End If + + If curRowResult = True Then + Grid_Input.Cell(row, COLS_INPUT.料号PN).BackColor = Color.Green + + '检查数量是否正确 + Dim numStr As String = Grid_Input.Cell(row, COLS_INPUT.数量).Text + Dim numNum As Integer = 0 + Try + numNum = numStr + validBomPnCount += 1 + validBomPnList.Add(inputSn) + validBomBackupCountList.Add(numNum) + Grid_Input.Cell(row, COLS_INPUT.数量).BackColor = Color.Green + Catch ex As Exception + Grid_Input.Cell(row, COLS_INPUT.数量).BackColor = Color.Red + End Try + Else + Grid_Input.Cell(row, COLS_INPUT.料号PN).BackColor = Color.Red + End If + Grid_Input.Cell(row, COLS_INPUT.序号).Text = validBomPnCount + End If + Next + + If notEmptyCount > 0 Then + If validBomPnCount <> notEmptyCount Then + MsgBox("输入BOM料号列表存在错误") + Return + End If + Else + MsgBox("输入不能为空") + Return + End If + + '重新设置QueryInfo表格内容 + InitGrid_QueryInfo(validBomPnCount, validBomPnList) + + '逐个机种查询----------------------------- + For bomIndex = 0 To validBomPnCount - 1 + '查询物料列表 + Dim queryBomName As String = validBomPnList.Item(bomIndex) + If QueryBom(queryBomName, m_Table) = True Then + CompareAndFillToGridByDataTable(bomIndex) + End If + Next + + '查询物料其它信息 + For rowIndex = 1 To Grid_QueryInfo.Rows - 1 + If Grid_QueryInfo.Cell(rowIndex, COLS_QUERYINFO.料号PN).Text.Length > 0 Then + If GetPNItemInfo(rowIndex) = False Then + Return + End If + End If + Next + + '查询库存数量 + For rowIndex = 1 To Grid_QueryInfo.Rows - 1 + Dim strPN As String = Grid_QueryInfo.Cell(rowIndex, COLS_QUERYINFO.料号PN).Text + If strPN.Length > 0 Then + Dim countInStore As Integer = 0 + Dim usageCount As Integer = Grid_QueryInfo.Cell(rowIndex, COLS_QUERYINFO.总数量).Text + If QueryStorageCount(strPN, countInStore) = True Then + Grid_QueryInfo.Cell(rowIndex, COLS_QUERYINFO.库存数量).Text = countInStore + Grid_QueryInfo.Cell(rowIndex, COLS_QUERYINFO.剩余数量).Text = countInStore - usageCount + Else + Return + End If + End If + Next + + MsgBox("查询完成.") + End Sub + + Private Function QueryStorageCount(ByVal PartNumber As String, ByRef rCount As Integer) As Boolean + Dim strSelect As String = "SELECT SUM(`" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.数量) & "`) FROM " + strSelect &= "`" & CMaterialInOut.cst_TABLE_NAME & "` " + strSelect &= " WHERE `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.料号PN) & "` COLLATE gbk_chinese_ci = '" & PartNumber & "' " + + '查询入库数量 + Dim result As Boolean = False + Dim Count_In As Integer = 0 + Dim strSQL As String = strSelect + strSQL &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.入库出库) & "` = '0'" + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.原料库存管理, strSQL, m_Table) = True Then + Try + Count_In = m_Table.Rows(0).Item(0) + Catch ex As Exception + Count_In = 0 + End Try + + result = True + End If + + '查询出库数量 + Dim Count_Out As Integer = 0 + strSQL = strSelect + strSQL &= "AND `" & CMaterialInOut.m_COLS_NAME(CMaterialInOut.COLS.入库出库) & "` = '1'" + If result Then + result = False + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If SQL_Query(COL_RIGHTS.原料库存管理, strSQL, m_Table) = True Then + Try + Count_Out = m_Table.Rows(0).Item(0) + Catch ex As Exception + Count_Out = 0 + End Try + result = True + End If + End If + + rCount = Count_In - Count_Out + + Return result + End Function + + Private Sub CompareAndFillToGridByDataTable(ByVal bomIndex As Integer) + Dim existRows As Integer = Grid_QueryInfo.Rows + Dim insertRow As Integer = 0 + Dim queryPn As String = "" + Dim queryCount As Integer = 0 + Dim curCount As Integer = 0 + Dim CountForBackup As Integer = validBomBackupCountList.Item(bomIndex) + Dim MultiCount As Integer = 0 + If m_Table.Rows.Count > 0 Then + For row = 0 To m_Table.Rows.Count - 1 + queryPn = m_Table.Rows.Item(row).Item(2) + queryCount = m_Table.Rows.Item(row).Item(3) + MultiCount = queryCount * CountForBackup + + Dim findIndex As Integer = -1 + For rowIndex = 1 To Grid_QueryInfo.Rows - 1 + If Grid_QueryInfo.Cell(rowIndex, COLS_QUERYINFO.料号PN).Text.ToUpper = queryPn.ToUpper Then + findIndex = rowIndex + Exit For + End If + Next + + If findIndex > 0 Then + Try + curCount = Grid_QueryInfo.Cell(findIndex, COLS_QUERYINFO.总数量).Text + Catch ex As Exception + curCount = 0 + End Try + curCount += MultiCount + Grid_QueryInfo.Cell(findIndex, COLS_QUERYINFO.总数量).Text = curCount + Else + Grid_QueryInfo.Rows += 1 + findIndex = Grid_QueryInfo.Rows - 1 + Grid_QueryInfo.Cell(findIndex, COLS_QUERYINFO.料号PN).Text = queryPn + Grid_QueryInfo.Cell(findIndex, COLS_QUERYINFO.总数量).Text = MultiCount + End If + + Grid_QueryInfo.Cell(findIndex, COLS_QUERYINFO.max + bomIndex).Text = MultiCount + Next + End If + End Sub + + Private Function GetPNItemInfo(ByVal gridRowIndex As Integer) As Boolean + Dim 物料名称 As String = "" + Dim 规格描述 As String = "" + Dim 单位 As String = "" + Dim 单重 As Double = 0 + Dim 图片(0) As Byte + Dim 供应商ID As String = "" + + Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.物料名称).Text = "" + Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.规格描述).Text = "" + Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.单位).Text = "" + + Dim result As Boolean = False + Dim strPn As String = Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.料号PN).Text + If m_PartNumber.QueryItem(strPn, 物料名称, 规格描述, 单位, 单重, 供应商ID) = ERROR_CODE.SUCCESS Then + Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.物料名称).Text = 物料名称 + Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.规格描述).Text = 规格描述 + Grid_QueryInfo.Cell(gridRowIndex, COLS_QUERYINFO.单位).Text = 单位 + + result = True + Else + MsgBox("查询物料信息错误,料号:" & strPn) + End If + + Return result + End Function + + Private Sub bt_ExportResult_Click(sender As Object, e As EventArgs) Handles bt_ExportResult.Click + Dim dlg As New SaveFileDialog() + dlg.DefaultExt = "xls" + dlg.Filter = "Excel File|*.xls" + If dlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return + + If Grid_QueryInfo.ExportToExcel(dlg.FileName, True, True) Then + MsgBox("保存为Excel成功：" & dlg.FileName) + Else + MsgBox("保存失败!") + End If + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/Form_备份管理.Designer.vb b/WT-DMS/Form_备份管理.Designer.vb new file mode 100644 index 0000000..ef0f8f9 --- /dev/null +++ b/WT-DMS/Form_备份管理.Designer.vb @@ -0,0 +1,101 @@ + _ +Partial Class Form_备份管理 + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.bt_BackupNow = New System.Windows.Forms.Button() + Me.bt_RestoreBackup = New System.Windows.Forms.Button() + Me.Label1 = New System.Windows.Forms.Label() + Me.lbl_LatestTime = New System.Windows.Forms.Label() + Me.ProgressBar1 = New System.Windows.Forms.ProgressBar() + Me.SuspendLayout() + ' + 'bt_BackupNow + ' + Me.bt_BackupNow.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_BackupNow.Location = New System.Drawing.Point(122, 96) + Me.bt_BackupNow.Name = "bt_BackupNow" + Me.bt_BackupNow.Size = New System.Drawing.Size(124, 46) + Me.bt_BackupNow.TabIndex = 9 + Me.bt_BackupNow.Text = "立即备份" + Me.bt_BackupNow.UseVisualStyleBackColor = True + ' + 'bt_RestoreBackup + ' + Me.bt_RestoreBackup.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_RestoreBackup.Location = New System.Drawing.Point(312, 96) + Me.bt_RestoreBackup.Name = "bt_RestoreBackup" + Me.bt_RestoreBackup.Size = New System.Drawing.Size(124, 46) + Me.bt_RestoreBackup.TabIndex = 9 + Me.bt_RestoreBackup.Text = "还原备份" + Me.bt_RestoreBackup.UseVisualStyleBackColor = True + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("宋体", 16.0!) + Me.Label1.ForeColor = System.Drawing.Color.MidnightBlue + Me.Label1.Location = New System.Drawing.Point(26, 42) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(153, 22) + Me.Label1.TabIndex = 10 + Me.Label1.Text = "最近备份时间:" + ' + 'lbl_LatestTime + ' + Me.lbl_LatestTime.AutoSize = True + Me.lbl_LatestTime.Font = New System.Drawing.Font("宋体", 16.0!) + Me.lbl_LatestTime.ForeColor = System.Drawing.Color.BlueViolet + Me.lbl_LatestTime.Location = New System.Drawing.Point(185, 42) + Me.lbl_LatestTime.Name = "lbl_LatestTime" + Me.lbl_LatestTime.Size = New System.Drawing.Size(0, 22) + Me.lbl_LatestTime.TabIndex = 10 + ' + 'ProgressBar1 + ' + Me.ProgressBar1.Location = New System.Drawing.Point(45, 178) + Me.ProgressBar1.Name = "ProgressBar1" + Me.ProgressBar1.Size = New System.Drawing.Size(457, 23) + Me.ProgressBar1.TabIndex = 11 + ' + 'Form_备份管理 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(547, 246) + Me.Controls.Add(Me.ProgressBar1) + Me.Controls.Add(Me.lbl_LatestTime) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.bt_RestoreBackup) + Me.Controls.Add(Me.bt_BackupNow) + Me.Name = "Form_备份管理" + Me.Text = "备份管理" + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents bt_BackupNow As System.Windows.Forms.Button + Friend WithEvents bt_RestoreBackup As System.Windows.Forms.Button + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents lbl_LatestTime As System.Windows.Forms.Label + Friend WithEvents ProgressBar1 As System.Windows.Forms.ProgressBar +End Class diff --git a/WT-DMS/Form_备份管理.resx b/WT-DMS/Form_备份管理.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/Form_备份管理.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/Form_备份管理.vb b/WT-DMS/Form_备份管理.vb new file mode 100644 index 0000000..a856959 --- /dev/null +++ b/WT-DMS/Form_备份管理.vb @@ -0,0 +1,164 @@ +Public Class Form_备份管理 + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + Public Const cst_TABLE_NAME As String = "备份记录表" + Dim m_BackupManage As New CBackupManage + + Dim m_FixTableNames() As String = { + "帐号表", "仓库表", "原料库存表", "员工信息表", "库位表_大岭山", "库位表_松山湖", "料号表" + } + + Private Function CopyTable(ByVal srcTable As String, ByVal aimTable As String) As Boolean + Dim strCreate As String = "CREATE TABLE `" & aimTable & "` LIKE `" & srcTable & "`" + Dim strInsert As String = "INSERT INTO `" & aimTable & "` SELECT * FROM `" & srcTable & "`" + + Dim result As Boolean = False + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strCreate) = True AndAlso + SQL_ExeCommand(COL_RIGHTS.BOM管理, strInsert) = True Then + result = True + End If + + Return result + End Function + + Private Function CheckTableExist(ByVal table As String, ByRef isExist As Boolean) As Boolean + Dim strSQL As String = "CHECK TABLE `" & table & "`" 'CHECK TABLE `BOM_U01-ATMEGA328P-TQFP32` + Dim result As Boolean = False + m_Table.Rows.Clear() + m_Table.Columns.Clear() + isExist = False + If SQL_Query(COL_RIGHTS.BOM管理, strSQL, m_Table) = True Then + If m_Table.Rows.Count > 0 Then + If m_Table.Rows(0).Item(3) = "OK" Then + isExist = True + End If + End If + result = True + End If + + Return result + End Function + Private Function DropTable(ByVal tableName As String) As Boolean + Dim strSQL As String = "DROP TABLE IF EXISTS `" & tableName & "`" + Dim result As Boolean = False + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSQL) = True Then + result = True + End If + + Return result + End Function + + Private Function GetAllBomTableNames(ByRef nameList As ArrayList) As Boolean + Dim strQuery As String = "SELECT `" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "` FROM `" & CPartNumber.cst_TABLE_NAME & "`" + Dim rTable As New System.Data.DataTable + If SQL_Query(COL_RIGHTS.BOM管理, strQuery, rTable) = False Then + Return False + End If + + Dim result As Boolean = True + nameList.Clear() + For i As Integer = 0 To rTable.Rows.Count - 1 + Try + Dim name As String = rTable.Rows.Item(i).Item(0) + nameList.Add(name) + Catch ex As Exception + result = False + End Try + Next + Return result + End Function + + + Private Sub bt_BackupNow_Click(sender As Object, e As EventArgs) Handles bt_BackupNow.Click + Dim result As Boolean = True + + Dim timeNow As Date = Now + Dim backName As String = "bak_" + '备份固定表 + For Each pTableName As String In m_FixTableNames + Dim newTablename As String = backName & pTableName + DropTable(newTablename) + If CopyTable(pTableName, newTablename) = False Then + MsgBox("备份失败,文件:" & pTableName) + result = False + Exit For + End If + Next + + '备份BOM表 + If result Then + Dim bomNameList As New ArrayList + If GetAllBomTableNames(bomNameList) = True Then + Dim totalCount = bomNameList.Count + ProgressBar1.Visible = True + ProgressBar1.Maximum = 0 + ProgressBar1.Maximum = totalCount + Dim index As Integer = 0 + Dim isExist As Boolean = False + For Each pTableName As String In bomNameList + pTableName = Strings.Trim(pTableName) + Dim bomName = "bom_" & pTableName + If CheckTableExist(bomName, isExist) = False Then + MsgBox("备份失败,文件:" & bomName) + result = False + Exit For + End If + + If isExist = True Then + Dim newTablename As String = backName & bomName + DropTable(newTablename) + If CopyTable(bomName, newTablename) = False Then + MsgBox("备份失败,文件:" & bomName) + result = False + Exit For + End If + End If + + index += 1 + ProgressBar1.Value = index + ProgressBar1.Refresh() + Application.DoEvents() + Next + + ProgressBar1.Visible = False + End If + + bomNameList.Clear() + End If + + If result Then + Dim timeStr As String = timeNow.ToString("yyyyMMddHHmmss") + + m_BackupManage.SetBackupTime(timeStr) + + RefreshUpdateTime() + + MsgBox("备份完成") + Else + MsgBox("备份失败") + End If + End Sub + + Private Sub RefreshUpdateTime() + Dim rTimeStr As String = "" + If m_BackupManage.GetBackupTime(rTimeStr) = True Then + lbl_LatestTime.Text = Strings.Left(rTimeStr, 4) & "年" & Strings.Mid(rTimeStr, 5, 2) & "月" & Strings.Mid(rTimeStr, 7, 2) & "日" & + Strings.Mid(rTimeStr, 9, 2) & ":" & Strings.Mid(rTimeStr, 11, 2) & ":" & Strings.Mid(rTimeStr, 13, 2) + Else + lbl_LatestTime.Text = "----" + End If + End Sub + + Private Sub Form_备份管理_Load(sender As Object, e As EventArgs) Handles MyBase.Load + RefreshUpdateTime() + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) + Dim timeNow As Date = Now + Dim timeStr As String = timeNow.ToString("yyyyMMddHHmmss") + + m_BackupManage.SetBackupTime(timeStr) + + RefreshUpdateTime() + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/LoginForm1.Designer.vb b/WT-DMS/LoginForm1.Designer.vb new file mode 100644 index 0000000..b2b2192 --- /dev/null +++ b/WT-DMS/LoginForm1.Designer.vb @@ -0,0 +1,167 @@ + _ + _ +Partial Class LoginForm1 + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + Friend WithEvents LogoPictureBox As System.Windows.Forms.PictureBox + Friend WithEvents UsernameLabel As System.Windows.Forms.Label + Friend WithEvents PasswordLabel As System.Windows.Forms.Label + Friend WithEvents UsernameTextBox As System.Windows.Forms.TextBox + Friend WithEvents PasswordTextBox As System.Windows.Forms.TextBox + Friend WithEvents OK As System.Windows.Forms.Button + Friend WithEvents Cancel As System.Windows.Forms.Button + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(LoginForm1)) + Me.LogoPictureBox = New System.Windows.Forms.PictureBox() + Me.UsernameLabel = New System.Windows.Forms.Label() + Me.PasswordLabel = New System.Windows.Forms.Label() + Me.PasswordTextBox = New System.Windows.Forms.TextBox() + Me.OK = New System.Windows.Forms.Button() + Me.Cancel = New System.Windows.Forms.Button() + Me.UsernameTextBox = New System.Windows.Forms.TextBox() + Me.chk_AutoLogin = New System.Windows.Forms.CheckBox() + Me.chk_SaveUserName = New System.Windows.Forms.CheckBox() + Me.Timer1 = New System.Windows.Forms.Timer(Me.components) + CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'LogoPictureBox + ' + Me.LogoPictureBox.Image = CType(resources.GetObject("LogoPictureBox.Image"), System.Drawing.Image) + Me.LogoPictureBox.Location = New System.Drawing.Point(0, 0) + Me.LogoPictureBox.Name = "LogoPictureBox" + Me.LogoPictureBox.Size = New System.Drawing.Size(165, 193) + Me.LogoPictureBox.TabIndex = 0 + Me.LogoPictureBox.TabStop = False + ' + 'UsernameLabel + ' + Me.UsernameLabel.Location = New System.Drawing.Point(172, 24) + Me.UsernameLabel.Name = "UsernameLabel" + Me.UsernameLabel.Size = New System.Drawing.Size(220, 23) + Me.UsernameLabel.TabIndex = 0 + Me.UsernameLabel.Text = "用户名(&U)" + Me.UsernameLabel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'PasswordLabel + ' + Me.PasswordLabel.Location = New System.Drawing.Point(172, 81) + Me.PasswordLabel.Name = "PasswordLabel" + Me.PasswordLabel.Size = New System.Drawing.Size(220, 23) + Me.PasswordLabel.TabIndex = 2 + Me.PasswordLabel.Text = "密码(&P)" + Me.PasswordLabel.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' + 'PasswordTextBox + ' + Me.PasswordTextBox.Location = New System.Drawing.Point(174, 101) + Me.PasswordTextBox.Name = "PasswordTextBox" + Me.PasswordTextBox.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42) + Me.PasswordTextBox.Size = New System.Drawing.Size(220, 21) + Me.PasswordTextBox.TabIndex = 1 + ' + 'OK + ' + Me.OK.Location = New System.Drawing.Point(195, 170) + Me.OK.Name = "OK" + Me.OK.Size = New System.Drawing.Size(94, 23) + Me.OK.TabIndex = 2 + Me.OK.Text = "确定(&O)" + ' + 'Cancel + ' + Me.Cancel.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Cancel.Location = New System.Drawing.Point(298, 170) + Me.Cancel.Name = "Cancel" + Me.Cancel.Size = New System.Drawing.Size(94, 23) + Me.Cancel.TabIndex = 3 + Me.Cancel.Text = "取消(&C)" + ' + 'UsernameTextBox + ' + Me.UsernameTextBox.Location = New System.Drawing.Point(174, 44) + Me.UsernameTextBox.Name = "UsernameTextBox" + Me.UsernameTextBox.Size = New System.Drawing.Size(220, 21) + Me.UsernameTextBox.TabIndex = 0 + ' + 'chk_AutoLogin + ' + Me.chk_AutoLogin.AutoSize = True + Me.chk_AutoLogin.Checked = Global.WT_DMS.My.MySettings.Default.CHK_AUTOLOGIN + Me.chk_AutoLogin.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_AUTOLOGIN", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chk_AutoLogin.Location = New System.Drawing.Point(298, 137) + Me.chk_AutoLogin.Name = "chk_AutoLogin" + Me.chk_AutoLogin.Size = New System.Drawing.Size(72, 16) + Me.chk_AutoLogin.TabIndex = 5 + Me.chk_AutoLogin.Text = "自动登录" + Me.chk_AutoLogin.UseVisualStyleBackColor = True + ' + 'chk_SaveUserName + ' + Me.chk_SaveUserName.AutoSize = True + Me.chk_SaveUserName.Checked = Global.WT_DMS.My.MySettings.Default.CHK_SAVEUSERNAME + Me.chk_SaveUserName.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_SAVEUSERNAME", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chk_SaveUserName.Location = New System.Drawing.Point(183, 137) + Me.chk_SaveUserName.Name = "chk_SaveUserName" + Me.chk_SaveUserName.Size = New System.Drawing.Size(84, 16) + Me.chk_SaveUserName.TabIndex = 4 + Me.chk_SaveUserName.Text = "记住用户名" + Me.chk_SaveUserName.UseVisualStyleBackColor = True + ' + 'Timer1 + ' + Me.Timer1.Interval = 2000 + ' + 'LoginForm1 + ' + Me.AcceptButton = Me.OK + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.CancelButton = Me.Cancel + Me.ClientSize = New System.Drawing.Size(401, 211) + Me.Controls.Add(Me.chk_AutoLogin) + Me.Controls.Add(Me.chk_SaveUserName) + Me.Controls.Add(Me.Cancel) + Me.Controls.Add(Me.OK) + Me.Controls.Add(Me.PasswordTextBox) + Me.Controls.Add(Me.UsernameTextBox) + Me.Controls.Add(Me.PasswordLabel) + Me.Controls.Add(Me.UsernameLabel) + Me.Controls.Add(Me.LogoPictureBox) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "LoginForm1" + Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "INHAOS DMS" + CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents chk_SaveUserName As System.Windows.Forms.CheckBox + Friend WithEvents chk_AutoLogin As System.Windows.Forms.CheckBox + Friend WithEvents Timer1 As System.Windows.Forms.Timer + +End Class diff --git a/WT-DMS/LoginForm1.resx b/WT-DMS/LoginForm1.resx new file mode 100644 index 0000000..f630bdd --- /dev/null +++ b/WT-DMS/LoginForm1.resx @@ -0,0 +1,722 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + iVBORw0KGgoAAAANSUhEUgAAAXIAAADBCAYAAADSDTtmAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 + YQUAAAAgY0hSTQAAeiYAAICEAAD6AAAAgOgAAHUwAADqYAAAOpgAABdwnLpRPAAAAAlwSFlzAAALDAAA + CwwBP0AiyAAAinlJREFUeF7tvQV8VEf79h8gxHGJG5KEhBAgWHB3d3eKu7sVd4fi7u7uDhWo0FJ5KpyN + bDa4T/d/X2d3wuRwdpNH/u+vwJzn831D0/5K2Lz95tpr7plxcFvqpgDXxa6K6wJiDjHNVXGZ6KK4TCDG + EWOJMcRoCxmrZ1QcHBxAUSKUCCK8iZxEFsKdcCEyEo5EeiKd2Wx2kLwPPU6OjhmV27df67Ju3TOlXr1E + pVixL5WoqNM2OKlEROxQwsLWKKGhXyj58y8hFqcgX76F+J79RbQkmhL1iWpEOaIYEU4EE/he5iAyEfz7 + mF7va5dIJP/3JItclfkiq8xnE1NI5hD5eKvIwWgro1yUDMUzQAqTiYJEfiKQ8CIggMyEG+FMQAIZCClz + G+D1SZcuna7EwebNz5X69f97kefPvwjfswdEK4KLvDpRnhBF7kPghzK+j66E+j3U+9olEsn/PSlE7rbE + KvN5xEwS+WSSto1U7tzDWUkfnB5i6EZEEPmIAMKTyE5wmTsRUuZ2wGtjT+Q7djxXGjZMu8hDQlaQtFMV + eTNCFHlxAt/HPIQUuUTyAeHgtkwQOaFWLAuJucR0oWLRSeVOzZyUdJnSQQ54e440l5fwJyDzbATemkME + kDkqFshcilwDPRntVSu7d7/4D0SulXiKaqU1wUVeg0iTyAn5vZNI/oG8J3JV5mLFMlVTsfBUTiIHjhUd + IYeFRGGiAIG35r5EbiIr4UHIvtwO9Li7urrrShzs3fu/Evk8fK9+J7Qir0CUIFCT4Ycxvn9S5BLJB4JF + 5LZkPp+YpVOxjLZCInce5KxkKKD25YOIQgRf/OSpji9+yr7cBvRkz5Ilh67Ewb59L9LQkZ9QwsO32RV5 + 3ryz8H36lfh3RI56TIpcIvkH807kWpmjL7dVsWhSuVNrJyVdNrVigRgiiRBCb/FT7MulFKzQ4+fl5a8r + cQCRY2olOvq2jsA5x1WRh4auJpEv1xV5njxT8T36kUiLyHMRUuQSyQeAg9tyq8R1ZJ5iJFE7xTLaCmQ+ + 0kVxrKRWLMuIaIIvftrry2Uqt0JPWN684boSB6hWatc2kshv6QjcQqFCx0jkW+yKPChoAr5HdwmtyCsS + JQmIHN83KXKJ5APCrshVmfOKBVMsk0ja2oVPayp3HuisZAhVK5aBRBECfTkWzrgUZF9uA3qKR0XF6Eoc + YLGzRg2I/KauxKOiTqkiL1Bgs12RBwSMxPfnNsFF3oCoSXCR490URO5HSJFLJB8IDm4rSNj2ZC5WLNgo + pF34tIocqdypuZOSzkOtWJDyogjtZiFZsehAT7Vy5eroShxg/LBKFYj8ho7EuciPkMg3WEW+TFfkfn4D + 8b25QkiRSyQfERaRpyLz5CkWLHx+TtLWLnxaRa5WLKXVimUOgQ0mfLOQOF8uKxYN9LSoW7edrsTBpk3P + lYoVE5SiRa/rSPydyMPC1pPIV9kUuY9Pd3xvThOyWpFIPiIc3L4gWXORizIXRJ4sc2wU0lv4FFK5ulHI + T90o1JnAFn4+X46UJ0cSdaCnV7t2g3QlDlavfqaULQuRX9WRuEXkkZGHSeTr7Irc07Mdvi+HCLnYKZF8 + RFhEngaZp1j45LPlNlJ5xlrqWSybCKQ8zJeHEeJIoqxYBOgZN3DgDF2Jg8WLnyqlSxtI5Fd0JM5FftAq + 8pUk8qW6Is+VqzG+LzuItIhcjh9KJB8IFpGvJESZc5FrZW5r4ZOncqvIXYa58Nny4QQqFnSvsmKxAT1L + pkzZoCtxMHPmEyUm5k+lSJGLOhIHJ5WCBfeTyNeSyL+wKfLs2avje7KW+HdELjcESST/cCwdOUS+itCT + uSDyFAuf2h2fowku8xHW7fsuydv3MZKoV7HIjUIEPbu/+OKUrsTBuHGPlVKlfiWRX9CROBf53mSR65+z + sljJnDkG349FhFbkcou+RPIBYzk0CwKHyNMg8+SKBQuf9lI5yTxDtJrKpxLaioUfkypWLEjln6Qs6Lmy + f/89XYmDgQMfKiVL/mhD5KeIE0pExC5B5O9LHLi7F8T3YwohD82SSD4iHFCXqOLmIucyT61i4Ts+7aXy + dpTKs6qpvAmhN8XCNwp9sguf9Ph4evopN24815U46NIlSSle/DulcOHzGolzkR9P9ZwV4Ozsj+/FSEIe + YyuRfEQ4IF2rgobAV1tB1ZLWVM7PYdERuctwF8UxRh1HnE+UJjDFwg/WEs9iQSoXK5ZPSeQx0dHldQXO + adbMRCL/hkR+ViNxi8gtuzq3Uhq3vRkoX74FSoYMmfC96EXIiyUkko8IB3WkkMSspnBIfC2RlopFHEfU + pnJer5DInTs7K+lyqqkcvSwW1PjBWvwsFnHh85NL5fS0atiwk67AweXLr9Tt+Tgwq3DhMzZEjs1AG60i + 1x89tG7P/5ZoR0DkeJdUj4DIyxJYx8APWV598e+LFLlE8g/HQR0nXEgih7AhcIhclLkNkasLn0jls0nk + fJOQrVReVk3lS4gyRFoXPj8VkY/p12+qrsTB/v0v1M1A2NWpL/KTSmTkISW1zUC+vn3xPbhIcJE3JuoS + eiIXf8BKkUsk/3AcUI9gpFCVMyoVSHyd9SNk/u+kcj5XrhG5c9fkVN6WKEWkZeHzk0jl9KydM2e3rsTB + F188S54hf1/k6MfF0UPbM+Senm3w+h8g8D1oQUDkdYiqBH7Aovbi3xO+foGNW/jhqn4/9L5+iUTyf49F + 5Fi45Iuea4j1BGSOqsXewqeYym115SRyNZWXSU7lSH984VM8IZHv+PxkUjn+jOnTZ1D27PlWV+Jg4kSM + Hv6mFClySSNxLvITJPI9qY4eZs9eA6//OoKLvBEBkVchIHIcdMYrLylyieQDwgGbe9R6RVz0hMhBGioW + 3VQujiJaRa525ZYzyzExEUPwExKRAPV2fH70qZyeiNDQKF2Bc3r2fKiUKGF79BALnZaJlbV2J1Y8PIri + tccZOG0ILvLaRGUC3w+8S8I58nyiiNdd/HvxSVRdEsmHiEXkuNIN9QolbFXaEPgGgsvc3hQLT+XaufLR + hFCvqKm8pJrK5xGYksDcsnbHp/Yclo86ldPTtE6dNroC51gmVu7YHD3EQicmViyjh/oTK8DZ2Q+vPUYP + IfLmREOiFlGJQN2FRWh8L/AOSVy3kCKXSP7hOCBJqyJHqka9AlmjXoHINxKQuV7FopfK+TG3ELlOKndq + 66Skc1NTOSRiaxzxk0nl9Ng9Y+XChVdKtWo4vva2zuihpR/HYVmpHV8bHPy5kj69M173bgTf1ZnaEbZ8 + LFSKXCL5h+OAM8RVkaMnx/QKJM3rlU0EZI6+3N7CpzaV81FEjchBhih1tyd2F2ITCh9H/CRTOT07li8/ + ritxsH79M6VMmXj1+Fr7C532D8vy9e2D1/wC0Z7QO2cF747kgVkSyQeKQ/q86VXpqiLnPTmqFKvI3Te7 + W9I5KpbUUrl4Bou46CnUK05NnCCVIwS6WT4t8cmlcnqC/PzyKGfPxulKHIwfb1noLFr0sg2RY0fn7lQX + OnPlaorXfBcBkdvb1SnPWZFIPkDwTMlYJ6OlGoHI0ZMjeUPcEPlWd4vMIfa0pHKcjIjzym0segL88KDf + dyjxyaZyehrUqNFcV+Cczp2TlBIlfrBx6iH68aNpWujMkqUMXu+lRFo3A8ldnRLJBwSeUum90yvOw5wt + IsYuT4gaPflGq8gJtWZJSyqfQyLXbhDSiDxjdfW88i3EJ5vK6ZkwaNAsXYFz6tZNtG7N1y50iv04v6dT + vx8HLi7BeL3HEmmZIcdmIH4GDh8FlSKXSP7B4EH6HeVYzdEicr7gae3JVZFvt8pcTOVc5ILM1TNYcF45 + H0W0Ua8490zeINSJ4Knc1gTLRzlXTs/BtWsv6Aoc4J7OcuWwo/OWjYXOEyTyA9Z+3PaOzqCg8Ur69Gqd + 1ZXQGz3EojNGDzFDrvfaqz9E9f4MEonknwEeJN9C6XKkU5yHUCqHyCFnLvItJPEdVlCxpJbKcV45Ngil + sujpWCJ5FJHLRJwrF3d7pjiDRe8P8aFBTzHcmn/r1itdiQPLRqDfbe7otMyPp96Pe3t3wet8kuhA8NFD + TKzI0UOJ5CMBD/6DxajZUMeqlMpRrUDO1u36kLcq8Z1EWlI5H0XULnpqRO7UQk2JAAtufK5c3O2pPYPl + o6lX6OnVvv1gXYFz2rdHP35P7cdTitxSq2B+PC39uHVH53rC1sQKfzckjh6KtZZc6JRI/uHgwYIW+tBI + 1B0QripmvjEIC54Q+W6rzFNL5eKiJ0SORc/RhKZeAemD1UXPIQSSId/tKXa12pMRPwqp0LN+3ry9ugIH + V6++UmrUwImHX9vpxw8pBQpsSrUfd3MrgNcY4558odPW8bVyYkUi+UDBg9SF9IX/eEfh4mRV0KLI0ZFD + 5IB+nZzKRZELMk9e9MT5K2K9ohG5Y0W1XsH5H3x6AlLBLTX8ZES9jSkfdCqnp2BoaGHl/PkEXYmDZctw + 2XKs9cTDczoiP64ULLhP6Mf158eDgiYqGTJ44DXGGeRY6Ezt1EPd42sJKXKJ5B8MHvzHiuoCFUY0Jlhc + J7m+OwkRkyvbrBLfS+wieCq3N4qIRU9xp+doQluvdEy+1xPjcNhhiL42itAe3iSK5YNOiPR81qZNf12B + c/r0wdVuP+v047xWwdjhTqEff1/iwMurM17b40RHQlzo5Idl8bUJeViWRPIBgwf/sUKQeCsNYU7J2JRS + ORI3FzkmVyDyfVaZ77CmcsjeVirHoid2eor1ikbkIEOIutNzDIFROJ4Q9a4cS5HK9f4wHwL0rJ8/33at + AurVw9jhXfWgLD2RY+wwPHwLidz+1W7ZslXGa7uaSG2h095hWVLkEsk/HDxIuGIqr5I+P6VyTK9oRb6f + OGD9NVI5zmCxt+g5l0SOmXI79UrGqupM+WZCXHzT2yD0wS960lOicOEyypUrj3QFDtauxbZ8Pnao14+j + VsG2fFwkkdr8eB68tuMJvqNTb6GTLzDrLXTitZa1ikTyDwcPpMhTOV/4XOn0mZO+yA8RSOboynEGS2qL + nuJMuc4Yonq8raVegWRsjSJ+FIue9Azt2XO8rsA5/fo9VEqV+lUpWvQqiVycHxdrFX5j/koStv7Yob// + IHpNk2f17e3o1Hv3Ixc6JZIPCDzpCC5zvvDZ2rGUo6U+4SJHN05p3OOwh0XmJHb8vVQXPXm9YqMnB+nz + qdMrqFfESQq+6IlDnPSS4gf1lp+eLJkzZ1PWr7+kK3COpVb51ubYoaVWwbG19scOc+ZsiNd0B4F+XHuZ + hLijk//A1L3ejZAil0j+4eDhIucVC/4j9k3nnk7tttWpFVHkRzwUj6Mk8/301/T55EVPWyJHvcI3B/Gz + VzQit06vYNaZH6sqLnryekVchPvg0iI9jWrWbKkrb87SpU/V0w7fr1UgccsmIMu0Suq1irt7JF7TmYTY + j2vPIMdrrNePy4VOieQDAg+ECHi9wrvysRmbZLRsCOLVCkROEvc4TiCZk9zV1K6tV7jMeb0ibg7S6clx + Tjn9fgBjcTwt6h3k9MG+7adnyZQpG3QFzunWLck6rWKrVsEmID6tYrtWCQgYpaRP74bXE2OH9vpxeQa5 + RPIRgAebRfAfOxIaEhkSOUReOUNoBsV9rVXkSOT7rYn8pEXmaleORU979QqmV/jmIHv1iq9arwwg+NGq + 4k5PmzPlen+ofxr0lCxSpKzd2fEzZ14q1asb1duA9GsVnK1yUD0kK7VplVy5muG13EPIflwi+QRwmFsu + v9Il3Esp5ZlJcXdUZbqGwBGzSMd7XAa7vDtvhcStJnKIHBwimWPRM7V6BZuD+NG2owkdkTsWV+uVRQR/ + 68/vkbQ14wzZfBAdLj1jBwyYritwzoQJj5WYmAdKdPRNnVoFaRy1yl6SODYB2a9VPDwK47WcTfBaRTs/ + jnc8tnbRyn5cIvnAcHjTr7Lyplc55c1npZR7TQsq2yoGKSMicyvVfTwMOZwzPErvl/65UwenRy6TXYzu + u90NkHem45mUrCeyWrpyLHpiegUit8o7hcxRr8wjkU8hYdvpyTPWV8cQDxJ8MU7cdchT4wdXr9ATkidP + AWXPnu90Bc5p2tSknq1i2QRkq1axnK1ibxNQQMAIsVaByG1d7SbnxyWSjwSHt4NrK2/6V1Xe9CyrvOlW + UnnTqajypn0h5XXbCMN3dfMlLI7xZl2LZmPReVxZ+qzpmFMLpyeuE11N2XZli8t0NJNB3SC0gWSOnpyL + nEMSx0fdMURNT+7cw1lJ56qOy6HP/WjqFXoGdO06SlfenBUrnillyyYoxYp9qdkEJC5y7lfv5kztkmVh + WkWsVbQ3AmmvdpPz4xLJB4zD2zHNlLfD6ilvB1SjZF5eTeZvOkdbZN4m3GBoGvL8t7Yh7H6H/GxrXX82 + tExOVqWAB8vqmZG5NHN5Sgk7iSQeRxjcFqtYBC7wXk+uI3JgPUQLN72LkxUfbL1CT6Cvb7CyZcsNXYFz + cBOQZZHzGklcPFtFTON8dtz22SpAOCTL3tih3kLyBz+nL5F8qji8ndROeTu2ufJ2eAPl7cDqypu+lZQ3 + Pcoob7oUV153iDIktSzw6PdWIezXjiHsJ5L5PeKH9vnZnoaBbGS53KwqST1LTkeWsW7GJ859nE1uC0jm + C61A6kTyGeUQub2ePEbtyZcTH4V06OnVocMQXXlzdu9+oVSpgkXObzSLnJY0jp2cWOS0bMm3X6tYLllW + 39V0Juxty/8o1h4kEokFh7efd1DeTmitqMl8eH3l7eBaypt+VdSq5XW3koZnHYoYH7QIY391DmW/daJk + 3pFkTiL/vn0Iu9suP/uqbT62uY4f61ciByuZx42lz5yOZWyc8REl7gRV5hA7kXwaIhe5TiLP2FDtyXEx + 8wdfA9CjpvGNG6/qCpyDA7JKlfqX9aTD8xqR852cuEAi9UXObNmq4PXDYjWvVfQuWv5opoEkEokFh7ej + mygqIxtZRD60jvJ2UE2SuWUR9PVnpQyxrQu9fNA5nD3oEsr+1TmE/ULp/McOISTzUHaHZP5lm3zsZqu8 + 7HqLvGxhZW/WKjILy+PtxBwrOj517k4pfb4qcoPrZFeDy1gXQ7LIh1mxitz5M2eF8iBkhBT5QS/M0dOv + c+cRuvLmHDv2Uj13HDs5LTfl80VOnsYxcniI0vi2VNN4cPBkxcnJG6/dCEKsVcT7OT+KBWSJRJISB3WB + EwudvStYahWkcYBf0+de9yxrSOxY/MmDzlHsQfeCTOkWxv4kof/aKZT93DHMKvN87MvW+dgNEvnV5nnY + 5WZ52K46AWxIyZysdF435ljU8UXGFhkfuoxyiSOJG1xGEsOJoSRwwIVOWOfJcdnEBzsqR09Y3rwRyvbt + X+oKnDN48CMlJuZPdSfn+4ucljRuGTnkOzltL3Lmzt0Sr9t+AmmcT6toa5WPZqRTIpG8wyGuWahiah6m + PG1VAIubypv2kZbJlS7FLVMsxONOxU0POhZhD3pGMaVHJDN0K0DpvAD7g4DMf6B0/k1bkjmlclXmJHLI + /ELTYHa2STCbUs6T1S2QiWXL7sgcqzo+ouQdTwI3uAwRsEo9QyH1WFvc5cnrgA9u8wo9o/r2/VxX3pyT + J18qtWoZlRIlvteMHGrT+HZrGre9kxO4uxfE64Yt+WmZVpG1ikTyEeHwbb28yg/18yn3G+RXfmuUX3nQ + JESJJ7kntXgn9xdtwuMftCR5f0aJvEdBZugewWK7gXCSeTj7hdI5FkDvtMnHviKZ3xRkfp5EDpmfahzE + FlTyYs0jsjDfXBlZhnIZHjt3dE5wGUQSB4MtQs9YWe3JtxE4F0SsVz6I7eT0lI6OrqAcOfKrrsA5ljT+ + F6Xx23bS+L40jRz6+HTHa3aG4Glcuwnoozz2QCKRWHC4WTuPcov4sk4e5es6eZW7dS1i/6lBPuVXEvuf + jUMUQ9NQwy8N87/4pV2IWqsgjRu6hqsyN3SNsCbzEHUR9NvWJPOWedktkvm1ZnmTZX6mcTA72TCInWgQ + xJZV8mZtCmZhgbmdWIbSGZ44t38ndKemTgaSyXmiCYHdpTjaVqwE/tEHPNEzd9y4L3TlzTlyxNKNv0vj + fORQTOOHhQ1AK+2OHGbJUgYiX0ZA5OIly+ImoI/uIDKJRGLB4UatPAoHUge3rWL/hqTOE/vXdfM+udUk + rzqp8kOHUPZLxwLs907h7K8uEST3cPYbOvMO+dmP9Pe/o2T+DSXz2yTz680tMkfNcqZRMDtBMj9WP4gd + qRfIllX2Ya0jspLQKaGXpYTe2TneuZuzgTI2ZA4hcRGhFuBH26JeEc8o/8f05PQ0qV27tXLjxnNdgXMw + qRIT80cq3biYxm2fq+LvP1jJkCETRN6P4Iuc2rNVPsqjgSUSiYUUItcipvVrNfMknasTzC6TnG+0otTd + FuOHYexeh3B2vwMSeSj7iRI5RP5j23cy/5LSOWR+BTJHMofMKZUfJZEfJg7UCWSLKnqxZuGZmWcOR+ZY + 2fFR+pzp40gqOO8FqRKpHAt1vF7RXsz8j6gF6PHz9g5Qli07pitvzrZtz5WqVfmkil4ax9z4ISGN298A + lC1bVUgcF1iLtQo/srY28VFf1iGRSFIRucjVWsEJJ2oEsjPN87BzzfOxSy3ys+stQ9nt1mHsqzZh7BsS + OxY8vyWB/2AFMr9jrVp4b36xSR52VpD5IRL5/toBbC8xo6wnq50/E/NwSc9IKvsIJEukcr7oqZ1egcjF + euX/UuRDevQYpytvEeziLFXqt1QnVdKSxgMCRikZM+aCyPFDjy9yirPjH/31eRKJ5N8Q+fVaeQzHqgSy + k43ysNPN8rKzzfKxCy1CKKGHsqsk9KstQ9i1VnnYDZI2xI00DonfJfDrd705ybxxMDvbMJidrE8yr/tO + 5nuI3cTIIjlZ2dxuz0gshwls2ceCnTaVox7g0yu8Xsmg94f8/xt6qpQpU0s5dux3XXlzFi16qpQvn0Bp + /K7O3PhJgu/ifDepYi+NZ89eGxLfRNhb5LQ39SNrFYnkI8CBBA1JJ6Mncc7pqkHPTzYgkTfNx840y0/J + PISdbx7KLhDnm+Ov89Cvg9VOHAudSOGoViBxzq0Wedh1+vuXSObnSOanKJkfqxekynyfVeY7q/qzbeX8 + XvQJy24Kz+KcSJJZRUBQYir3J/Q2B/0/TZX05MyePbcyZ84uXXmLNGtmUs9Usb2LE2eqYBfn+lTTeGDg + GL4BCD/o+CKneIGE3iKnODsuri/IWkUi+YBxuFwjWLlSM1i5JmBL7OeqBT0+UTeYErlV5M0g8DAVSP00 + CfpU0yB2GpJuEswuNs2jduPoyJHGsfgJbpHwr9Pfu0z/3IVG78t8dw2igv+rA5UCTMtKeic2DcycmN0p + g5FkM4pAKscsdB5CTJcppAT0/sD/a+gZ1K3bmBTC1mPUqEdK6dKxSrFiX1vPVEmZxnHCoSWN812c9tN4 + jhxqGt9MQOLanZxYV+AXSIiLnDZnxwkpconkA8XhaOVA5VTVQOVstSDlQvUg5ZJV7Fd1pH6+enDSiVrB + qsTPNgtJFvmF5gXUX59qmpedIJGfaBzETjYKUmfHMUOOiRWkdHTk10niN4kbTS0yv4K/TzI/3SCYHecy + r6WK/M1BEvn+igGmvRX9E8dG5jLG5HJLIOF8QUBUfOGOJ0ze93KZ//8uJ3pqVaxYP9VKBQdjWcYNcd44 + TjjUpvET1jSOEw75mSq258YDA0fppXFx5FDcyWlrV6xc5JRIPhIcdpT3U3aW91dIlsqhSgHK8SoWsZ8j + qUPsSOxc6herBxmP1aDETSI/I0j8QvNw9deoXI43CWLHSeInrIhCxzz5pSYk76Z52DX6CJFzmV8kmaM3 + P14/iB2uSzKv5M8OVw58iFS+j0S+r4K/cWNZ34T2wVnjvV0d40k+fQks3iFl5iZQsSBlcpknJ02g94f/ + b6Anf2BgfmXp0iPJwrZFp05Y4PzduvlHe8KhOG6Ia9yQxnGmiu1dnNmz14DENxBiGtcbORR3cqKK4q+T + XOSUSD4iHLaW81PAdoJLndKwQgJVtGn9YvXguMNVA0nYJPKm6MctErdQQE3qXOTHG75DFDo2Bp0nsOCJ + auUqSRyIMj8BmVcNYMerBDw6UiXQRMk88UBFfyP9sEnYU8E/YUKhXPGlc7lhRHEugdQpLnzyyoDL/H+e + zq3/3qlDh87TFbfI5MmP1UsjcBcnHze0iFxc4OTjhqmfcOjvP0TJmDEnRD6YENO4eEu+rZFD7U5OVeR6 + f0aJRPLh4LCxjK+yqayfspnYQkDq2+xIndLx66MN87FTTUPZuWYk8mbh7GLzCFXmZ5qFsONNKVVrRP6e + 0IkzJGwsdkLeWPiE1AGX+cnq9AOjauCTk1UDTUerBCYerhRg3G+VOX1N8WtL+8a1CsoSm8M5QyzJCIt8 + EJUoc3TmotD/Z+mcnh4tW/ZWbt16pStvzv79L5Q6dRKVkiV/JIlf16lULAucBQvuSR43tHfCIciatQIk + vpKwl8axgYrfkq8dOZQ7OSWSjwyHdaV9lfUkc6AndTGpUxrG51/srZOXHWkcyk42LcDONougZG4VOaX0 + E03zsGOUvI/piJyD3Z2YIz9FH880sAgdPTmXuirzWkHsQo2gp+erBZnoB0hisswrIZUHxO8q7x9HX1Ps + sIicsVHZXLATFMe3Qlhc5hAWkuf/NJ3TU7d8+Tok6XvviVsLKhXs4LRc4WZrgfOAsMCJzT+207iPT08l + Qwb1Ps7ehF4a5xuAcK5KUUI8rlZ35JCQIpdIPnAc1sT4KoASrmJL6jylQ+prS/s821gtmO2qH8IONAxj + xxuHs1NNCpLEI9jppvTXTfKwo40CVZGLpJA5SZyDGgVTK6LQwfk6QexyjeBnV2sGmy5UDzadrhaUeKJK + oPFw5YCE/RUD4umHStyuCv6xkPmC4t6G2r6ZDBS3ITlUCpAW0icW9bTpPFnmQO9FsQU90SEhhZTly4/r + iltk7NjHSpkyfGYclYqYxnmlgvNUdgqViu1xw3z5FiiZMkXjzzefSEsa19sAhB9ucuRQIvnISBa5iCj1 + DVahA6T0NaV9nqyrHMS21M3PttcLY3saFGCHGkVQCo8gqYexw43z0F8HsiMNA9nRBhbeEzokTgIXEYWO + auWcReTPb9TKY4LML9YITjxbLch4ompgwpHKgfEHKgbEcZnvKO9vAJ3zZlO8XNXr4pBQsbCHCY3/STqn + JwDz4pMmrdUVt8i6dc+sUyqWSuX9HZyWKRXLDs6NaVrgzJ27Nf5cBwlc42avG5dpXCL5xNAVuYg2pa+O + 8X24qmIg21w3hG2tG8Z21CtA6TyC7a4fzvY1CCWx5yEC2P76AexQ/UB22CrzFEIXRV7PivWvsdtTFTqJ + /Hz1oJc3SeSQ+bVawYkkduO56kEJp6oGxh+tHBhHyTxuryWVqyJH/TO8YE4lMqszpNefQBLVpnNxqiVN + MqcH/7fT+vefpitukUuXXqkbfyzb8PmUyn9XqQQFjVdcXfPizzSJgMSxi1OmcYlEouKwqLi3rsC1IKVD + 5itjfJJWlPNnG+uEkswLUCoPJ5lHsJ0kciT0TXWDCT+2vY4/21OXhF7PIvQjWqGTsEGyyAWhI52frBPI + zlYLfHm9pkXkN2rnSbxeK9h4pWZwwoXqQfFc5pTMY/dUVCWuyhx9/uxoT6WSlzvEN5XADDU2wWDWHKkU + o3f/VtVCz/COHYfqiltLjx4PldKlH6gbfyzb8G1NqaStUgHWccP1hDaNi3PjfFJFpnGJ5BPDIbeLo1Iy + p6vSMiiLMrpgLiRuXZFzvijlk7i0jD9bXzuUbapTgFJ5BNtGbCeZI6FvqBPMVtfyZWtr+rLNtfzYDhL6 + Xh2hc5FjRyfQyvx4XXVq5RVqlWsk8+u18iSS0I03agcncJmfrhoUd6xyYCxkvrvCu1QOma8t7aM0Dsis + ZEyv3iqPHY5Iphi/w65GvapFV+b09GrcuKty9mysrrhFxo17rJQrh14cJxva3vjzbkol9UrFx6eX4uiY + hb/D4Gmcn6ki7uLkc+O2JlVkGpdIPlLwdCemEVuIK/kyOSk1fTyUfmE5lCUl3k/rK0v5JCyK8WPralP6 + rhOusoWA0JHQ19XOw74gka+q4cNWVfdl60joW2r7sZ1WoR8gmatCJ3D6IRe5VubH6lAqrxr4+mKN4KQr + NUjmtYLVRA4gc/rreMy1n6kaFKvKvFKAYRfJnIuc0ylvViWHs3p9HOoH7GxMc9VCT6eaNVsqBw/e1xW3 + yNKlT5Vq1Sy9OM5SsXfOeHj41jRVKnnzzlQ8PArja8e8PF/g5CccimeqiLs4+dy4TOMSyScCHggOQsBb + dCyaYaMJbps5EeCeUanu7aH0J6kvL+mjinxVKd/4hSVJ0LUKsPW1wtmG2haZg82U0NfWzsuWk7xXVPdh + K6tB5hahb6jpx7bW9me7SOj7KJ0ftJ5HDpnjBESt0I/VpY9VAt9cqB6cdIlETik8kdK5KnOI/AaJnJJ6 + HMk8VpV5lUADZI65d63M+4VlV4Loz0J/JvTKEBwWQnnVAsnxtCrKvDW23+/Y8bWuuEWwBb9+fcyL40As + HE9r+yyVlBt/7FcqOXM2xNe8g+CVit4Jh0jj/EwVcRenmMbl3LhE8hGDByLAed9IdphDhhy43LENfhFx + Ij8l9Ub+mVG/xC0s4atKnAOZb7QKfU2tvGxpDV+2lCS+vKoPW0EfudBXk9A31fJj20noe+oEsP3EIZL4 + EUIrc1HkJGvTZZI4IJkjlasiv1ErTxzJPFaVebUgHLNrOFgpQN3EJMocY5OjCuZUwrOoi6A9CewEhej4 + VIu2N29ZtmxtZdOma7riFrl48ZXSsqUpeV7cdi+OUUOcpWI52TC1SsXXt5/2rHFx3FA8b5yfcIir8PiZ + KuIuTpnGJZKPHDzoVjHtACFgwQxnWEPukAQW0bjYkdRXuzumjy2W0431KxnMVtQIe0/oq2vmY0tI5Iur + erOlJPJlVpl/IaRztW6hhL6rlj/bSzLHLUE4XwUyTyH0KoFvucgplScCSuZGXHJBMo+/SSInmcdeJZnT + 3zNA5jgrBjtRd5HItTKfFJVbKZrdBXIcRPDUqu3N25QpU1PZsOGyrri1dOmSpC5uFi/+jY15cbEX32St + VHCyYWqVSlF8nfMIW+OG+KFbheCXKuO8cX7CofZMFZnGJZKPGDyQABbJcDwselaIAXLHzTLoXiELUezt + M2TM8KRktZIvi+XxZB2LBrJZlUOSZb6qVj62mGS9iES+qIo3W0JA6O+l82qUzmtQOq9J6bw2pXMCJx+m + SOckcpy4CJFzmWMEESK/RiK/bhU5fYy9ViuPATI/Wy1IPfiLy1wUOZhZ1FOJyeUKSeJIXCwIir15Z0ri + hvXrLxn0pK2lX7+HSpky8WlY3BR7cftnqYAcOerh69uGr4fQW+DUGzfk543rnXAo07hE8hGDB0kO3Spk + gLfnGF+D3CEIvGWH2NHBQuxI7LUyZMhgmrJpiqn7+O6PqjSu8rxAQC7WIsqfTa2Qn62qmZ9E7scWWkUO + FltlLqZzVehVKZ2T0LeQ0NV0TjI/KKbzygGqyLGzUxQ5plau1rSIHBIHN2rnMdDnDPT31UO+6IeAsr/i + +zLHDtX5xbyU8rnVre7jCMgPVUTfChXqxW7ceNVw69YrFT15c4YPf6ROqFhuwtfb9GNZ3LTMi+PGn7T1 + 4j4+3RVHx6z8XUNqC5y2xg35eeMyjUsknwB4IAC8JcciGVIdpAC5Y4wNN8tgEgILaRA7Enu5dOnSJc7Z + PSdx5o6ZidO2TjMNnDXwYa02tZ7l98/FGhT0YsPK5CaR+7CFlb1VuMxTpHPiiyokdPq4ugqlc5L/Dms6 + R9WCdA6Rn6sWpIpclblG5Fjs5DKHyAGO2xVlvq/i+xULZL6ohLdS0VOdNZ9IjK1Ro0Xc9u1fxt68+TKW + i9yWzDFmWLEiJH5PmFCxv7iZll4cG3/c3Arga5pO6FUq2ivc+AKnOG6ovf1HpnGJ5CMHD1IcFv/QGUMG + WCyD3CH2EEIUOxJ7MRK5cfGRxcYFBxYY5+6bmwipz9g+I3HYwmFJZduUfebp7cyqh2ViI2JypZC5WLUs + I4mvIFSZE6tI5huq+bFtYtVSKeAtCTkJB2dxkVMqTyFyK8kiv1ELN/4HqxdknCGZ49RGUeZc5Dg/Zk60 + lyHYw+lxvXodnuzffy/u5s0XxEu7MsextFWqGNUTDe1PqGDTD1/ctMyL27vxB2TNWhESX03oVSp8BycW + pvHuCFVYWhY4ZRqXSD5y8OA/frwdxwIZEh06Vsgdi2Zc7LhWjSf2yAyOGRK+OPNFwvKTyxOWHl9qXHR4 + kUXqe+cm9t/YP9FrpFdSxkoZn3l7ZmT1wjOzSWU9k0WeLHOS97LKlM6JFQSXeXLVQkInAb89VTUoiWRu + gsy5yC/riJxSuQFA5PTRchGGVeZHKgeoF2eIMl9Y3Cuujm+mp93a9mWH9n3LLlwwPrGI3LbMp059oiNx + WxMqu4VzVOwvboJcuZqRxNXNS58RYqWCKRW9SiWtC5wyjUskHzl4kOAAelWIAAtlEDu2tYtiR2JHnxzu + 7OIcv/7q+vi1l9YmrDq3SpX6spPLjEuOLjEO2z3M6DffL9FluEuiUxunJMeSjs/z+zqzNoWysgVCMl9M + v15KAgfLK1lk/oVV6GuqWqqWneX93h6rEph0umqQCTK/UD0oEbcUQeSUym2KnMucZK/K/LRV5nwscUrh + 3Mag3J5sSK+x7MY5hV07q7Bzp/5iFy8mPrYl8ylTHhuqVoXEf7Ir8XcTKvy2H/ubfoCPTw8+aoijeLnE + U6tUtDs4xQVOOW4okXxC4MF/+HgrDjCCBxnoiZ0n9giPrB5x277aFrf51ub4jTc2qlJfc3FNwsqzKxPG + Hh6b4LfMz+gyxsXoPMA50bmfc2LGphkfORZ2fFEi2I31LZ7DInMS+eJKVpmTyLUyV3vzMr5vD1YMSCKZ + myiZm85ZRX6pRpAq8qt2RC7KHLcb4VKMwyTzYRE5TUXDCrKpYxapEudctSPzSZMeGapUSTBQEjdYDsK6 + JEicjxlyie9VwsO3WCWOxU3bd2+CgIBRiptbKCQ+g7A3pWKrUuELnGKlIhc4JZJPCDz4jx5AAHhLjkUy + Lne8TRfFjoW0yFzeuWJ3f787bue3O+N23NkRt+3LbXGbbm2K33B9Q/yk05Pifdf4JrhMdklwGeZidBlC + Qh/obHTuT0KvmfFxjpyOrE6BzGxKWU9V5KrMSeJgmShzYnWM7xtK0EkHKgWYIHOcSX6umkXkl2sEqSK3 + YlPkqFhI+srZaoFKr5BsD2uVr8G+mL8zhcRFmZ9VZW56xGU+duzD2MqV42NLlrxHEr9poCRueF/itsYM + 7U+oYF48c+ZSkPgKQpS4duOPdkpFr1IRz1ORaVwi+YTAg+QG8B8/sCd2yKJYYP7A2IM/H4w98NOB2H33 + 9iVLffvX2+OmXpoa773RO95luks8pfIEl5GC0Ac5G526OCU5xjg+i/B1Yd0KZ1dFvqTi+zJfQR9Xxfi8 + 2VTWL2lHeT+TVeaJp6sGGs9Xt4hckLk6R64VOZf5trJ+8S2Dsjzt1LwrO7D1KrupI3Fwnbhy9gE7QzK/ + dCnp4bBhprgKFWLjSpb8ITY6+kZskSIXSOJnidMGfYnzY2lXE/avbAPWUw3FeXHtqCGOTeAbf2xNqchK + RSL5xMGjnvhnBQIA9sReNrxYuOHoH0cNR/51xHDo10Oq1Pf/uD927w97Y6ffnB7ntd0rznW2a5zLBJL5 + eKvQRxHDicEk9P7ORscajo8yZc3AaufPxKaU8Xxf5hUplZfyeb2xrG/S5rJ+Jsh8f8UA9ZagM9UC1dMP + IfIrNYKTRQ60Ip9V1NNUKG9+NmbgFFXgt84r7CahJ3IAmV8+84B173aflSnzR1Lx4t/FFS16I65IkfOx + lMIJSPwUcQJoJG6ZFU9tzBBgcTNdOvX8lz6EvV5c3PiDcVAsOPMpFVmpSCQSh/c/8b7YxcQOUdQqVa2U + 4ST97/iD44Zjfx4zHPn9iOHwb4djD/5yMHbGVzNic+7JGes63zXOdQoxmZjg+k7olNCdBzsnOHV1MmZs + ntGUoUiGZ1F+Lqxv0RwpZV5BFfmr9WV8kzaV9TVZZZ54sGKA8XjVwISz1QLjIXOInEgWORI4BH68SmBs + 79Dsj+pWqs1WztvObpO8IXGOLZmfO/qA9ezwM6sQ8wOLLnqRFSlyKbFw4fNxUVFn4kjisSRxAhI/bihU + 6LBBlHhaZsWBl1dHxdExm7i4CSBxvV6cn6XCTzbEBBHGRbEYLSsViUTyvsi1QApWeFpvVaNlDeV03Gnl + VOwpA/53QjlhOP7XcTWlT7s7zZBtf7ZY18Wusa4ziOkaoY9ziXceTiLv4ZTg1NnJ6NTOyehYwfGxZw5H + 1iw8M1tiFfnS8pTKSeTrSOQbyviaIPMtZf0Sd5b3Mx6sFJBwsmpgPGR+sbpF5FdrBieLfH4xr8S8np6s + X+ch7MSer0niBisamWskvmvjn6xD8/usaum7rEKJi6xEkWMsMnI/i4o6mUACjytU6AQJ/QSJ/HisReJ7 + DeHhWw2ixFObFff17a04O/tB4pMJ7eKmXi/Oz1KJIMSTDfnGH1mpSCSfOLqftAUkQfRu0buFctZ4Vjmb + cFY5E3/GInUSOlL6xO8mGjwOehhcl7oaXOeQyGcTMwWhT3KNcxlNMu/lHO/0Gcm8E0Eyz1gvY1KG8Awv + KubxYBNLe7Kl5VSRv1xb2jeJUrkJMt9c1jdxazk/464KfgmHKgXGn6oaFHeuWlDcJavI91X0j+8Zkv1x + zbLV2MJp6wSBi6RM5Vzmy+f+zprX/YlVifmaJH6elY0+xsoUPciiC+1lBQseeFqo0PF4gmR+lDgcSxKP + tUh8LbHakBaJ+/sPVlxd80Piswm9xU3xxh+xF8eoITZn8bNUtBt/ZKUikXzC6H7SHvSM6zW5l3Iu8ZyK + Vugjvhth8DjkYXBb4WZwm+9mcJ1HQp9rFToS+jQS+XiXOOf+znHOPZ3jnbuQ0DuSzNsTbZyMGYpneFrI + 14X1L5SDLS/l8wIiX1fa1wSZbyzjm7ilnK9xWzm/hN0V/OOPVA6Mg8zPVw+OnRCVK6mAfwAb2G2YJoVr + UVREmU8e8RurX/VHVqnUTVa++BlWLvooK1PkACtdZC+LKbyHFY7chWT+uFChI/GRkYfiIiL2xJHEY0ni + BCS+whASssSgJ29OQMBIxd29ICSOY4FFiYuLmzjVkPfiOLhMPBBLHDXEBJHc+CORSFR0P2kPepaM/WKs + ct50XiWF0Ik+3/ZRPA54KG7LSOQLrYhCp3TuMtEl1nkQibwv0Z1k3pXo7JygCt1StTzyy5KRdcqb7TlE + Tpggc0rliZvK+hq3lvNN2FbOPx636M8s6pXU0D/zs2a1m7GV83dYRa0ncBGLxC8dV9iAbr+wmuVJ4iWv + sfLFTpHEj6gSL0MSL00SByWjdrGogtspme95GBGxKz48fHMcCTwuNHRVLEk81iLxRVbelzjOULEeS7uc + 0E6oiIub/No2LG7yeXF+IBZ6cTlqKJFI3kP3k/agZ/eCgwuSRS4Cobf/pr3ivt9dcfvCTXFbQnCZc6HP + dTW4TCaRD3OOpVQe69xLTeZxzp9Z0zmqlg5OCen90idlypj+afPAzClEvpFEvrmsb8KsaE9Ts4AsT8sX + K8smj5zHrp/5U5Vz2kRuYJuW/8E6NP2ZVS9zl1UqcYlVKHaClS16iAS+P4XESxfezWKidrDoyC0svMBa + VqDA+sTQ0NXxoaErSeTL40jUsSRwoCvy4OBJSubMJSFx8QwVcUKF3/YjLm7icDJxXtxeLy4rFYnkE0f3 + k/ag58rW21t1RQ4afNlAcd9tFflSq8y50BdYZf45yXyki4FSeSyl8ljn3gRk3oOwpPN4EnkC/V6YsT5X + 2zeTaXEJb9P60r6Jc4t7JrUOzvI0Kn84G9RzNDu887bacaMi4XVJajL/fMRvrEmNn1i1mC9J4udI4sdZ + +eiDJPJ9uhIvVWgLKxG5jhUKW87y5VvAQkK+SAgJWR5P4iaRqxIXRP5O5sHBn5PEYyBx8QZ8LnFxQoXf + 9iOeo8IXN8V5cb1eXKZxieQTR/eTtqDHJ7dvbrUP15M4KH+jvOK+QxA5BzJf7Ka4znc1uE62iNxlKDGQ + hN6PRN4nZTpPnyN9PP1+84nxxOFSOV2T6vtlehoaEMR6dBjAtq89k2LiBIuWqcn84La/WK8Ov7CaZX9k + VUpdY5WKn2EVix1h5YoeJPaxsiTxMkUsAi9deBdJfDtJfDNJfC0rFrGMRYcvYuEh8yHzJ/nyLYwH+fMv + 1JU5JJ4lS2lIfAPRldCTOE401JtQ4Zt+9BY3ZS8ukUhSoPtJW9ATU7hMYV2BcwpeLqi4byWRryBxL7Mi + yNx1gaviOslVcRlFEh9GDLLKHDULhI50Tsk8nVu6OPr9cPEDbvjf5+0d+KJty15s3Yqj6qYdjn2Zv5P4 + zPG/seZ17rPqpb9hlUteJIGfYBWiD7HyRQ8Q+1g5knhZkniZIrsJSHwbSXwTSXw1CXyJKvGiBeazqNDZ + LCTvNJY379yHtmQeHDzRQEncQF/3RqIbwdO4LYnjwg4+oSIubvJNP3xxU/biEonkPXQ/aQt6WtVpW0dX + 4OBYwjEl4HyA4raJpL3cKnERiHw+SXyCi+IymhhODCGRD04pdKf2TrH0e/1OHAkKCn3UocOQR2vWnHt0 + 9mzcc5yFgm30eiLnMhdT+b5NlhReq9yPrGrMNVa5BFL4UavE9ydLvBxJvCxJvGyRnZTGIfGNrETBVSTw + xckSLxI2mxUOncEK5p/O8uaZRsl8XuI7kVtkHhQ0LjZz5pKQ+CaiO9GFgMjFg7D4rLg4Zojr9rQTKnLT + j0QiSRXdT9qCnjE9JvTQlThY89caJfuZ7IrbepK2nsgplbvOs4p8DDGCGJpC5rEu/VySnOo5PXdz83hV + oULdh1u23HqIc084587FPxNlrhW5KnOryCcO/dXShZf+mlUpeUE3hUPgFkjihXew0pTEYwqtJ4mvZMVI + 4sXCF7LoAvOSJc4pkI9knnfW03z5FiRwmQcEjIjz8CiKH0JI4r0ILnJUKpgVx5ihKHF+LC3ffo8TDbUT + KrqLm0DveySRSD49dD9pC3rWTtk0RVfiYOLPExWP4x6K21qStlbk1nrFda5G5MOIwS4JLv1dHrn2dmWZ + +2dmWWtnZ9HRFV4OHz4viQv88uWHSZzz5xOecpnriXzp7N9Z+yb3WfUy37Mqpa5au/CjJO+D76VwCLxc + kV0k8e2sTNQWkvhaVrLgclacUnh0gQWqxIuGzWJFBImDKCJUrVjmPILM/f0Hxru7R6AOQhLvR/QmcEkE + 0jifUBEPwoLE+aw4HzPE9nucaKg3oSJ7cYlEoovuJ/WARNJnSK9svLFRV+Kgy7ddFPcD7orbao3EuchR + rcyyinykSzwl8IfO/Z2fewzIxLINzcFyj/Rm3mP8Wa6q3qxatabPR45cqIpclPiVK49MADf6QOZXBZlv + W/OHek5KzfL3WOVSN1lF60TK+ylclPhOVeKlozaSxNewEhFLiMUkciTxuSTwmarEOaLMC4ZMZ/nyTGM+ + Pt1Nrq75sDgLiQ8jBhA4DIuLHGkclQrf8MMlLs6K60lcTqhIJJJU0f2kHvRE5IvMpytwTrVb1Syjh6s0 + EreK3HW+a4LrJNeHzsOdn7sP9mBZhmRjOUd6Mu9x/sxnfADzGUeMDWC5SnizZs26Px01avF7AgdXrz5O + BFzmB3b8xQb2+IXVq/IjqxxzmwR+kZUvdoKVI4GXI4FjIkU/he9gZQpvJYmvZ6UiV7KSqsQXkcTns2IF + ZrPosBmUxt9JXCtyEODdijk7+zyj1wd1ylgCB2HhBnwuctQqSONY3KxH6G34EWfFxTFDPqEie3GJRGIT + 3U/qQU/T6i2q6wqco06sbLOOHkLeS9zi3Ba6mVznuT6hJP7SYwYl74k5WM4JJO8JfhZ5ayGZ5wz1Yp99 + NubxmDFL3xM5l/i1a0+NR48+Nvbt+9eT6lXusUrqGSkQ+LvdmZgLV9F04WoKL7KdJL5ZrVJKFVxKEl/M + SlAKLxE+jxVXJT5TRStyUeZ5vBqybK7ZmbeL4xN6fTDzPoEYSQwm+hKYWEGtgjSOSgWz4nzDDz/NUEpc + IpH8V+h+Ug961DNW9AQODsYfVLxOecW7rSFxL3B97Drb9YXHbA+WdX42lmNRbua5zJf5Lg1kPjNI1p8T + EwV5C3gP9mfZvTzZsGHzHo4bt0JX4ocOPTYOGJBgrFnTkFCq1L8SoqNvPCle5CQrSwIvW/QgSZxv7MFc + uGWsEBMp6oJmEaTwbZTCN7CYyFVqCrdIfAEJfC4rFjaLmKliS+ZR+SewwNxVWFYnZ9YoINPjqt7uD90y + pH9IrxEOwxpNDCGQyLHQiVoFaRyVCsYMMSuut2tTb1ZcSlwikaSK7if1oGfHvH3zVGmfTTgbdyr2lPH4 + g+NJR/84+vjQr4eej785nmXek4VlXUHiXpyLxO3DfFYGML9VQcxvpQXfxSTyaSTsycSElALneHX2Y4UK + lXw1duzypPHjv0gWOQS+bVtSYq9e8cZq1RRjqVK/JRQvfiehaNHrCUWKXEgoVOjo0+hC2p2ZmAu3zIZj + rFBd0KQUXlpN4cveS+Fc4HoiL2qVeHjwIOaXvTgrnsP1RevgzI865s36sGO+rEmFsrok0Wt0lBhDIJFz + kWNSBd04tt+jF8eYofaWHy5x8SAsKXGJRJIm8EAaEAje1mOxDSNwkA26XFQCGKOb6xXo9Wzrl1tfHPz5 + 4KsD9w+wQ78cZkf/dYyd+OMUO/XgLOvxdW/mdyiY+W0gaa8mIHAOJL4ikPkusIp80vsC53g28GUVKtR9 + MXbsChL5SlXiixcbTR06xCZWqqQYS5a8byxW7GsS+DUS+MX4woXPxkdFnSZOJBQsuP9ZdCHsyny3xR47 + NEuri5lbSeDowu2ncC2izEP9OzGvLCGsgqf7804kcBWSeGeiWVDmJC9XR8h8GQGRY2oFm4DwGqIbx7w4 + tt+jF9e75UcrcTlmKJFI0oSDo2NGxdXVXcmSJYfi5eWv5M0brkRFxSjlytVR6tZtp7RrN0ipU6dNUq0W + ddlp5Tw7F3uRXUi48h61r9dnfntJ5Os0EuciX04in0sin0rCtlGrgFzlvFnDhp2fDRmyPKlhwxVJjRop + ptKl/zQVL/5dYrFit4xFi14hgZ9PsAj8FHEyvlChk7j0gT4eMxaM2MmKF4K8LeekWHZobiSBr2YlCy5V + J1LspXA9IPJ83g1ZLrfcrLavx1MS90PQhQQOuhLd8mVLqpDbHSI/T0Dk+AGITUCYG8e4IW7Ax85NnKHC + b/nBrLj2SFopcYlE8m/hcPv2ayU1OnUa/mTIrBG6AucUuVic+e0gka99X+KqyNGPzyJZ2+nHQZYQL1a4 + 8ODHERELk/LmXZBE6dtE6TuxcOELxBkjpW/c1iMIXJV4MpGRh0yFCm4nmW9lpaI2s5KRa1nxiBWseDhG + CjGRknoKF4nKN5wF5SrHsjk5snbBWR93y5/tYdf8WR92y0/yzp+NBG6ReI8QCyGZnUwkYJx0iM1AOKYW + h2JhkZN340jj/AwVfnGyuGtTSlwikfxbpEnkMTHVX648uVZX4OCLf61hgWfyMr+tJO01gsS5yL8Q+nEd + kece7c+yDfNnmbr6sYxuuVhQ0PiHwcGTk4KDJyVR8jaRuBNJ3CTxEyDBkr7fCZz+Hu7RjMXtPZGRh+Mi + InY+jAxfy6Ij+O5My+aeYgXmWccK9aWtJTygE/PNGsZq+Hg8HxiW4+GAAtkf9gklYZPARXqSwHuHZk/q + G5bd1Mg/s8klQ7pEEjFmybHQiSNqMTeOWgW7N9GNo8LC9nvt4qaUuEQi+bdJVeRr114wlqlagZ2Pv6wr + cdD37kDmd4TS+EaStl4/jlpF6Me9xwWwXKMs8s48mAQ+yI95DPRlrvW9WKZMxV4GBIxMCgwEY5IKFTpm + IhILFTpuJEjiKiRyLnF+h+aR2MjIg7EFC+7BFWxxISErHkeEYlMP350527JoSYgiL14gpbxB0ZCJLJ9X + LZbbLTtrFZTl6bDwHA+HRuR4OCQ8R9KAsOwkbYjbIu8+EDjRv0B206DwHInDInImFsvpaiQZryH4Qif6 + ccyN48o2TKrwm34gcnH7vZS4RCL5t0lV5IMGzXrYZVgPXYFzql2rxfz2WftxUeS8VlkWyLxmBbAc4/1Z + 1uFWeQ+0yNtjoI8Vb+ZSKhfLlq3KC3//IUkBAcNUmUdGHiGRH7WK/JhV4pb7M98J/JB6h2ZExPbYAgXW + x4aFrSFWxeXPv+BZRMhsxndnYvKEi5zLHCIXZR4R2J35Zy/CKnm5vSBRPx4ekfMhGBmRI4k+Jg2jjwPD + SdyQNzGwQA4I3DQkIkfi8II5E0cXzG3skjdrQjanDDhPHZMrWOjEEbW4CR8iRz8uihy1CkSu7tzU+yZJ + JBKJPVIVeY0aLZ7P2bFAV+DgZNxZFnE+KkU/7kvy9qIUnmtxIMtOSTzLzACWaSyJezgxmMvb+z2c8uRg + uXI1f2IR+XAS+SiryI+QyI9ZRX6MJH5MrVAsCVwVuIEEbiCB84uQY0NClsfmz7/QiC30kSGW0cF3In8/ + lUeHTmT5vesyT/fcrGlg5mcjSN5gJMl7VEELoyMJ+jiCQDqnlG4CEPioyFzGMZG5jRMK5U6YFJU7oZKX + O7bsoyvHAVmYH0cix9ghT+R85BCJnPfjMo1LJJJ/G7si37LlZkKxsqXYsV9P6Ur8fPwVNvneDOZ9NJjl + WhPIciwJZNkg7vkBLPM8Yi4l79l+LNMUkvdIkvcwEvYgUd5eybh38WQZPbIzH5+eD9+JfHSSReLgKIn8 + cAKl7/iCBQ/EWSqUbUjggsBXGkjg1ouQLeeD58s3NwmHW2EnpipznXolIrArC8gexSp7ur/sGZrtsSrx + gjkfQt5jQGSupPGFciVNICZGWT6OjcxpGhlJCZwYW0gVuHEiCXxqkdzx04t4xlNCj/NydcQhWlj0hMiR + yHFMLW79QUfOJ1bQkXORy7lxiUTyb+Owe/cLZe/eF8q+fRbw6z17Xig7djxX2ref87Btv67stHKFnXpA + 6fuvy+zEn5fZ8d8vs6P/usyO/HaZ1TzXkmXZHMgyL/UneRNz/SzM8VXJNNOHZZpIEh9J4h7yTtxaXOvk + ZpkyFXnp5zcwyd9/qCDyw4mRkQeAkdJ3Qnj4jvjw8C1xYWHrrBWKmsBFgYsglcflzTv7CY6dTSnyGepE + Sl7Pqiy3WzbWKjjLMxL2w9HEGCRvAh/HkcQh7kkk8MmFcyVNK5LbNLVwbtO0wrkTJxbOlTipcG7j5MKe + CZ8T00niM4t6xs+O9oqbV8wrrqZvJhxpu4oQFztDCMyQY2oFh2OJo4fqYqfeN0oikUhs4dCwYaIC6tdP + VOrVS1Rq1zYqNWoYlSpVjEru3I1eTFg9nx3+9dI7frnIDqlcUMl3uCjLsobEvZDEPY/EPReQvOdY8JhO + Ah9Lsh5ODE4pbxGXYujHqz739x9EIn+XyCMj9yVGROw2hodvTyhQYGMCLj5+d4M9KpRlgsD5pceiyJHK + F8bjIojIkOmqxIuETmP5fZoxnyx5WXVv9xf9C+R4NJYETqlalfZ4awIHEPjnhXMnUdJOIkmbZhPzor0S + 5xfzMs6J9jROL+KVML2oZwJ9ngTuGT+XBL6guFfsouLesWMjc8f6uGXEJRPYGMRvAOJz5NgMJG7L5wue + MpVLJJJ/C4dixb5UONHRt4lbxE2FRGmMLFmG7fn+JAn7vC4TvpzDsuz1Y5lWkLTnExA4BxKfRRKfQowi + WQ8jBqWUt4iTfw7m6dnyiZ/fABI5UjlkPiQpPHxzIiVvI309qsRDQlbGh4YujyOBk6QXc2ELEk8hcpBc + seCKthD/zswvexFWLIfLy1ZBWZ4MCc/xcGTBnA8h70lRuZMmq7xL4FNI4jNI3nMIknfiQmJpSW/jMmJp + CZ8ESt4J9Pl4kjcJ3DtucQmv2CUlvWPpnzEsK+ljqOubCSLHbk9sCMLZ41jwxAgiP2OF3wAkU7lEIvmP + cIiKOq3o4eXV+XG7Qb10Bc6pda45y7yFEvgSEve8lBJXRT6TJD6JGEmyHvq+vDluLXMzR8dszNe3T5Kv + b2+BviZK3YmEMSRkhXpzPaXv5GvV3slalLi+zP39B8dmyVL2ibuTG3ZnPusTmv1h/7Ds6kghuvCJlL4h + 7emUvGcU8YS8KYHnTpoV7WmaG+1lgsCXlPBO/CLGx7g2xidhXYwviF9Zyid+aQnvOBJ3HIk7lgQfu7yU + j2E5SXwFQane4OniiEuYcc0b3xSEUw/5dW58ekWmcolE8h+hK/KIiH2xWXP4s7l7vtAVOCfv4cIs81oS + +UIbIldrFWIECVunVnEfYMGlfE6WOXOJlz4+3ZK8vbsm4aOPTw+it4nEnUhiNpKMk69Ug5it2BE5WGQI + DBxlyJ69hiFjxpzoq/d6ZEz/qIF/pof9wjA6mD1pKIkckyhYxITE50R7Js0rpoIEblpAAl9MAl9eytu4 + miS+roxvwuayfglby/rFby3rG7+pjG/cmtI+satiOL6GlTE+BhI8UFaV8lVq+nhA5PMInEOOc2x4KueH + Zmnv5ZSpXCKRpBldkQcGjk2q3KiBrrw5Q29OYln26NQqYhrX1Cpc3BY8reRmGfNlZdmyVXvq7d2JRA66 + EJ9B5qZ8+RYYLfdivrsbMy0iDwwco+TIUVtxcvJGtbGFwPGyuIJtTVhmpySIfDBJfHhEDkygqDXKbErh + i4p7mZaW9DItL+kNElcQJGbjutK+CRtJ4lvL+sfvKO8fv7eCf5xKRf9Yknrs+tK+hrVWSPgGkruyOsZX + ZXTBXErmjOkhc2wOwqInT+W4n1OmcolE8l+hK/Ls2Ws/GzZ/sq7AOeVP1WGZN9mpVWaQxCd6M/eRJO2h + orgt8ua4tcvFHN2zsNy5Wzz08mqX5OXVPsnTsyN97EIi7y6IfGG8RuRWiacUeUDAKHz9EDjEyQWOEcAe + BA6ywqmEp2v4eKibe0aRxMdTGp9GaXweJfBlJPA1MT6J60r7JG4o42vcUNbXuLEsBO6XsKOcf/zuCv7x + ByoGxB2uHBh3tHJA7KFKAbEkdMOWsn4GSueG9QRJXyGhK2sIiHwNUcHTHV/PFAKpHF05RhFlKpdIJP81 + 74kc4ixUqgzb8fVRXYGDjff2Mt+DYSzzahu1ymyS+FSS9xiS9nBi8DtxW8iVjEul7MzDI/Jl7tytSOCt + CcgcqbybycenV6IocovE9ftxf//BSrZsVZWMGXNBmLg7Ezf14L5MDs4G70rg1p4ZAR4Zk/qGZksaVyhX + 0udRuUyziniaFhX3TlxVyidxSzk/4/byfsZdFfwSwE5K4LtI4PtJ4AcrBZDAA2NPVAmMPWnBQH9t2EMy + 31rOV9lU1k/ZUMZPIaFbZG4Veb+wHPi6jhDi5RIylUskkv+a90Tu6dn2SdfRA3QEfi6Zdpd7sSw7/Vim + 5STt+d4kbyuzvVQ8Zngyj8kk8BEk7aHEoHfi1uIUkpVlyVLhmacnRN6GaC+IvLeOyFPWKpTalSxZyigZ + MmSCKNcRQwmM+3FwZyauW8ORshx8bldVL3fT5KjcpplFcieiC0eVsr6Mj5HEbTxUOSABHK4UGE/yjqfk + HXeEUjgEfqpqUOyZakGGc9WDDefo4+mqgQb6ZxVK7MrWcn5Wmfu+J/OobC74GvH1yVQukUj+Z5DIT5LA + wQklLGxlfHBYIbbi9JYU4n7HWXbw57Ms4mgJlnk9iXsxiXseMcfTwmwLHtNyM4/xJPARJOvB78ub49om + B3N0z8xy5Wr8yCLytkQHEnlnEnl3k69vH4j8vX48OHhSbO7cLQ3u7gXRf58lMN6H/pvLG7KGvHGMLKZF + cPlxSwFc9jDA08XRNDA8R+K8aE91pHBNaR/j9nJ+CQcr+SecqBIUf7ZaUDyJOu50tcC4U1Uh8MDY0yRx + yPs8SfxiDaI6fh2kkOCVvRX8FUryyTLXirx9nqwQOeoemcolEsn/DIeIiB0KCA/fruTO3fpRq75dSdZn + bDLi1mSWZa8Py/wFCXwBiXuuRuIzSOJTSOKjSNbDCDtp3Ll8NubhEfWSpEwC57VKR5J4V0rjPUjkfa0i + t0jc17d3XLZslWOtC5iHiDkEKhOevCFwLm+cPAhhNydwuQPuzcQFyADnn4CV1bzdjZD4qhifhM1lfRP2 + VAiIP1Y5MJ7kHHetVh4iOPZKzeDYCzWCY+lzFoETl0jil2sGK5drBCn0a+UsyfwwpXJK8ylSOfpyLvJZ + Rb0UX7eMkDm+Xp7KbU2wyLlyiUSSJhzCwtZQEl+j5M07I843OIQtOLBKV+AHfz6tUuZENZZpE0l8CYl7 + nlXihAckPpskPp2YaE3jQ4mBKeUtkjE4C8uatfJTT0+IXFur9Er08+tv9PcflpAzZ4N4N7cCceQzjBBu + JsYRWMDkEofAcfa3KPBmBC514OLGLT01CdydCXCVXZtczhkSxhXKlbCxtJ86jXKwYkD8GUrhJO+4r+rk + jf2mbt5Y+mi4USvYQJ+DvA2XSeJXSeJXa+axEqxQOldOVg1UdiOVk8i3kMg3WusVLnJQ490oIlI5Jlj4 + bfr86je9w7TkqYgSicQmDiEhKxSQO3fzR017dEgWth7z7qxgnvuDWaaVJO0FJOy5xBwCAgczCaTxMSTq + 4YS9WqVxDpYhQyZ1WuVdP26pVXLmbGrKmrV8oqtrPmP69G44DhaXGi8mcFkDjoblEkcK5wJHZcLTNy5z + gLzrErUISBtnglckkISxXR7VBkQ6q55fJpK4nzqNcqxKYByl7tibtfPE3q2XN/aH+vkM39XPayChG+hz + BkroqrivkcCv18qjUGqnXyOZUyqvFqQcrBSg0L/LZr0yODynks7BATLXXsaMw7Sw2xOHaSGV8zNYZL0i + kUjs4oCJj6CgiXG+QfnZvL0rdAXOqX6mIcu0hSS+lIQ9j9CKHLXKpLSlcedi2VimTMWf81ole/aaSZky + FUtydg40pUvnjOvSLhBI35OJ4cRAAhL/jMAUClI4776RvlGdYE4bAq9DIH1D4DgLHMKEuHECIc47QTeN + JIyLkGt6uWaImx/tpU6jnKkWGEupO/ZrEvc9kvivjUKI/Pi18k3dPMqt2haBgxvWjwByv1A9SKEfBGq9 + ss1GvQIisjpD5EMIfG0xBL4WXHrND9PiV8DxVC7rFYlEYhNV5DlzNnzUoncnXXlzVn6/mfkdCGGZ1pDI + F5GwIXJR4rOIqcTY1Bc53brkZI65MjEPjyKP3d3DkjJmzJlEnsLFxZeJ3cQCYiqBCmUEMYjoSyCJQ+JY + yOQJnNcnuMAB9Qnux8Rpg0jfSN4QJVIvZIkpERxaBWni7kyA0wintg7KGnu6WlDshRpBao1yp24+w08N + 8hv+aBxi+LNJiEJCV76vl08hwSs3SOaQOEdN5tZUfqpqoLK3Ysp6RSvy5oFZIHJM2OAHjXiYFs4q59fA + 8SNu5aKnRCKxi0Ng4Oj44AIRbPGRNboC59Q/15Jl3ubFPJaTrOcTeml8Mkl8JMkaaVyzyOnWPweRlbn2 + y8wyVnJh6dI5viQxfUvg1vldBCZPIHAsYELiE4lRBJIrJM6TOKoUSBwC5/UJT9/onXE4FeTI0zcEjuoC + PTQWFXHyIJIvFhdRZeBjxUB3J8Pmsn5qD367Th7Dd/XyGn5ukF+BxJWmocqfjUOU+w3zK9/Wy6vcJpHf + FGQupvJzlMoP6dQrosgnFMqtuDuqOz3xLgI/cPC14ohbfjEzFj1xxK14MbNM5RKJRBeH7NlrP+44rJeu + vDlrvt/GAg6GsUxrKY0vJmHbSuPjLGncbQiknY2knYXIxFz6ujHnPi7MuZ/zS+f+zs/TB6d/QlI6QeCs + 7hXEUmIhMZeYTkwixhCQOMYKkcTRh2MhEzUKEjgELqZv1CfovDEJEk1AjDx9o3/m8vYlUF9Alki++Ii/ + ntEnLDul8TyGr+vkUX6on1f5mcT9oEmoEt8sVIkjKJ3T5/MpX9XJm0LkXOZI5Vj0PK6pV7Q9OYjO7gqR + 48+Irx8/ePA1hxN2RxH1vokSieTTxiGqdAxbe3G7rsA5ahrfTml8BclaTOOzchEk7elZmdukLMxluAdz + GUzS7q9K+xVJ+4XzAOdnLgNdHrsMcnlIJDk1dEKF8j3xBbGcECU+g0Anjm312DiDJI6dmOjDIXEkWFQo + EDgWL5G+xe6b1ycQItItqgoIHMkbEyGQNgSJtAuwqIiPmBSpWSS7i3KhRpByp25eBZ34r41I5JTGjc3D + lETCQL+G3PH30ZXriRz1yulqQco+oV7R68lbB6v1CtYA8GfhR9zqbRCSi54SicQuDgNmjCRZn0rmwP2T + Vk4Qx9myu2uYz/4g5rGaZL0wM3ObnYm5zfRgrjPcmOtM1zfEK5dpLi9cxrs8dxnh8tRlGEl7sEXaemSI + zACRnyS4xHmdgiQOiSOlQuJI4qhT0IdjnBALmejAkWC5wLXpm9cnSLWoKNA3I21jEgSyhhiRclFZYFYb + QJT4a/y9VdOLeCrf1sun/Nggn/IbiRy1CkT+sEWYkkCp/HdK5ejKv6TUbqtewQYhzJTzekVvDHFSVHK9 + gncYtkYR5aKnRCJJFYc93+95u+/HfSr7f9r/Bhy4f+D1wZ8PvgJVz1R96b7N/YXrctfnrgtdn7rOd33i + Os/1sdt8t4dEkusc1yTXaa5JLmNJ1COJoSnFLeLUysmUzi0dJlJwKfEiYj4hSlybxCFxjBOiC0cHjgoF + AsfiJSZPePctpm+kWVQTvDqBDLnAIW5UFeidkXJRWeAjRIm/16aObya1PvnJKvIHTULUNP6IRA6ZQ+z4 + e99QKrdVr2CDEK9XbPXkoLBlyz5+cOHPhmpIXPREBYSvX9YrEonELg7HHxxPssWce3OSch/LneS+0T3J + bYVbktsiYgFBAlclPpckPpOYTCIfTbIeQQxxMVEi18WxuCMkfprgVcosgi9scoljxBCHW2E2HBLnKRyi + w030GBm01X1r6xNMfiDRInVD1lzefKMNPnLw931x3CwqkfsN8qcQ+ZOWBZSnrQqo6Ryf54ueWpEDXq/s + sW4O2mytV7Q9uXV6ZT2BxVrtoievV/DnkDs9JRKJTRxOKCdMtihzoYzJfZe7yW21m8ltKbGIWEgssEAi + N1EaN1EaN7mMIoalFLdAonMH58R0WdMlkoSwwDmbQB+OY13HEzipECOGkDgmUzAfjk09kDgEh9oBFQq2 + s4vpG9UJl7c2fUPgSLJc4FzYEDhkiL4Z4Nf4HASPf35M/7DsahfOqxWIHBJ/0bqAmswhd6R2bb3CZc7r + Fb45yNYY4qiCufjmICzc4ocV3m3gz2lvp6cUuUQiSYFNkQ+7M8yU5UgWE6Vxk9tyEvdijcTnkcRnEpNd + E13GuCRSGk+kNJ4IaevhWNrRSAJCN44aBQLHZArmxLHZBzs2exKQOBY10Ydj5yN2YSKFI6ViAZMncAic + yxuiQ2rl8kb65vWJmL5FgZM/LTK0/hqfxz+H/5uKxXK4Kt/Vy6f8q5Fl9JCL/FXrcFXm6Mohenv1CqZX + +OYge/VKvkxOEDn+/PzPK+70tDlTrv1GSiSSTxeHk4aTiXpEnI1IdN/hnui2yi3RbQmxiFhILLDgOsc1 + kdJ4IqXxRErjiZTGIXKjHs6dnY3pcqaDyJcQqFGQwjEjPozoT2C8EJMpmA9HHw6pYSSPX4uGFA6B89FB + sToRu2+9+kRM38kCT34BLJ/D3xNT+ZZVMT7qwiYmVUwk8mck8jdtwlWQyjGKiHpFb3qF1yvYHLRLM4ao + FXkNb/XsFawX4CgBvtMT9RH+zOJMuVivqH8W8c8hkUg+XRxOxZ4yaml5u6XR44iHkdK4kdK4kURuJJEb + SeQqrvNdja6zicmuRhK50WUkMdQq7qEuCVocyzjivBRcqgCBowtHCue7NTGZAoljegMS53PVfOEPyRR9 + MWoGpFNUJxC4PXnrpm9bWP8ZMZX37Zovm/JXkxAl1iry5xB52wjlTftINZXj8xhRRL0iipzLHPUKzl7Z + XzHAbk/eIyQ7RH6QwLEC4kw56hU+Uy7rFYlEYhOH03GnE0SW/rY0weeUTwKl8QS31W4JbsuIJcRiYhGx + 0C3Bda5rAqXxBJJ4gstoYkRKcRPxHOeOzvGUxuNJPJhOgcCxoIkqAdeuYVETkynYas8ljp4YEyl8egP1 + AsYH0X9D4HoLl1zgdtO3Laz/rJjKixfM6qzca5Bf3QiURAkc8n7TtqDypmNhVeiQe2r1Cs5eOWIdQ7TV + k88s6qV4WMYQUSnJekUikfzbOJyJT/m/0ldKx7vvd493W+8W7/YFsZRYQiy24LrANd51lmu8yyQS9Vhi + 5Dtpp2CYSxxwLOUYR9LB+SnYpYkUjvlwSBynF2K7PSSOTT783BFIHH04ttJziaFa4PPUeguXaU7ftrD+ + 3+Lfh38vfp/NSNDowzF2qIqc0vibTkVVmaNqSUu9Io4h6okcFMyqjiFiwZfXK5hekfWKRCJJEw5nE87G + cbrd6RaX6XimePfNJPLVJO5lqsjjSOAqrgtd4yiNx7lOdY1zGUeiHkOMsAhbD6e2TnHpsqpniKMXh8Ax + lYJLkCFxXAAhJnFep3CJow9HEuc1Cl+8/I+Ttz2s/x78+yBJyHJAn9Ds6kLn45YFlNfox5HGu5ZQ3nQp + rqZy1CuYXtGOIXKZX6FUjjHE1Hryur7qNXXYIMXrFVvTK3JzkEQieY9kka/6fVVc0LmgOPdd7nFua0nc + ywlIfIkg8nkk8Rkk8Qkk6rHEKJdYErZNMkRngMQ3EhA4Ujg/vZAncb6wiToBEtfWCejDUaVA4lxe/zN5 + a7H+u3m9UrZETtfkGfJkkXcrqbzpXpp+XUStXFCv2Dt7BYdoiT25nsh7WXpyrCGIrwevV+xtDpIil0gk + JHLj2VhQ5mqZWI9DHrHum9xj3Va6xZLIY0nksSRyFUrjsa5ziCmusS7jSdRjiBEpxZ3McBeDU1MnQzqX + dLiSbTCB0ULs1OQSx5Z7HHzFzxnBiKGtK89SSFzvD/G/gh78gMDvg98Pv+9h3PqTPLGCWgUS71VOFTrq + Fky2pDaGyLfr83NXtAueOBbAOX06yBw/3PjmILwmOHsFx+yKrwl+sMmeXCKRJONwLvGcof2d9gaPkx4G + 923uBrc1bga3FcQyYimxxM3gusjV4DqfmO5qIIkbKI0bKI0bIGxdhroYMhTIAInjVh+kcCxq4ko21CkY + MYTEISxbFyuInfj/sxoBvwchpvIp04t6vlvo7FJMedOzrPKmbyWLzNtFquOJmDnX9uRc5rwnF89d0Yoc + 5LXMk+OHHuoVHAiGekX7uvCzV/gPN/Xdid6fRSKRfDo4TP9lusHnrI/BfRdJfB2J+4uUEndbTCJfQBKf + RRKfSJKGyEcL0tYhY82MkDhG6pDC+b2a4jniXFZ81E7sxf9Pb5LH70PwVN68eWBmS62ChU70470rKG8H + VFfe9K+qih3TKzhgy1ZPjjFEzJOntuBZwdMdIsexBeLCL39ttEfbyp5cIpEk41DwckHF/YC74rbJTXFb + RawglhFLLVAaV1znElNdFZcJLgqlccVlJDFcH+fPnJX0fuo43ecEv1cTSRzjdfwALPTA9o5u1VYq/89k + hd+LwA8O/N4heTyclHiStdqPf1ZKTeNvB9ciaqvpHLXLL9aeXE/kqFcwT45zV+wteLYKUs9d2Urg9RGP + tkXlZG8MUYpcIvnEcfA45qG4byWRr7FKfLkg8cUk8PnEDEHio1KKW4tjjCOEtIHgSRxz4jg7hV8IgRE7 + fmwrRg3FjS//p2mcY/09eb2y+0T1PMqbztHKmx5lKI1XU94Or6+8HdnQksrbRqhjiKnNkx+oZFnwtCVy + XMpMv9dZAscTiGOIOJ5AryfHZI36+uj9GSQSyaeDg/sOkvg6EvcXVonzNL6ERL6AJD6LJD6JJD2eGJ1S + 2lqcmjkp6TzURTtsu4fEsWMTpxhicROVCg6H4ke28u33/5g0zsHvaf298TVMnlnc1zKtgloFaXx0E+Xt + 2ObK26F1VcFjDBHz5FqRc5mjJ+cbg2xNrsyJ9lKcM6ivHeoncQyR/7CTPblEItHFwW09SRuViihxXqnM + IaaksVLp76xkCM0AEaHnhcTFSoVvv9cucHJB/WPSOMDvaf29IcqWbfPntEyroFYheasSn9RWeTummVqv + YAwR8+S2FjwxT84XPPnkilbkIMA9I/8hKHtyiUSSZhxs9uLziOn/RqVSUa1UdhAYMdSmcRxJi5TJ5STO + jOMaNjGN852L/6eCoofXK0WicrpbplX6V1XeDm+gvJ3QWnk7pZNF5gOqqeewYJ48rQueeiOIoHgO9R5P + nAyp7cm18/XaH3hS5BLJJ4yDbi+OSmUmSXwiSXockVql0tJJSZdNrQVwjgpP43xKhS9wQkz88gRsP+dj + deKZ2//naZyD35vADxOXDOnSKd+1Lam8HVTTUqt83kF5O7O78nZaV7Uvx2gizi63dYAWX/DEDk97I4jW + HZ4rCb6WwHtyOU8ukUhs4mCzF59MkkYaH0OkVqmEqZXKPIKncb7AiQ0u/K5NPhvNqwLxQCxxAe8fURfg + 97d+Hfh61u9pUMSyyDm+lfJ2Rjfl7fx+ytu5fZW341qqY4i4bAILnlqRA77gickViBwLnnojiJ3yZsPr + uIfg72DwmvG7PG2duyJFLpF84jikkPhCkvi/0YsDx/JqpbKN0KtUsMDJ+15sO+fjhlxK4uId73z/z9M4 + x/p14OsZP61CgXdpfG4f5e3SYRamdlZrl/hmocpdnckVgFSOHZ6YXOEjiHoiH2KZXDlPiAvDvCcXz12R + C54SiSQZh+RKhc+LT0t7L+7UxElJl0mtVHCqYWoLnLbGDflc9D8mjXPwdRAQebvOhYMtaXx6V+XtwkEK + WzlWYavGWVL5wOrqZRO4Xd/e5Aq26tsbQcRWffq97hDihdP8Uma+aUoueEokkhSoIn9vcTMNvbi68SdY + 3fiDq9v0KhVeD4gnG2LRThw35FvxebL8x6RxgK+DgCTLlQ/KbUnjs3sqb5eNVNi6zxW2YRql8uHqTDm2 + 8WOHpy2RY3LlaGXL5IqtEcSVpXwUXP5Mvx9eT+2Cp3ZjkLimIEUukXzCOKgSx6YfvrjJ58VHvJO2Hhmi + 1V58NaFXqTQhUKnwHZz89vvUFjj/UULC10LgB0uAfxZ35eXUzsrbBQPUJM62zFLY9nkKWzNRnWLBgicm + V2yNIKInP2EdQbQlchBoGUHEOxy9BU/8EMSUj7iuICdXJJJPHIecC7K/zjk7++sck7O9zjGJGJftVY7R + xEhdXoKstTO/dHd3e9mgXpW7jRtW+4b4uknjGl82b1brVsvmdW60bVP/asf2jS5269LsXK/urU/369P+ + +NDBXQ6PGtFj/4SxffZ8PmnAjpnThm6dO2vExgXzRq9fNH/smiULx61aumj8F8sWT1i+fMnEpcQSYhGx + kJhPzCPmELOJmcQMYhoxlficmExMJCYQ44gxxGhiJDGCGEYMJQYTg4gBRH+iL9GH6EX0JLoTnxFdiS70 + dXVeOG9M58yZPX7+fkz7pJdLhye9Wj816dXOhUmv9ixNerV5tunljO6ml11LmH5uEma6WS+/6VpdK3Xy + J3Ku1M6XeLJGnsTtlQITt1QITFxfzt+4psz7FM7pbvT18VxdOKrA8GLRBQfElCrcs1zZYp2qVy3Til7v + Ri2b167RuWOTSvSalh42pGuJSeP7FZ45fWjBBXNHh9PXG0qEEPmIvEQeIpgIIgKJAMKf8CV8CG/Ci/Ak + chO5iJxEDiI7kY3ISmQhMlvJRHgQ7oQb4Uq4WHEmnIiMVhyJDFbSE+mA3v9HlEgk/zkOwUuDzUHzg8xB + s4mZxFTic9sEdAsw+4T5mKdNm2Zes2aNee3ateb169ebN2/ebN6+fbt5z5495kOHDplPnjxpvnjxovnm + zZvmO3fumH/66Sfz77//bo6NjTUnJiaaHz9+bH7+/Ln51atX5jdv3pgZY+a///6bvqZ/1oOvCV9fw4YN + zZfG9zSzrbPNbP8XZnZii5md2WFmR9eb364eb34zvL5Z6VLGfLddKfNXbd7nduuS5kstSpgPNoo2721Q + 1LyzfhHztrrv0zAyj7l///5/79q16+3BgwffnDhx4g29jq/pdXz93Xffvf7ll19ePXjw4KXRaHzx6NGj + 5y9evHhGr+HTt2/fPqavFTwiHlpJIkxEImG0kkDEE3FELGEgFOIB8SfxB/E78S/iN+JX4hfiZ+I+8RPx + I3GP+J74jl6mu8Qd4hvia+JLK7eIm8QN4hpxlbhMXCIuEheI88RZ4gxxijhJnCCOE8eII8Rh4hBxkNhP + 7CP2WNlF7CR2ENuILcRmKxuJ9VbWWFlFrCRWEMuJZcRSYjGxiFhAzCfmEnOI2cRMYgYxnZhKfG5lEjGR + mECMI8YQo4mRVoYTQ60MJgYSA4j+RF+iD9HLSg+iO/EZ0ZXoTHQiOhIdiHZEW6K1lZZEc6IZ0ZRoQjQi + GlipR9Ql6hC1iZpEDaI6UZWoQlQmKhEViPJEOaIsUYaIIUoRJawUJ6KJokQRojBRyEpBIoIIJwoQYUQo + EULkJ/IReYk8RBARaCWA8CN8rfgQXlZyW8lF5CRyENmJbERWIouVzEQmwoNwt+JGuFpxseJkJSPhaCUD + gYkvgIDxwYYMhxxTrUl8PDGG0E/iKtk/y/oyU5j7y9IxRX+jFI40fqdJo+rfNGtS88sWzWrfat2y7o12 + bRpcpcR4qXu3Fuf79Gp7emC/jseHD+l2ZOyoXvsnju+3Z+rkQTtnzRi2dd7skZsp6SKNr6PUu5qS+EpK + ayuIf1Qip3cJnelr7BwQ4HN6U49mSa82zkh6tW950qsTm5Nend6R9OroetOrleNMLwdUNz1oHm76sn6I + biK/SpypmTdxR6WgxK0VAxM32Ejk9QKyGnPkyLo/qlDYiKJFwgeXKF6od9nS0V2qVIppU7d2xcbNmtas + 1b5tw8o9u7cqN2RQl5Ljx/QpMm3K4EiZyCWSTxeH5CQ+LWXy1hI4NtDsV9nP/Nlnn5lXr16tpvF169aZ + N27caN66dat5586d5v3795uPHj1qPnPmjPny5cvm27dvmylFmn/++Wfzn3/+aY6LizMnJSWZnzx5YqYk + aX79+vU/Oo3jwddFadc8btw489Le7c3s4GozO7vT/Pe1Y+a/b502syuHzWz3EvPbye3Npu7lzN+3j9FN + 5F8S11qWMB+iRL6voe1E3qNEqLl58+Zsx44db/ft2/eWXs83Z8+efX39+vXXd+/efXX//v2X9Fq+pNfy + Ob2Wz589e/aUEvkTeh0f0+soJnKkcZ7IgV4aB0jj4C9CTORI4wBpHGjT+A+EXiL/ikAav00gkSONXyds + pfFzBNL4aUKbyI8SYho/QCCN7yX00riYyJHGNxDriLUE0vhqQi+NLyHEND6PQCJHGp9F8DQ+jZhC6KXx + sQTSOE/kI4hhBE/jgwgkcqTxfgQSeW9CTOPdCKTxLgRP5DyNgzZEKwJpvAXBEzlP4w0JnsaBmMYBT+OA + p/GKBE/k2jRekuBpvBghJvIogqdxnsjFNA60aTyYQCJHEgf+hJjGvQmkcU9CTOP2EjnSuJjI9dK4M6FN + 5EjjPJF/0GkcOKhJfKyaxDm6aTxLxUyvwgvkjW3cqPp3xLeUxO9SEv+mebNaX7VqUedW2zb1b3Rs3+ha + 187NLlFaPN+vT/vTQwZ2Pj5yePfD48b0PvD5xAF7pk8ZvHP2jOHb588ZtXnR/DEbFy8Yt54S71pK46so + qf0jEznRid4xdCoWXXDDkEbVkl7tX5n06tT2pNdXjya9vnk66fWVw6ZXuxaZXo5tYTK1ijB908B2Ij9P + iXxXZUsi32gjkXcLzWnMlMn9UqHI0FFFChcYXLxYZN+YUkW6Va5Yql2tmuWb0Wtft23r+lU/69qi3KAB + nUqNGt69KBL5nJkjIuj1DKOvVyZyieQTwyFoun4CFwloHmD29vc2L1q0yG4vfuLECfP58+fNlB7NX3/9 + tfnevXvm3377zawoijkhIcH86NEjMyVItRdHGkfSpURHX8c/+8E7Brzr6Nesnpmd201J/JT572+vmv/+ + 8Uv1Izu93fx2fn/z857lzffsJPIbrUqajzWxJPJdSOT13k/kY8qFmytXrvw3va5v9+7d++bIkSNvTp8+ + /frKlSuv6TV9+eOPP778/fffn8fGxj43mUzPntLz8uXLJ/R6IpEjjWsTOfpx3pHb68fFRK7tx8U0nqIf + J76ll+gOfRT7cZ7GeT+ORH6FEBM5T+O8H0ci1+vHkca1/TgS+W6CJ/LtxFZCm8bRjSOR8zSOfvwLAolc + m8YXEmIaRz+ONI5+nKdx3o9PJpDIeRrn/fgogqdx3o8PIcR+XC+NA3TjSOTaNN6eQDeONM67cZ7GeTfe + mOBpvD7B+3Gk8VoE78erETyN6/XjSOOlCSRypHGeyMU0jm6cp/FIIi39uJjGeTcu9uPaNA5SS+O8G+dp + HCCNaxM50jhAEtdL4zyR6wryQ8GB0raYxt9L5FkbZ37l4eX+qlrVMj9TClfTeNPGNe42b1rrm5bN63zV + plW92+3bNrzRuWOTq927tbjcp1fb8wP7dTwzbEjX46NH9jwycVzfA1MnD9w7c9rQXZQaty+YO3rrovlj + N1F63EBpfB2l8TWU0v7RiZy+zk51alWYVb9s8aRXZ3Ymvb5xMun1nSsW7l4xvTq9w/RyVk/Ti3aRpm8b + huomcnCpVr7EfVWCkxP52rLvJ/KRkV5GN1eXO5EFQ0YVjiowNLpowX6lShbuXqFc8Q41qpdt3qBelXr0 + Dqh6l05NK/Tt3S5m+NBu0Z9PGlCIXl+ZyCWSTxQHvQTOCegeYPaN9DWPGTMmRS++adMm3V780qVL5lu3 + bpm//fZb8/37981//PGHOqVCyfGDmVLRe/B1Xrt2zVyvcjnz37fPmP++d8uSxjmU0NXJlb6Vzfc76Cdy + cKt1SfOJpsXM++0k8jmVI81FihT5e8uWLW937979BpMrJ0+efE2v7evbt2+/+uGHH17Qu5zn9C7neWJi + 4tMnT54gkT8WErm2H7eXxu1NrOhNq6ToxolvAb1E39BH3o/rpXFMrGjTuDitwvvx/2ZaBYlcO60i9uP2 + plWQxsV+XEzj6MeRxnk/Lqbx8YTYj4tpXOzH9aZVkMh7EmIa5/04n1ZBGufTKrwfRxoHfFoFaZz342Ia + Rz+ul8YxrYIkntq0CtI4unFxWgVpHPA0DngaB0jjSOI8jYvduJjI0Y2LaTy1fpyncZCWaRWexNMyrQJ0 + 5fghYTORZ+uY5VWmUPdXpWOK/klJ/B7xPSXx7yiJ36Uk/k3rlnW/bt+2we1OHRrf6Nal2dVe3Vtf6t+3 + /fkhAzufHjm8+4lxY3of+XzigIPTpgzeO2vGsN3zZo/cvmj+GKTxLUsWjttISXw9pbO1xAeRyLt2bjYi + KjRf0uvbZ96lcWsif33ztOnVitGml52LmX5oZDuRY5b8QFX7iXx6tLfR2dnpF0rkowtHhQ0rWiR8QMkS + UT3Llo7uVK1K6Vb16lRqQN+DGvS6V+zds03poYO7FJs4vl8UEjm92ylAX69M5BLJJ4ZuIg8cGGj2jfE1 + 9+nTJ0US37Bhg5mSonnHjh3mvXv3JvfiFy5cUHvxb775JrkXf/DggdqLP3z40Pz06VMzpcbkXvxDSuN4 + 8LViBr5Y4UIpkziHEjrbPs/8ZlAt868d7SfyU80siXx3g6K6ifyLmlHm/Pnzq4mc3vG8OXDgwJvjx4+/ + ptf41c2bN19+9913L3755ZdnlMifGY3GZ48ePXry4sULJPJH9NqKiVybxoF2WgVJnKdxoJ0f15sdRyJH + GueJXJ1WoY/aflxM45hYQRoH4rSK3vw40rh2WoWncZ7I0Y/zNG6rH9emcYA0LvbjfHZc24/z2XGxH9eb + VkEi52kc/bheGrc1rcLTuDg7LqZx3o/rTauIs+PaflycHeeJHNMqSOTi7DifVrGVxrWz49ppFb1+3Nbs + uDaNaxO5No0D3o2ndVqFJ3JxUoVPq4j9uJjIESo+imDxXiLP3ivrq8yFPV4Viy5oaNK4xo/EPUriP1AK + /K5l89rftmpZ95u2bep/1aFdo9uUUm/07N7qat/e7S4OGtDp3PCh3c6MHd3rOCXEo1MnDzw4c/rQfXNm + jthNSXEnJfFtixeM20LpdjOl8Q2UzD6YRE50HDuqVy+vXDlSpnGeyNGTb55letm9tOnHRmF2E/nhapZE + vql8gG4iX1LK15gxo+ODghH5x0QVChtepHD4wOLFInuVKV20c+WKpVrXrlmhYbMmNWt2bN+oEr0LKkOv + e3F691N42ueDsLtTJnKJ5BMkRSIPHBFo9qvkZ+7cuXNyEhcnVLZt26ZOqFBKNFNKNJ89e9Z85cqVFPPi + 9nrxD2VKRe/B7Hve4GD9RE5gvhy7O3/rVFo3jQPs7jydSiLfWKew2d/f/296vd/SO5839M7n9dGjR1+d + P3/+1Y0bN15+++23aiL/66+/ntE7nqf0jucJvcaP6TVGItdOq4jdeFqmVcT5cVuJnPfjd61gYuVrQtuP + i2kcEys8jQPttIrYjyONi/04ZseRyPnsOJ9W4Wlc7MfFaRWkcfCfTquIs+OYVuH9uJjGxd2cYiK3N63C + d3OKaVzsx5HGxX5cb1qFz47zfjyt0yra3ZxiGtdOq+jNjov9uL00ru3HxWkVMY3zRC5Oq9jbzQnEaRXA + 0zifVAFiGhcTOZ9W+XgTefa+2V5nKZHpdeGosHhK4Pcp9f1E3KMk/gMl8e8piX9LSfxOh3YNv+rSqemt + 7t1a3ujTq+3Vgf06Xho2pOu50SN6nJ4wts+JKZMGHpkxdcih2TOG7583e+SeRfPHII3vWLJw3FZK41so + jW+iVPbBJfK5s0d2dndztZ3I9y4zvexTwfRT4/8uka8q7W90dHSMRyKPLBgyonBUgUFI5KVjinapVLFk + m1o1yzeid0nq7s4en7UsKxO5RCJRE3ngSEriVfzM7dq1M69atSpFEseECpL4rl27dCdU7t69q56j8q9/ + /ctsMBjMRqMxeV78Q+7FtQ/+DD4+PrppHLCTW81vRjX+rxP5VsLb2/tvet3f0Ov+mt4BvT5y5Mgres1f + Xrt27cWdO3ee0zufZ3/++efTuLi4J0lJSU+ePn36iBL5Q3rXw7vx1KZVbKVxvfNVeBpHN877cXTjPI2r + /TiBflw7rcLTOCZWxGkV7W5OW2nc1m5OvTS+ibDVj2unVZDG03K2ijaN82kVPj8u9uN6Z6ugH9emcW0/ + rp1WQTfOd3PyNM77cVtpXOzHkcb5bk69s1XEnZw8kfM0bu9slf9kdhyklsZtTauI/bjYjWvnx3k3zqdV + eD/+yaRx4JC9jyWJRxUKS6Ak/gulcDWNN29W60dK4j+0bln3O0ri33Zo1+gbSuJfde/W4lbvnm2uD+jX + 4cqQQV0ujhze/RwlwtOfTxxwYtqUwUdnzRh2iNLrfkqHexcvGLt78YJxOyiJb6ckvoXS2Gbig0zk9K6i + o7Ozk+1EfnS96WXfKmlO5LamVlYTlMgTKJGPpUQ+Eom8WHRk79IxRbpWrFCybc0a5Ro3blS9Nn1PKmN3 + J70jKjFmVM8iSORzZo7AeSsykUsknxgO6MTbt2+fnMSBmMT5rDilQvOpU6fUEw1v3Ljx3oRKfHz8B3eO + yr/z4M8T4O+vm8YBO7+XEnnTNCdydY5cJ41vqVMEyf/vjRs3vtm6dSsS+avDhw+rifzq1asv6HV/fv/+ + fZ7In2oTOb3eYhoXE7ne7Lh2N6c4Py4mcr1plRT9OGGvH0ciF0861E6r8NlxvWkVsR9HGueJnKdxTKsg + jQNbaRz9uF4a15tWEftxnsb5tIo4P440Lu7mFKdV0I/bO1sFiVzsx/luTluz43rTKuLZKtppFTGNi7s5 + +bQK0jg/WwVpXOzHkcbRjdvbzYk0DpDG/9NpFSRxe7PjYhrn8ETOd3LyNK6dH+dpnCdy7W7OjyqNA4fo + ohEJlMB/bda05i/Ez5TEf2rZvM6PlMTvtW1d/7uO7RvdpST+DaW/ryiJ3+rft/31IQM7X6EkfnHc6N5n + J0/of3rq5EEnZk0fdpQS4eH5c0YdWDR/zD5K4rspie+iJI40vo2S2AedyOndRrdsmTPbTuQnt6YpkR8S + Erk2jYMVMX6YWomlRD7uXSIv2AfnrVSsUKJdzerlmjRqUK1Om1b1quglcnoXhBMQZSKXSD4hHLTTKdpd + m5QG1bPF+az4V199Zf7+++/Nv/zyi3qiod6EysfSi4sPzlAPDw3VTeOAXdyfakf+3s5OTRoHa2tF/R0U + FPT3hg0bXguJ/OXp06dfXLly5fnXX3/9/Keffnr2xx9/8I78Mb0LQiJPokRu0iRye9MqfHZc24+Luznv + 07+P9+Pibk6kcd6NI41/SSCR835cm8YxsSLOjvNu/L+dVuGz4zyN6+3m5NMqSOT2plV4Gtf249qzVbTT + KtqzVcTZcb2zVbS7OcU0ntrZKtrdnOK0CtK4vd2cYj+ObhyI0yq8H9dOq2jTuHjSoZjGgV4aFxO5dnYc + iNMq9mbHkcTF3ZzaRK7Xj4tz4xyexj+uRN68aa3fiF9aNKv9c6sWde5T0vuxbZv6P3Tq0Pg7SuJ3u3dr + 8Q0l8S8pid+kJH59xLDPLo8d3evCpPH9zk2dPPD0zOlDT1ASPEpJ/DAl8YOUCPdTEt9L7KYkvpMS2Hbi + g0/kgwZ0GpA3wM92Ij+1TZ1asTdHflnY2WnrPPJ5JXwokWf8PS2JvGvnpmoip3dHMpFLJJ8wDtrpFL0k + jnNGeBIXZ8WRUrUTKh9TLy4+P/zwg7liTCndNA7URD6snt2dnTdblTQfb1LM5nnkW+sW/ntR1ci/IyIi + 3kvkp06denn58mUk8mc//vgjEvkT+h6IidxkTeSpTasAdOPA3rQK0vhPSOSE3WkV4jaht5tTnB+3Nzue + 2tkq2pMO9aZV0nK2it60ChK53tkq2jSud/Y40rg4rWJvdjwtZ6vwaRVtP440bu+0Q73Zcb1pFd6P29vN + qTc7ru3HtbPjPI3zaRWkcXvz47wbtzWtwtM40E6raNM4nx3naRzwSRVtIuf9uK4MP2QcWjav/WurlnV/ + btu6/v32bRv8SEn8h66dm33XvVvLu5TEv+7ft8OXQwZ1uUmp7xol8csTx/e7QEn87MxpQ0/PmTn8BCXx + YwvnjTlMSfDQ4gXjDlAS30dJfA8lr13ER5PI6d3K+PLFithO5Mc3qzs7bZ21gvPIcfrh3ir2bwiaVNjb + 6OLifO9dIg8bTIm8b8kSUd3Klyvernq1sk0b1q9al75nVWUil0gkwIHv2ORz4phOSS2J682Kf6xJnD84 + U6Z94wa6aRzg1qA3A2uYf7Zx+iHOI79OifxwY8t55Dt0O/LCf0+pEPF3yZIlGU/ku3fvfnXo0KHkRE7f + j2f37t17+vvvvyORP6JE/ogS+UNrIk+0JnKkcSCmcZ7IxUkVnsi1afxnIY3fI7SJXOzHkcbBTcJWPy4m + cjGNAz6twhM5nx231Y/bmlYRzx5HGuf9uPakQ20/zmfHeSLXnq0i7ubUmx1PrR/naVy7m5On8bT242k5 + WyUt0yraNC5Oq/B+nKdxgEQu9uM8jQN+2qGtaRV+7ri2H7eXxm3147Zmxzl6s+NiIv9o0zhwaNum/i8d + 2jX8iZL4j926NP+hx2ctv+3Tq+0dSnpfUxK/TWnvBiXxa5TEL0+dPOjCjKlDzlISPz1v9siTlMSPUQI8 + Qkn8ECXxg5TE91Pi2kt8dIm8QvkSSzo1rmc7kR9YaXrZqajpOzuJHDcE7awUZPcW/f4RuY3u7q43tR05 + T+ToyJHIZUcukUg4Djg7he/YPH36tDonLk6n6CVx8TRDJHF+hgr4WJ8lS5aYJw3orZvGATu81vymT0Xz + j3ZuCLra8t0t+mIi5xMrSOSDYkL/rl27Nk/kr+j781IztYKO/Cl9Tx5bE/lDSuRJ1kRupPSsnR3XTqto + d3MijfNErpvGCUysfEsfkcjF2fHkfpxAIhd3cyKJ8zTOJ1Z4Gtfey4k0Lu7k/E+mVdCNA34vpzitwvtx + vWkVcTenXhrn0ypI49p+PC1nqyCNi/04383J07h4E5Ct3ZxiGk/tbBUxjaMfRxoXz1bh0yrafhxpnO/m + LGIlrbs5eRoH9rpxcVqFJ3K92fG0TqvwblxvWgWJnHfjAAGCoyvDDxmHzh2b3P+sa4t7vXq0/r5v73bf + Duzf8Zuhg7t+NWp499vjxvS+Pml8v6uUxC9TEr9ASfwcJfHTlMRPUvI7Tkn8KCXxI5TEkcYPUNr6aBN5 + eIG8e2YP6287kW+eZXratqDpTsPUb9HfTIl8nc6uTtA6b3ZjliyZTv87c+QykUsknzYOOMWQn51y8+ZN + dccmJjTEOXE+nfIpJnH+9OrVy7x7yVzdNA7Y1tnmJz3K27xFH7s6L7YoYT7QyHLOyvZ6KZM4p23hfH+3 + b9/+LSXyV3YS+RMk8ri4ODWR0/cFiTzRmsi10ypqIqfPK8QDgk+rAHvTKkjj4HsrSOR68+M8jd8gkMi1 + 3bg4P85nx8XdnEjjYiLn0ypI5EjjQLwJSEzj2mkVftKhrWkVpHG9s1XQjyONi7s59aZVxJMO+bQKdnPy + NC7u5kztbBWexsVpFaRx7bSK3tnjYhq3NTvO+3G9aRVxdtzWtIo2jYv9eGpnq4j9OE/jaenHxWkVvX5c + nBsXE7m2H9d245yPNkQ49O7Z5l7/vu2/Gzyw893hQ7p9M3pkzy8njO1za/LE/jco5V2dOX3oJUp6F+fP + GXVu0fwxZyjxnVyycNwJSuLHKYUjjR+mlHWQ+KgTuWfuHDdPr1tqM5G/XDTYFN8ywvRlff1Ejl2dJ2rk + SdxeKTBxEyVyvXNWQAXvTMZcubLv1CbytJ61IhO5RPLp4YDzxPkphvzslL/++it5x6bedMqnlMT5ExMT + Y/7t7GHdNA7eLh5sju9W1vxtu/cTOfpx7Oo826x48smH79J4ykReOTTw7xEjRrzZuHFjciI/cuTIC3rX + 9Pzq1avP6B3T059++ukJvVtCIn9IiTyJErmJErmRvj9qIidSzI/TX/M0Duzu5qS/L/bjPI1/RyCR2+rH + 1TROYGJFrx+3d7aKvWkVdOPitApP5DyN602raM9W4dMqPJFr+3HxbJXUplXE3Zw8jYtnq6Ab19vNKU6r + 6O3mRBrniVzvbBXejfNpFZ7GxX7c1rSK9qRDcTenOK2CNG5rN6f2bBV70yroxnk/jjSu7cftTavopXGx + H0ci56lcrxvn/bg2kfNu/ONN5EMGdflu5PDud8aO7vX1hHF9v/x80oCb06YMvj5r+rCrc2eNuERJ/AIl + 8fOU9M5QEj9NSfwkpXCk8WOUro4QH30iHzq4y4A8/r5Jz7++aDuRj21h+lfTAqZb9a1pXEjk6MexqzP5 + nJXyAYl6aRzkyexi9Pf3XkqJHKcfqueR89MPxfPI5emHEomE44CbfXDjPc4TVxQl+RRDnJ1ia04cfEoP + 3rU0rlVdN4lz3o5vaf6jc2nzN21TpnGeyLGrE+es8F2deol8U52ov/P7+fy9cOHC15s2bXq1bdu2l7t3 + 735Bifz52bNnn1+7du3ZnTt3ntD36zG9a3pE36ukhw8fJtH3SU3kvCMn4ok4IpZI0Y8TSORqGqdfp+jH + 6a/fm1YhktM48Q0h7uZEN65OqxDXCEys8H6cnz+OfhxpHIj3coq7Oe1Nq/DdnJgd19vNyXdyas9W0Zsd + Rz9ub1pF248jjad2too4rYJuXOzH9U465P040jjQnnYozo7rnT0unq1ia1qFp3FxWkWbxsWzx3k/XsQK + Erm9aRWkcXFaRZwd54lcnFYB2jRuqx/naVzsx23t5NTrx8VpFTGN6wrwY8Fh3JjedyaN7/fV1MmDbs+Y + OuTm7BnDr1MSv7pg7ujLi+aPvUBJ/Dwl8XOUxM9QCj9FnKBUdZz4ZBJ5hXLFl3Vr3vD9NM4T+e0zppc9 + y6knH16vp5/IMUO+u7JlV+d6G4lcvUHfyenX8AL5JlIiH1MoMnQ4JXLdOztxQ5C8s1MikQAHcUYcN97j + PHHxFEMxiX+qz+TJk82LJ4zSTeKAXTxgftO/irqr82udRI6JlSstS5gPCTPkev34xPLhf5cuXZqtXbv2 + FSXylzt27Hi5b98+NZGfO3fu2fXr15/evXv3yc8//6wm8oSEBCRyEzpyeueERM7TONBN48QfxO8ET+T2 + plWQxsFdAon8a0JvWgVpHPB+HGlc3M2Z2tnjSONAnFbRzo7zNA7Em4CQxMVpFd6P85MOeSJP7SYgsR+3 + Na2CNK7tx8XZcX72OE/jYj+uN61i6+xxcVrFVj+ud7YKErn2Xk57Z6vwnZzibk7ejyONa/txvdlxPq0i + 7uZEGueJHN04n1ZBGuez43r9ONK4dlpF242nJY2jH//oJ1VEHKZNGfz1rOnDbs+ZOeLm/Dmjri+cN+Yq + JfHLlMQvUQq/QJyjFH6WktRp4hTxySVyP1+vi3sWzbKZyF9tn588Q65N5EjjmFg5RYkcEyvqDHk5/UTe + OSSnMXMmj0sR4fkmRBYMGY1b9IsWCR9QonihnmVLR3eqUimmVd3aFdVE3qlD44q9e7YpPXRwl2ITx/eL + mjltaIRM5BLJp4mDOJki3uzzsZ0n/p8+eB38/HzN908e0E3j4O26yeaH3cvpzpDziZXzzYonz5Djrk5t + GgftCuf7u127dm/XrVv3avPmzUjkL/bv3//i+PHjz8+fP//s5s2bT7/77rvHv/zyy6MHDx48RCKn752J + vneJ9A4qgb5vvBsH2jQuJnI1jVux14+rs+NEcj9O8DSeYlqFuEqgH+dpXJxW4Ts6tdMq4uy4th/ns+O8 + H+fz42Ia5/24uJvT1tkqvB9HGtebVkE/rk3j2puAeDeunVbR281p72wVcTen3tkqSONiPy6mcd6PI43r + 9eN8N6et2XGxH+fTKuLZKnq7OfVmx4FeP25rN6c2kSONi/24XhrX9uPa2XExkYuTKp/MtArHYe7skV9S + Er+5aP6YG4sXjLu2ZOG4K5TCLxMXKYmfpwR1jvhkE3nXzk3HFCsYrp/GASZWJrcz/dU8POUMuZDIceoh + 7urcxidWyuon8pK5PYxenjm3UiIfj0ReOCpsWHTRiP4lS0T1KF+ueMdqVcu0rF+vcv2WzWvXQCLv27td + zPCh3aI/nzSgEBI5ff/C6GuWiVwi+cRwsNWHA/lQLNy509y3QxvdJM7BxMqfncuY77ZLmcZ5Iseph+9P + rKRM4yA6j9/fkydPfr1+/fpXW7ZseUm/94sDBw48P3HixLOLFy8+/fLLL598//33j3/99ddHiqIkGY1G + NZHTOykjEjm9e7A7rULwfjw5jVvhiVzbj/NpleR+nBD7caRxgDR+hUAi52mcT6uI56uIuzntTasgjac2 + rcL7ce20irYf1+7mRDeud7aKdjenmMbFaRWkcSCmcfFeTltnj+uddMj7cX62ir1pFXv9uJjG+W5OsR/n + 0ypI4vZ2c/JpFSCm8dRmx/XSuNiPI5HzNK43rcITud60ChDTuF4i52mcJ/JPZlqF47Bo/thblORuUAK/ + TlylFH6ZuETJ6SLxySfy8AL59uqescK5ccL0slsp9WagG2I/TvB+/FzNvIm7xIkVnUQ+p7iP0c3J0Rga + GjwduzoLRYaOKhxVYAjOIo8pVfizCuVLtK9ZvVwz68mH1bp1aVa+f98OpUYN715UJnKJ5NPGQfbh9p9m + zZqZL25bq5vEATu+0fy6dwXzfZ2JFaRxfsYKTj3ck+KMlZRpfEL58L/LlCnD1qxZ8wrnrFAif4EZ8kOH + Dj0/derUsytXrjz96quvnty7d+/xv/71r0exsbFJJnoeP36c+PLlywR6RxVP30cxjQNtGhf78V8JnsYx + sSLu5uRpXNuPI5Hz3Zy8G1enVYjLBCZWxLNVeCIX58fFaRXxbBWkcb6bUzxbhffjts5WAWIaT8vZKnxa + xdbZKnx2XHv2uL1pFXtpnE+r8ESunVbh/bitaRV7Z6ugHxfTuDitwidVxESe2rQKT+Opna3CEznSuF4i + F9M4+nHt7DgQZ8fT0o+L0yo8jWvPVuGJ/JOZWAEOlMJvIY1TCr9GaekqcZmQiZwSef++7YeH5Ql6GH/5 + hH4aJ14uHmJKaBlh+qaBZmLFmsixo/NYdeGMFUys6CRy66mHZyPC803Grs5ChUJHFilcYHCJ4oX6lI4p + 2q1ypVJt69Su2KRJo+p12rVpoJ58OGhAp1JjR/UqOm3K4Mg5M0fIRC6RfKI4UIqSSdzGs2/fPnOPti10 + kzjn7YzPzLFdy9icWLnRqqT5VLN3N+fb6scbReb5u3v37m/4DPn27dtf7tmz5/mRI0eenT179um1a9ee + 3rlz5/H9+/cf/fHHHw/j4uKS6El8+vQpEnk8vbPi0ypI5OjGxX6cd+O8H0caBzyNa89XQRrniVxM418S + t4kUuzkJpHHAd3Nqp1XsnT3OZ8fF3Zz2plXE3Zx8fhxpPLXdnDyNizcBIY0De2er6KVxvX4caZzPj+tN + q9i6l1N7E5DetIp2N6d2dlxvWkVM5HxaBWmcJ3LejfNErp1WQRrniZynce38uDg7ztM438kppnGeyLVp + XEzkttK43vw4n1QRE7l2WgWC+3QSOSWkm8R1QiZyTSIPL5Bv/5wRAx/qJXHOy97lTT83CUt5xgrSOMH7 + cX5PZ3I/rpPIQ7K64oyVlZTGJ0YWDBmDGfLoogUHUiLvVbZMdOcqlWNa16tTqVGzpjVrderQuHKfXm3L + DBnUpeSk8f0KI5EvmDsa56zg5EOZyCWSTwz8P/Kx8dStW9d8c88W3SQO1Hs6+1RSb87XnrHC58cvWfvx + dzs630/juDk/wMf77+XLl79at27dS0rkL3bs2PF8//79z48fP/7s3LlzTzFD/u2332KG/CFmyI1Go+nh + w4eJz549w8QKT+S8G9dOq/A0zvtx3o3zaRU+sSLOj/NpFSRynsZvWeHz48nTKkjjxAWCJ3LtbUBiP440 + LvbjtnZz6p09rk3j2rNVtDcB6fXj2tlxe2eriPPj9mbHeRrXnq2CNM4Tud7suHZaRezHxTSuPelQ7Me1 + Z6vwNM4TOZ9WwaSKrWkVsR/nZ6ugG+fTKmIaFxO53uy49mwVW9MqqZ2topfGxdlxbT8uduOfUGAwO/x/ + KUFB8MMcFkIAAAAASUVORK5CYII= + + + + 17, 17 + + \ No newline at end of file diff --git a/WT-DMS/LoginForm1.vb b/WT-DMS/LoginForm1.vb new file mode 100644 index 0000000..49ab845 --- /dev/null +++ b/WT-DMS/LoginForm1.vb @@ -0,0 +1,174 @@ +Public Class LoginForm1 + Dim pMainForm As Form1 + Dim m_Log As New CLogManage + + ' TODO: 插入代码，以使用提供的用户名和密码执行自定义的身份验证 + ' (请参见 http://go.microsoft.com/fwlink/?LinkId=35339)。 + ' 随后自定义主体可附加到当前线程的主体，如下所示: + ' My.User.CurrentPrincipal = CustomPrincipal + ' 其中 CustomPrincipal 是用于执行身份验证的 IPrincipal 实现。 + ' 随后，My.User 将返回 CustomPrincipal 对象中封装的标识信息 + ' 如用户名、显示名等 + + Public LoginResult As Boolean = False + Dim m_LastError As String = "" + Dim m_InitOver As Boolean = False + Dim r_Right(COL_RIGHTS.max - 1) As String + + '将字符串权限转换为对应的RIGHTS值 + Private Sub ConvertRights(ByRef strSrc() As String, ByRef rRight() As RIGHTS) + For i As Integer = 0 To COL_RIGHTS.max - 1 + Select Case strSrc(i) + Case "只读" + rRight(i) = RIGHTS.READ + Case "读写" + rRight(i) = RIGHTS.READ_WRITE + Case "管理" + rRight(i) = RIGHTS.MANAGE Or RIGHTS.READ_WRITE + Case Else + rRight(i) = RIGHTS.NONE + End Select + Next + End Sub + + ''' + ''' 登录检测 + ''' + ''' + ''' + Private Function LoginCheck() As Boolean + + Dim m_AccountManage As New CAccountManage + + Dim m_UserName As String = UsernameTextBox.Text + Dim m_UserPassword As String = PasswordTextBox.Text + Dim r_Password As String = "" + Dim r_EmployeeID As Integer = 0 + + '清除密码 + PasswordTextBox.Text = "" + + If m_UserName.Length = 0 Then + m_LastError = "用户名不能为空" + Return False + End If + + Dim ipaddr As String = GetIPFromNetUrl("uts-svr2.qicp.net") ' + SQL_ConnectionSetting(ipaddr, "uts_DMS", "uts_DMS_Manager", "A98ya9hu(*HU8hu(*HU(hu") + + 'SQL_ConnectionSetting("10.46.213.199", "w&t database", "root", "3ZAn8dTtqxBTubWz") + Current_Rights(COL_RIGHTS.用户管理) = RIGHTS.READ + CAccountManage.AccessRight = RIGHTS.READ + If m_AccountManage.QueryItem(m_UserName, r_Password, r_EmployeeID, r_Right) = ERROR_CODE.SUCCESS Then + If Strings.StrComp(m_UserPassword, r_Password, Microsoft.VisualBasic.CompareMethod.Text) = 0 Then + If r_Right(COL_RIGHTS.登录) = "开启" Then + Return True + Else + m_LastError = "无登录权限" + End If + Else + m_LastError = "用户密码不正确" + End If + Else + m_LastError = "数据库连接失败，或者用户名不正确" + End If + + Return False + End Function + + Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click + If My.Settings.CHK_SAVEUSERNAME = True Then + My.Settings.TXT_USERNAME = UsernameTextBox.Text + + If My.Settings.CHK_AUTOLOGIN = True Then + My.Settings.TXT_PASSWORD = PasswordTextBox.Text + End If + + My.Settings.Save() + End If + + LoginResult = LoginCheck() + If LoginResult = True Then + If m_Log.AddItem("系统", "登入", UsernameTextBox.Text) = ERROR_CODE.SUCCESS Then + Me.Hide() + pMainForm = New Form1 + Current_UserName = UsernameTextBox.Text + ConvertRights(r_Right, Current_Rights) + pMainForm.ShowDialog() + + m_Log.AddItem("系统", "退出", UsernameTextBox.Text) + If pMainForm.QuitReson = QUIT_RESON.close Then + Me.Close() + Else + Me.Show() + End If + Else + MsgBox("保存登录信息失败!") + End If + Else + MsgBox(m_LastError) + End If + End Sub + + Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click + LoginResult = False + Me.Close() + End Sub + + Private Sub LoginForm1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + If My.Settings.CHK_SAVEUSERNAME = True Then + UsernameTextBox.Text = My.Settings.TXT_USERNAME + End If + + m_InitOver = True + End Sub + + Private Sub chk_SaveUserName_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chk_SaveUserName.CheckedChanged + If m_InitOver = False Then Return + + My.Settings.CHK_SAVEUSERNAME = chk_SaveUserName.Checked + + If My.Settings.CHK_SAVEUSERNAME = True Then + My.Settings.TXT_USERNAME = UsernameTextBox.Text + My.Settings.Save() + Else + If My.Settings.CHK_AUTOLOGIN = True Then + chk_SaveUserName.Checked = True + End If + End If + End Sub + + Private Sub LoginForm1_Shown(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Shown + If UsernameTextBox.Text.Length > 0 Then + PasswordTextBox.Focus() + End If + + If My.Settings.CHK_AUTOLOGIN = True Then + PasswordTextBox.Text = My.Settings.TXT_PASSWORD + PasswordTextBox.Refresh() + + Timer1.Start() + End If + End Sub + + Private Sub chk_AutoLogin_CheckedChanged(sender As Object, e As EventArgs) Handles chk_AutoLogin.CheckedChanged + If m_InitOver = False Then Return + + My.Settings.CHK_AUTOLOGIN = chk_AutoLogin.Checked + If My.Settings.CHK_AUTOLOGIN = True Then + If chk_SaveUserName.Checked = False Then + chk_SaveUserName.Checked = True + End If + + My.Settings.TXT_PASSWORD = PasswordTextBox.Text + My.Settings.Save() + End If + End Sub + + Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick + Timer1.Stop() + If chk_AutoLogin.Checked Then + OK.PerformClick() + End If + End Sub +End Class diff --git a/WT-DMS/LoginForm1_bak1.vb b/WT-DMS/LoginForm1_bak1.vb new file mode 100644 index 0000000..ea25f9b --- /dev/null +++ b/WT-DMS/LoginForm1_bak1.vb @@ -0,0 +1,124 @@ +Public Class LoginForm1 + Dim pMainForm As Form1 + + ' TODO: 插入代码，以使用提供的用户名和密码执行自定义的身份验证 + ' (请参见 http://go.microsoft.com/fwlink/?LinkId=35339)。 + ' 随后自定义主体可附加到当前线程的主体，如下所示: + ' My.User.CurrentPrincipal = CustomPrincipal + ' 其中 CustomPrincipal 是用于执行身份验证的 IPrincipal 实现。 + ' 随后，My.User 将返回 CustomPrincipal 对象中封装的标识信息 + ' 如用户名、显示名等 + + Public LoginResult As Boolean = False + Dim m_LastError As String = "" + Dim m_InitOver As Boolean = False + Dim r_Right(CAccountManage.COL_RIGHTS.max - 1) As String + + '将字符串权限转换为对应的RIGHTS值 + Private Sub ConvertRights(ByRef strSrc() As String, ByRef rRight() As RIGHTS) + For i As Integer = 0 To CAccountManage.COL_RIGHTS.max - 1 + Select Case strSrc(i) + Case "只读" + rRight(i) = RIGHTS.READ + Case "读写" + rRight(i) = RIGHTS.READ_WRITE + Case Else + rRight(i) = RIGHTS.NONE + End Select + Next + End Sub + + ''' + ''' 登录检测 + ''' + ''' + ''' + Private Function LoginCheck() As Boolean + + Dim m_AccountManage As New CAccountManage + + Dim m_UserName As String = UsernameTextBox.Text + Dim m_UserPassword As String = PasswordTextBox.Text + Dim r_Password As String = "" + Dim r_EmployeeID As Integer = 0 + + '清除密码 + PasswordTextBox.Text = "" + + If m_UserName.Length = 0 Then + m_LastError = "用户名不能为空" + Return False + End If + + Dim ipaddr As String = GetIPFromNetUrl("inhaos-server.synology.me") + If ipaddr.Length = 0 Then Return False + SQL_ConnectionSetting(ipaddr, "w&t database", "Tony", "123") + 'SQL_ConnectionSetting("10.46.213.199", "w&t database", "Tony", "123") + + 'SQL_ConnectionSetting("127.0.0.1", "W&T Database", "Tony", "123") + + m_AccountManage.AccessRight = RIGHTS.READ + If m_AccountManage.QueryItem(m_UserName, r_Password, r_EmployeeID, r_Right) = ERROR_CODE.SUCCESS Then + If Strings.StrComp(m_UserPassword, r_Password, Microsoft.VisualBasic.CompareMethod.Text) = 0 Then + If r_Right(CAccountManage.COL_RIGHTS.登录) = "开启" Then + Return True + Else + m_LastError = "无登录权限" + End If + Else + m_LastError = "用户密码不正确" + End If + Else + m_LastError = "数据库连接失败，或者用户名不正确" + End If + + Return False + End Function + + Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click + If My.Settings.CHK_SAVEUSERNAME = True Then + My.Settings.TXT_USERNAME = UsernameTextBox.Text + My.Settings.Save() + End If + + LoginResult = LoginCheck() + If LoginResult = True Then + Me.Hide() + pMainForm = New Form1 + pMainForm.Current_UserName = My.Settings.TXT_USERNAME + ConvertRights(r_Right, pMainForm.Current_Rights) + pMainForm.ShowDialog() + If pMainForm.QuitReson = QUIT_RESON.close Then + Me.Close() + Else + Me.Show() + End If + Else + MsgBox(m_LastError) + End If + End Sub + + Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click + LoginResult = False + Me.Close() + End Sub + + Private Sub LoginForm1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + If My.Settings.CHK_SAVEUSERNAME = True Then + UsernameTextBox.Text = My.Settings.TXT_USERNAME + End If + + PasswordTextBox.Focus() + + m_InitOver = True + End Sub + + Private Sub chk_SaveUserName_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chk_SaveUserName.CheckedChanged + My.Settings.CHK_SAVEUSERNAME = chk_SaveUserName.Checked + If m_InitOver = False Then Return + If My.Settings.CHK_SAVEUSERNAME = True Then + My.Settings.TXT_USERNAME = UsernameTextBox.Text + My.Settings.Save() + End If + End Sub +End Class diff --git a/WT-DMS/My Project/Application.Designer.vb b/WT-DMS/My Project/Application.Designer.vb new file mode 100644 index 0000000..77cc7bb --- /dev/null +++ b/WT-DMS/My Project/Application.Designer.vb @@ -0,0 +1,38 @@ +'------------------------------------------------------------------------------ +' +' 此代码由工具生成。 +' 运行时版本:4.0.30319.42000 +' +' 对此文件的更改可能会导致不正确的行为，并且如果 +' 重新生成代码，这些更改将会丢失。 +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + '注意:此文件是自动生成的；请勿直接进行修改。若要更改， + ' 或者如果您在此文件中遇到生成错误，请转至项目设计器 + ' (转至“项目属性”或在解决方案资源管理器中双击“我的项目”节点)， + ' 然后在“应用程序”选项卡中进行更改。 + ' + Partial Friend Class MyApplication + + _ + Public Sub New() + MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) + Me.IsSingleInstance = false + Me.EnableVisualStyles = true + Me.SaveMySettingsOnExit = true + Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses + End Sub + + _ + Protected Overrides Sub OnCreateMainForm() + Me.MainForm = Global.WT_DMS.LoginForm1 + End Sub + End Class +End Namespace diff --git a/WT-DMS/My Project/Application.myapp b/WT-DMS/My Project/Application.myapp new file mode 100644 index 0000000..654bba0 --- /dev/null +++ b/WT-DMS/My Project/Application.myapp @@ -0,0 +1,10 @@ + + + true + LoginForm1 + false + 0 + true + 0 + true + \ No newline at end of file diff --git a/WT-DMS/My Project/AssemblyInfo.vb b/WT-DMS/My Project/AssemblyInfo.vb new file mode 100644 index 0000000..5828d38 --- /dev/null +++ b/WT-DMS/My Project/AssemblyInfo.vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' 有关程序集的常规信息通过下列特性集 +' 控制。更改这些特性值可修改 +' 与程序集关联的信息。 + +' 查看程序集特性的值 + + + + + + + + + + +'如果此项目向 COM 公开，则下列 GUID 用于类型库的 ID + + +' 程序集的版本信息由下面四个值组成: +' +' 主版本 +' 次版本 +' 内部版本号 +' 修订号 +' +' 可以指定所有这些值，也可以使用“内部版本号”和“修订号”的默认值， +' 方法是按如下所示使用“*”: +' + + + diff --git a/WT-DMS/My Project/AssemblyInfo_BLV_MOMO_八月-22-180512-2023_Conflict.vb b/WT-DMS/My Project/AssemblyInfo_BLV_MOMO_八月-22-180512-2023_Conflict.vb new file mode 100644 index 0000000..2d6a92b --- /dev/null +++ b/WT-DMS/My Project/AssemblyInfo_BLV_MOMO_八月-22-180512-2023_Conflict.vb @@ -0,0 +1,35 @@ +Imports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' 有关程序集的常规信息通过下列特性集 +' 控制。更改这些特性值可修改 +' 与程序集关联的信息。 + +' 查看程序集特性的值 + + + + + + + + + + +'如果此项目向 COM 公开，则下列 GUID 用于类型库的 ID + + +' 程序集的版本信息由下面四个值组成: +' +' 主版本 +' 次版本 +' 内部版本号 +' 修订号 +' +' 可以指定所有这些值，也可以使用“内部版本号”和“修订号”的默认值， +' 方法是按如下所示使用“*”: +' + + + diff --git a/WT-DMS/My Project/Resources.Designer.vb b/WT-DMS/My Project/Resources.Designer.vb new file mode 100644 index 0000000..1f1e9d3 --- /dev/null +++ b/WT-DMS/My Project/Resources.Designer.vb @@ -0,0 +1,63 @@ +'------------------------------------------------------------------------------ +' +' 此代码由工具生成。 +' 运行时版本:4.0.30319.42000 +' +' 对此文件的更改可能会导致不正确的行为，并且如果 +' 重新生成代码，这些更改将会丢失。 +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + +Imports System + +Namespace My.Resources + + '此类是由 StronglyTypedResourceBuilder + '类通过类似于 ResGen 或 Visual Studio 的工具自动生成的。 + '若要添加或移除成员，请编辑 .ResX 文件，然后重新运行 ResGen + '(以 /str 作为命令选项)，或重新生成 VS 项目。 + ''' + ''' 一个强类型的资源类，用于查找本地化的字符串等。 + ''' + _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + ''' + ''' 返回此类使用的缓存的 ResourceManager 实例。 + ''' + _ + Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("WT_DMS.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' 重写当前线程的 CurrentUICulture 属性，对 + ''' 使用此强类型资源类的所有资源查找执行重写。 + ''' + _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set + resourceCulture = value + End Set + End Property + End Module +End Namespace diff --git a/WT-DMS/My Project/Resources.resx b/WT-DMS/My Project/Resources.resx new file mode 100644 index 0000000..af7dbeb --- /dev/null +++ b/WT-DMS/My Project/Resources.resx @@ -0,0 +1,117 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/My Project/Settings.Designer.vb b/WT-DMS/My Project/Settings.Designer.vb new file mode 100644 index 0000000..303203d --- /dev/null +++ b/WT-DMS/My Project/Settings.Designer.vb @@ -0,0 +1,913 @@ +'------------------------------------------------------------------------------ +' +' 此代码由工具生成。 +' 运行时版本:4.0.30319.42000 +' +' 对此文件的更改可能会导致不正确的行为，并且如果 +' 重新生成代码，这些更改将会丢失。 +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + _ + Partial Friend NotInheritable Class MySettings + Inherits Global.System.Configuration.ApplicationSettingsBase + + Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) + +#Region "My.Settings 自动保存功能" +#If _MyType = "WindowsForms" Then + Private Shared addedHandler As Boolean + + Private Shared addedHandlerLockObject As New Object + + _ + Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs) + If My.Application.SaveMySettingsOnExit Then + My.Settings.Save() + End If + End Sub +#End If +#End Region + + Public Shared ReadOnly Property [Default]() As MySettings + Get + +#If _MyType = "WindowsForms" Then + If Not addedHandler Then + SyncLock addedHandlerLockObject + If Not addedHandler Then + AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings + addedHandler = True + End If + End SyncLock + End If +#End If + Return defaultInstance + End Get + End Property + + _ + Public Property TXT_USERNAME() As String + Get + Return CType(Me("TXT_USERNAME"),String) + End Get + Set + Me("TXT_USERNAME") = value + End Set + End Property + + _ + Public Property CHK_SAVEUSERNAME() As Boolean + Get + Return CType(Me("CHK_SAVEUSERNAME"),Boolean) + End Get + Set + Me("CHK_SAVEUSERNAME") = value + End Set + End Property + + _ + Public Property CHK_PREVIEW() As Boolean + Get + Return CType(Me("CHK_PREVIEW"),Boolean) + End Get + Set + Me("CHK_PREVIEW") = value + End Set + End Property + + _ + Public Property FORM_QUERYSIM_WIDHT() As Integer + Get + Return CType(Me("FORM_QUERYSIM_WIDHT"),Integer) + End Get + Set + Me("FORM_QUERYSIM_WIDHT") = value + End Set + End Property + + _ + Public Property FORM_QUERYSIM_HEIGHT() As Integer + Get + Return CType(Me("FORM_QUERYSIM_HEIGHT"),Integer) + End Get + Set + Me("FORM_QUERYSIM_HEIGHT") = value + End Set + End Property + + _ + Public Property FORM_QUERYSTORAGE_WIDTH() As Integer + Get + Return CType(Me("FORM_QUERYSTORAGE_WIDTH"),Integer) + End Get + Set + Me("FORM_QUERYSTORAGE_WIDTH") = value + End Set + End Property + + _ + Public Property FORM_QUERYSTORAGE_HEIGHT() As Integer + Get + Return CType(Me("FORM_QUERYSTORAGE_HEIGHT"),Integer) + End Get + Set + Me("FORM_QUERYSTORAGE_HEIGHT") = value + End Set + End Property + + _ + Public Property FORM_QUERYSIM_WINSTATE() As Integer + Get + Return CType(Me("FORM_QUERYSIM_WINSTATE"),Integer) + End Get + Set + Me("FORM_QUERYSIM_WINSTATE") = value + End Set + End Property + + _ + Public Property FORM_QUERYSTORAGE_WINSTATE() As Integer + Get + Return CType(Me("FORM_QUERYSTORAGE_WINSTATE"),Integer) + End Get + Set + Me("FORM_QUERYSTORAGE_WINSTATE") = value + End Set + End Property + + _ + Public Property FORM_QUERYSIM_X() As Integer + Get + Return CType(Me("FORM_QUERYSIM_X"),Integer) + End Get + Set + Me("FORM_QUERYSIM_X") = value + End Set + End Property + + _ + Public Property FORM_QUERYSIM_Y() As Integer + Get + Return CType(Me("FORM_QUERYSIM_Y"),Integer) + End Get + Set + Me("FORM_QUERYSIM_Y") = value + End Set + End Property + + _ + Public Property FORM_QUERYSTORAGE_X() As Integer + Get + Return CType(Me("FORM_QUERYSTORAGE_X"),Integer) + End Get + Set + Me("FORM_QUERYSTORAGE_X") = value + End Set + End Property + + _ + Public Property FORM_QUERYSTORAGE_Y() As Integer + Get + Return CType(Me("FORM_QUERYSTORAGE_Y"),Integer) + End Get + Set + Me("FORM_QUERYSTORAGE_Y") = value + End Set + End Property + + _ + Public Property FORM_PARTNUMBER_X() As Integer + Get + Return CType(Me("FORM_PARTNUMBER_X"),Integer) + End Get + Set + Me("FORM_PARTNUMBER_X") = value + End Set + End Property + + _ + Public Property FORM_PARTNUMBER_Y() As Integer + Get + Return CType(Me("FORM_PARTNUMBER_Y"),Integer) + End Get + Set + Me("FORM_PARTNUMBER_Y") = value + End Set + End Property + + _ + Public Property FORM_MATERIAL_X() As Integer + Get + Return CType(Me("FORM_MATERIAL_X"),Integer) + End Get + Set + Me("FORM_MATERIAL_X") = value + End Set + End Property + + _ + Public Property FORM_MATERIAL_Y() As Integer + Get + Return CType(Me("FORM_MATERIAL_Y"),Integer) + End Get + Set + Me("FORM_MATERIAL_Y") = value + End Set + End Property + + _ + Public Property FORM_SYSLOG_WIDTH() As Integer + Get + Return CType(Me("FORM_SYSLOG_WIDTH"),Integer) + End Get + Set + Me("FORM_SYSLOG_WIDTH") = value + End Set + End Property + + _ + Public Property FORM_SYSLOG_HEIGHT() As Integer + Get + Return CType(Me("FORM_SYSLOG_HEIGHT"),Integer) + End Get + Set + Me("FORM_SYSLOG_HEIGHT") = value + End Set + End Property + + _ + Public Property FORM_SYSLOG_X() As Integer + Get + Return CType(Me("FORM_SYSLOG_X"),Integer) + End Get + Set + Me("FORM_SYSLOG_X") = value + End Set + End Property + + _ + Public Property FORM_SYSLOG_Y() As Integer + Get + Return CType(Me("FORM_SYSLOG_Y"),Integer) + End Get + Set + Me("FORM_SYSLOG_Y") = value + End Set + End Property + + _ + Public Property CHK_SHOWIMAGE() As Boolean + Get + Return CType(Me("CHK_SHOWIMAGE"),Boolean) + End Get + Set + Me("CHK_SHOWIMAGE") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_序号() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_序号"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_序号") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_料号PN() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_料号PN"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_料号PN") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_物料名称() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_物料名称"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_物料名称") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_规格描述() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_规格描述"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_规格描述") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_单位() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_单位"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_单位") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_用量() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_用量"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_用量") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_使用位置() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_使用位置"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_使用位置") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_父料号() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_父料号"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_父料号") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_图片() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_图片"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_图片") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_备注() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_备注"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_备注") = value + End Set + End Property + + _ + Public Property FORM_BOM_WIDTH() As Integer + Get + Return CType(Me("FORM_BOM_WIDTH"),Integer) + End Get + Set + Me("FORM_BOM_WIDTH") = value + End Set + End Property + + _ + Public Property FORM_BOM_HEIGHT() As Integer + Get + Return CType(Me("FORM_BOM_HEIGHT"),Integer) + End Get + Set + Me("FORM_BOM_HEIGHT") = value + End Set + End Property + + _ + Public Property CHK_SHOWPNINFO() As Boolean + Get + Return CType(Me("CHK_SHOWPNINFO"),Boolean) + End Get + Set + Me("CHK_SHOWPNINFO") = value + End Set + End Property + + _ + Public Property CHK_SHOWPNIMAGE() As Boolean + Get + Return CType(Me("CHK_SHOWPNIMAGE"),Boolean) + End Get + Set + Me("CHK_SHOWPNIMAGE") = value + End Set + End Property + + _ + Public Property DLG_IMAGE_WIDTH() As Integer + Get + Return CType(Me("DLG_IMAGE_WIDTH"),Integer) + End Get + Set + Me("DLG_IMAGE_WIDTH") = value + End Set + End Property + + _ + Public Property DLG_IMAGE_HEIGHT() As Integer + Get + Return CType(Me("DLG_IMAGE_HEIGHT"),Integer) + End Get + Set + Me("DLG_IMAGE_HEIGHT") = value + End Set + End Property + + _ + Public Property DLG_IMAGE_LEFT() As Integer + Get + Return CType(Me("DLG_IMAGE_LEFT"),Integer) + End Get + Set + Me("DLG_IMAGE_LEFT") = value + End Set + End Property + + _ + Public Property DLG_IMAGE_TOP() As Integer + Get + Return CType(Me("DLG_IMAGE_TOP"),Integer) + End Get + Set + Me("DLG_IMAGE_TOP") = value + End Set + End Property + + _ + Public Property FORM_BOM_COL_WIDTH_工艺流程() As Integer + Get + Return CType(Me("FORM_BOM_COL_WIDTH_工艺流程"),Integer) + End Get + Set + Me("FORM_BOM_COL_WIDTH_工艺流程") = value + End Set + End Property + + _ + Public Property CHK_AUTOLOGIN() As Boolean + Get + Return CType(Me("CHK_AUTOLOGIN"),Boolean) + End Get + Set + Me("CHK_AUTOLOGIN") = value + End Set + End Property + + _ + Public Property TXT_PASSWORD() As String + Get + Return CType(Me("TXT_PASSWORD"),String) + End Get + Set + Me("TXT_PASSWORD") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_序号() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_序号"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_序号") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_日期() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_日期"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_日期") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_时间() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_时间"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_时间") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_收入() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_收入"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_收入") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_支出() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_支出"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_支出") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_收支类别() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_收支类别"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_收支类别") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_收支子类别() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_收支子类别"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_收支子类别") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_机种() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_机种"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_机种") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_交易方() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_交易方"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_交易方") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_业务类型() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_业务类型"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_业务类型") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_事由() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_事由"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_事由") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_经手人() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_经手人"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_经手人") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_单据类型() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_单据类型"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_单据类型") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_单据编号() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_单据编号"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_单据编号") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_备注1() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_备注1"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_备注1") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_备注2() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_备注2"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_备注2") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_备注3() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_备注3"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_备注3") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_WIDTH() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_WIDTH"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_WIDTH") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_HEIGHT() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_HEIGHT"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_HEIGHT") = value + End Set + End Property + + _ + Public Property FORM_FINAN_RECORD_COL_WIDTH_余额() As Integer + Get + Return CType(Me("FORM_FINAN_RECORD_COL_WIDTH_余额"),Integer) + End Get + Set + Me("FORM_FINAN_RECORD_COL_WIDTH_余额") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_COL_WIDTH_序号() As Integer + Get + Return CType(Me("FORM_合并用料查询_COL_WIDTH_序号"),Integer) + End Get + Set + Me("FORM_合并用料查询_COL_WIDTH_序号") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_COL_WIDTH_料号PN() As Integer + Get + Return CType(Me("FORM_合并用料查询_COL_WIDTH_料号PN"),Integer) + End Get + Set + Me("FORM_合并用料查询_COL_WIDTH_料号PN") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_COL_WIDTH_物料名称() As Integer + Get + Return CType(Me("FORM_合并用料查询_COL_WIDTH_物料名称"),Integer) + End Get + Set + Me("FORM_合并用料查询_COL_WIDTH_物料名称") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_COL_WIDTH_规格描述() As Integer + Get + Return CType(Me("FORM_合并用料查询_COL_WIDTH_规格描述"),Integer) + End Get + Set + Me("FORM_合并用料查询_COL_WIDTH_规格描述") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_COL_WIDTH_单位() As Integer + Get + Return CType(Me("FORM_合并用料查询_COL_WIDTH_单位"),Integer) + End Get + Set + Me("FORM_合并用料查询_COL_WIDTH_单位") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_WIDTH() As Integer + Get + Return CType(Me("FORM_合并用料查询_WIDTH"),Integer) + End Get + Set + Me("FORM_合并用料查询_WIDTH") = value + End Set + End Property + + _ + Public Property FORM_合并用料查询_HEIGHT() As Integer + Get + Return CType(Me("FORM_合并用料查询_HEIGHT"),Integer) + End Get + Set + Me("FORM_合并用料查询_HEIGHT") = value + End Set + End Property + End Class +End Namespace + +Namespace My + + _ + Friend Module MySettingsProperty + + _ + Friend ReadOnly Property Settings() As Global.WT_DMS.My.MySettings + Get + Return Global.WT_DMS.My.MySettings.Default + End Get + End Property + End Module +End Namespace diff --git a/WT-DMS/My Project/Settings.settings b/WT-DMS/My Project/Settings.settings new file mode 100644 index 0000000..2a5d62f --- /dev/null +++ b/WT-DMS/My Project/Settings.settings @@ -0,0 +1,216 @@ + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + \ No newline at end of file diff --git a/WT-DMS/My Project/app.manifest b/WT-DMS/My Project/app.manifest new file mode 100644 index 0000000..2acc8a7 --- /dev/null +++ b/WT-DMS/My Project/app.manifest @@ -0,0 +1,47 @@ + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/WT-DMS.vbproj b/WT-DMS/WT-DMS.vbproj new file mode 100644 index 0000000..1074483 --- /dev/null +++ b/WT-DMS/WT-DMS.vbproj @@ -0,0 +1,456 @@ + + + + Debug + x86 + + + 2.0 + {5F2F6487-6E84-4827-ADBB-5EEFB94661CB} + WinExe + WT_DMS.My.MyApplication + WT_DMS + INHAOS_DMS + 512 + WindowsForms + v4.8 + + + false + publish\ + true + Disk + false + Foreground + 7 + Days + false + false + true + 0 + 3.8.0.%2a + false + true + true + + + x86 + true + full + true + true + bin\Debug\ + INHAOS_DMS.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + false + + + AnyCPU + pdbonly + false + true + true + bin\Release\ + INHAOS_DMS.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 + false + + + On + + + Binary + + + Off + + + On + + + My Project\app.manifest + + + 63DFE2C29A43988A1161842CA8A79E91BD8FD2B7 + + + WT-DMS_TemporaryKey.pfx + + + true + + + false + + + LocalIntranet + + + + ..\..\CamSnapShot\CamSnapShot\bin\Debug\CamSnapShot.dll + + + False + ..\..\CamSnapShot\CamSnapShot\bin\Debug\DirectShowLib-2005.dll + + + False + C:\Program Files (x86)\FlexCell Technologies\FlexCell.NET4\bin\FlexCell.dll + + + + + + + + + + + + + + + + + + + + + + + + + + + AboutBox1.vb + + + Form + + + + + + + + + + + + + + + + + + + + dlgImage.vb + + + Form + + + dlg_AddSupplier.vb + + + Form + + + dlg_Input.vb + + + Form + + + dlg_StoreSelect.vb + + + Form + + + Form + + + Form1.vb + Form + + + form_BomManage.vb + + + Form + + + Form_FinancialQuery_Development.vb + + + Form + + + Form_FinancialQuery_Sales.vb + + + Form + + + Form_FinancialRecords_Development.vb + + + Form + + + Form_FinancialRecords_Sales.vb + + + Form + + + form_Material.vb + + + Form + + + form_PartNumber.vb + + + Form + + + form_Product.vb + + + Form + + + form_QuerySim.vb + + + Form + + + Form_QueryStorageRecord.vb + + + Form + + + Form_QueryStorage.vb + + + Form + + + form_StoreLocManage.vb + + + Form + + + form_SupplierManage.vb + + + Form + + + Form_SysLog.vb + + + Form + + + form_UserManage.vb + + + Form + + + Form_合并备料查询.vb + + + Form + + + Form_备份管理.vb + + + Form + + + LoginForm1.vb + + + Form + + + + + + + + True + Application.myapp + True + + + True + True + Resources.resx + + + True + Settings.settings + True + + + + + AboutBox1.vb + + + dlgImage.vb + + + dlg_AddSupplier.vb + + + dlg_Input.vb + + + dlg_StoreSelect.vb + + + Form1.vb + + + form_BomManage.vb + + + Form_FinancialQuery_Development.vb + + + Form_FinancialQuery_Sales.vb + + + Form_FinancialRecords_Development.vb + + + Form_FinancialRecords_Sales.vb + + + form_Material.vb + + + form_PartNumber.vb + + + form_Product.vb + + + form_QuerySim.vb + + + Form_QueryStorageRecord.vb + + + Form_QueryStorage.vb + + + form_StoreLocManage.vb + + + form_SupplierManage.vb + + + Form_SysLog.vb + + + form_UserManage.vb + + + Form_合并备料查询.vb + + + Form_备份管理.vb + + + LoginForm1.vb + + + VbMyResourcesResXFileCodeGenerator + Resources.Designer.vb + My.Resources + Designer + + + + + + + MyApplicationCodeGenerator + Application.Designer.vb + + + SettingsSingleFileGenerator + My + Settings.Designer.vb + + + + + + + + + False + + + + + Include + True + Assembly + + + False + + + + + Exclude + True + File + + + + + False + Microsoft .NET Framework 4 Client Profile %28x86 和 x64%29 + true + + + False + .NET Framework 3.5 SP1 Client Profile + false + + + False + .NET Framework 3.5 SP1 + false + + + False + Windows Installer 3.1 + true + + + + + \ No newline at end of file diff --git a/WT-DMS/WT-DMS.vbproj.user b/WT-DMS/WT-DMS.vbproj.user new file mode 100644 index 0000000..6578dfd --- /dev/null +++ b/WT-DMS/WT-DMS.vbproj.user @@ -0,0 +1,19 @@ + + + + true + + + publish\ + + + + + + zh-CN + false + + + false + + \ No newline at end of file diff --git a/WT-DMS/WT-DMS_TemporaryKey.pfx b/WT-DMS/WT-DMS_TemporaryKey.pfx new file mode 100644 index 0000000..c1c1b4d Binary files /dev/null and b/WT-DMS/WT-DMS_TemporaryKey.pfx differ diff --git a/WT-DMS/app.config b/WT-DMS/app.config new file mode 100644 index 0000000..61ba027 --- /dev/null +++ b/WT-DMS/app.config @@ -0,0 +1,242 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/bin/Debug.zip b/WT-DMS/bin/Debug.zip new file mode 100644 index 0000000..8d26965 Binary files /dev/null and b/WT-DMS/bin/Debug.zip differ diff --git a/WT-DMS/bin/Debug/CamSnapShot.dll b/WT-DMS/bin/Debug/CamSnapShot.dll new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/bin/Debug/CamSnapShot.dll differ diff --git a/WT-DMS/bin/Debug/Context/A03-BLV-IN_CH6-V01_context_20220408_154227.xml b/WT-DMS/bin/Debug/Context/A03-BLV-IN_CH6-V01_context_20220408_154227.xml new file mode 100644 index 0000000..301fed3 --- /dev/null +++ b/WT-DMS/bin/Debug/Context/A03-BLV-IN_CH6-V01_context_20220408_154227.xml @@ -0,0 +1,1033 @@ + + + 2022-04-08 03:42:27 + 1.0 + + + System + HMS + True + True + Dot + 19 + 96 + 96 + 496 + 11 + + + + + FlexCell Document + False + + + + + + + 2.5 + 2.5 + 3 + 3 + 2 + 2 + + + + TextBox + Default + 40 + GeneralGeneral + + + TextBox + Default + 151 + GeneralGeneral + + + TextBox + Default + 151 + GeneralGeneral + + + TextBox + Default + 151 + GeneralGeneral + + + TextBox + Default + 151 + GeneralGeneral + + + CheckBox + Default + 80 + GeneralGeneral + + + ComboBox + Default + 80 + GeneralGeneral + + + TextBox + Default + 80 + GeneralGeneral + + + TextBox + Default + 80 + GeneralGeneral + + + TextBox + Default + 200 + GeneralGeneral + + + TextBox + Default + 80 + GeneralGeneral + + + TextBox + Default + 80 + GeneralGeneral + + + + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 + 11 + 12 + 13 + 14 + 15 + 16 + 17 + 18 + 19 + 20 + 21 + 22 + 23 + 24 + 25 + 26 + 27 + 28 + 29 + 30 + 31 + + + + + + + + + + + + + + + + Sn + 注释 + 使用位置 + 型号 + 用量 + 校验 + 工艺流程 + 料号PN + 物料名称 + 规格描述 + 单位 + 单价 + SMBJ6.5CA + T1, T2, T3 + LC-SMB(DO-214AA)_S1 + 3 + 1 + SMT + 11700000202 + 二极管 + TVS二极管，SMBJ6.5CA（供应商：优恩半导体） + Pcs + 0.15 + DSWB08LHGET + CODER1 + SW-DIP4-Q + 1 + 1 + + 11900000106 + 开关 + DIP拨码4建开关，直插，2.54MM间距，侧拔键，上盖红色，底座黑色，拔键白色，端子铜合金，镀金（型号：YJC-04HG1) + Pcs + 0.9 + RES-4C8P-1K + RA1 + R0603X4 + 1 + 1 + SMT + 1141102R235 + SMD排阻 + 排阻，1KΩ,1/10W,+ -5%,0603X4 + Pcs + 0.03051 + 0.25A 30V 1206 + 3F1, 3F4 + RES1206 + 2 + 1 + SMT + 15400000462 + 自恢复保险丝 + 自恢复保险丝，0.25A/24V，1206 + Pcs + 0.19 + 0R + 2R21 + RES0603 + 1 + 1 + SMT + 1140000R235 + SMD电阻 + 0Ω,1/10W,+ -5%,0603 + Pcs + 0.01 + 100K + 2R22, 2R23, 2R24, 2R25, 2R26, 2R27, R7, R8, R75 + RES0603 + 9 + 1 + SMT + 1140104R235 + SMD电阻 + 100KΩ,1/10W,+ -5%,0603 + Pcs + 0.01 + 10K + 2R15, 2R16, 2R17, 2R18, 2R19, 2R20, R14, R15, R16 + RES0603 + 9 + 1 + SMT + 1140103R235 + SMD电阻 + 10KΩ,1/10W,+ -5%,0603 + Pcs + 0.01 + 1K + 2R3, 2R4, R20, R21 + RES0603 + 4 + 1 + SMT + 1140102R235 + SMD电阻 + 1KΩ,1/10W,+ -5%,0603 + Pcs + 0.01 + 1M 1% + 2R103 + RES0603 + 1 + 1 + SMT + 1140105R225 + SMD电阻 + 1MΩ,1/10W,+ -1%,0603 + Pcs + 0.01 + 330R + 2R8, 2R9, 2R10, 2R11, 2R12, 2R13 + RES0603 + 6 + 1 + SMT + 1140331R235 + SMD电阻 + 330Ω,1/10W,+ -5%,0603 + Pcs + 0.01 + 4.7K 1% 0805 + R9, R11 + RES0603 + 2 + 1 + SMT + 1140472R225 + SMD电阻 + 4.7kΩ,1/10W,+ -1%,0603 + Pcs + 0.01 + PC817 + 2U4, 2U5, 2U6, 2U7, 2U8, 2U9 + LC-SMD-4 + 6 + 1 + SMT + 15200000007 + SMD光耦 + PC817X2CSP9F，SMD-4（JLC：C66405） + Pcs + 0.35 + MD-328P-QFP48L + 2U1 + lqfp-48 + 1 + 1 + SMT + 11300000387 + IC + 单片机，MD3248P，LQFP48，1.8~5.5V，工业级(-40°C to 85°C）高性能微控制器 + Pcs + 5.48 + UN485E SO-8 + 3U3 + SO-8 + 1 + 1 + SMT + 11300000536 + IC + SIT3088EESA 电压3.0V-5.5V，256节点，RS485/RS422收发器 + Pcs + 1.85 + GRN + LED5 + LED-0603-R + 1 + 1 + SMT + 11700000192 + 发光二极管 + 贴片发光二极管,LED,绿色,0603,导通电流30mA + Pcs + 0.04 + RED + LED4, LED6 + LED-0603-R + 2 + 1 + SMT + 11700000168 + 发光二极管 + LED，红色（高亮），0603，导通电流30mA，贴片发光二极管 + Pcs + 0.027 + H7533-1 SOT-23 + U2 + SOT-23 + 1 + 1 + SMT + 11700000487 + 二极管 + H7533-1，SOT-23 + Pcs + 0.12 + DIN + 1JP10 + HDR8x1-5.08mm + 1 + 1 + DIP + 15400000355 + 连接器 + WJ2EDG.5.08-8pin（公座）弯针90度 + Pcs + 0.352 + 8PIN端子 + + + 1 + 1 + 成品组装 + 15400000352 + 连接器 + WJ2EDG.5.08-8pin（母座） + Pcs + 1.232 + IN + JP5 + HDR4X1-5.08MM + 1 + 1 + DIP + 11110000328 + 接线端子 + 2EDGRC-4PIN,5.08MM间距,弯针闭口,90°,公座 + Pcs + 0.18 + IN母 + + + 1 + 1 + 成品组装 + 15400000508 + 接线端子 + 2EDGK-4PIN,5.08MM间距,一字螺丝,母座 + Pcs + 0.79 + 1N4007 + 2D1, 2D2, 2D3, 2D4, 2D5, 2D6 + DIODE-SOD-123 + 6 + 1 + SMT + 11700000230 + 二极管 + 整流二极管,1N4007,贴片SOD-123 + Pcs + 0.025 + SS34 + D1, D2 + LC-SMA(DO-214AC)_S1 + 2 + 1 + SMT + 11700000009 + 二极管 + SS34,3A/40V，SMA + Pcs + 0.087 + 220uF/25V + C1 + CAP-SMD-D6.3L5.3 + 1 + 1 + SMT + 1152227031K + SMD电容 + 铝质电解电容，220UF/25V，+ -20%，6.3*5.3MM + Pcs + 0.29 + 100F + C6 + CAP0603 + 1 + 1 + SMT + 11511043563 + SMD电容 + X7R，100NF/50V,+ -10%,0603 + Pcs + 0.016 + 100nF + 2C2, 2C3, 2C4, 2C5, 2C8, 2C9, 2C10, 2C11, 2C12, 2C13, C5, C8, C9, C18 + CAP0603 + 14 + 1 + SMT + 11511043563 + SMD电容 + X7R，100NF/50V,+ -10%,0603 + Pcs + 0.016 + 10uF + 2C1, C7 + CAP0603 + 2 + 1 + SMT + 11511062173 + SMD电容 + X5R,10UF/6.3V,+-20%,0603 + Pcs + 0.02346 + 15pF + 2C26, 2C27 + CAP0603 + 2 + 1 + SMT + 11511500553 + SMD电容 + NPO,15PF/50V,+ -5%,0603 + Pcs + 0.012 + 1uF + C2, C3 + CAP0603 + 2 + 1 + SMT + 11511053283 + SMD电容 + Y5V,1UF/10V,+80-20%,0603 + Pcs + 0.01 + 78L05 + U4 + sot-89 + 1 + 1 + SMT + 11300000366 + IC + CJ78L05，SOT-89 + Pcs + 0.24 + 16MHz + 2Y2 + CRYSTAL-SMD-3225 + 1 + 1 + SMT + 11800000020 + 晶振 + 16MHz，9pF，10ppm，3225金属壳SMD晶体谐振器 + Pcs + 0.52 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Bonding + SMT + DIP + 成品组装 + 成品包装 + 线外加工 + 其它-1 + 其它-2 + 其它-3 + 其它-4 + 其它-5 + + + \ No newline at end of file diff --git a/WT-DMS/bin/Debug/DirectShowLib-2005.dll b/WT-DMS/bin/Debug/DirectShowLib-2005.dll new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/bin/Debug/DirectShowLib-2005.dll differ diff --git a/WT-DMS/bin/Debug/FlexCell.dll b/WT-DMS/bin/Debug/FlexCell.dll new file mode 100644 index 0000000..0f6c38e Binary files /dev/null and b/WT-DMS/bin/Debug/FlexCell.dll differ diff --git a/WT-DMS/bin/Debug/GRID/Recent_OL.ini b/WT-DMS/bin/Debug/GRID/Recent_OL.ini new file mode 100644 index 0000000..6ed281c --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/Recent_OL.ini @@ -0,0 +1,2 @@ +1 +1 diff --git a/WT-DMS/bin/Debug/GRID/Recent_PN.ini b/WT-DMS/bin/Debug/GRID/Recent_PN.ini new file mode 100644 index 0000000..6ed281c --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/Recent_PN.ini @@ -0,0 +1,2 @@ +1 +1 diff --git a/WT-DMS/bin/Debug/GRID/Recent_PN_Desc.ini b/WT-DMS/bin/Debug/GRID/Recent_PN_Desc.ini new file mode 100644 index 0000000..b186910 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/Recent_PN_Desc.ini @@ -0,0 +1,19 @@ +СƬ˿ 2P2PIN/λ XFCN(̨˷) XF-506P +˿(С) 10A/58V/6.80M/ɫ +˿(С) 10A/58V/6.80M/ɫ +ȹ֬ CPUԿɢȸ LEDȸ ϵ0.8 1KG +·ģ飬BLV-A9-LD-CH8-V028·ѹģ +·ģ飬BLV-A9-LD-CH3-V023·ѹģ +·ģ飬BLV-A9-PB-V02A9-PBģ +PCB 壬BLV-A9-PB-V02 +Ͱ֣FR4, 1.6mmǦ +86x86MM ,˿ӡBLV-A9-PB-V02 +PCB 壬BLV-A9-PB-V02 +Ͱ֣FR4, 1.6mmǦ +86x86MM ,˿ӡBLV-A9-PB-V02 +PCB 壬BLV-A9-PB-V02 +Ͱ֣FR4, 1.6mmǦ +86x86MM ,˿ӡBLV-A9-PB-V02 +·ģ飬BLV-A9-PB-V02A9-PBģ +1 +1234 diff --git a/WT-DMS/bin/Debug/GRID/Recent_PN_Name.ini b/WT-DMS/bin/Debug/GRID/Recent_PN_Name.ini new file mode 100644 index 0000000..f34bdcb --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/Recent_PN_Name.ini @@ -0,0 +1,10 @@ +ȹ֬ +·ģ +·ģ +·ģ +PCB +PCB +PCB +·ģ +1 +1234 diff --git a/WT-DMS/bin/Debug/GRID/Recent_PN_PN.ini b/WT-DMS/bin/Debug/GRID/Recent_PN_PN.ini new file mode 100644 index 0000000..ad302c8 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/Recent_PN_PN.ini @@ -0,0 +1,10 @@ +A03-BLV-A9-LD-CH8A-V02 +A03-BLV-A9-PB-V02 +A03-BLV-A9-PB-V02 +PCB-BLV-A9-LD-CH3-V02 +PCB-BLV-A9-LD-CH3-V02 +PCB-BLV-A9-PB-V02 +A03-BLV-A9-PB-V02 +1 +1 +1234 diff --git a/WT-DMS/bin/Debug/GRID/Recent_UI.ini b/WT-DMS/bin/Debug/GRID/Recent_UI.ini new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/bin/Debug/GRID/料号查询.ini b/WT-DMS/bin/Debug/GRID/料号查询.ini new file mode 100644 index 0000000..94ff32e --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/料号查询.ini @@ -0,0 +1,8 @@ +C0=40 +C1=147 +C2=81 +C3=302 +C4=55 +C5=65 +C6=71 +C7=80 diff --git a/WT-DMS/bin/Debug/GRID/物料库存查询.ini b/WT-DMS/bin/Debug/GRID/物料库存查询.ini new file mode 100644 index 0000000..92e458d --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/物料库存查询.ini @@ -0,0 +1,9 @@ +C0=40 +C1=87 +C2=67 +C3=125 +C4=47 +C5=42 +C6=37 +C7=37 +C8=80 diff --git a/WT-DMS/bin/Debug/GRID/系统记录.ini b/WT-DMS/bin/Debug/GRID/系统记录.ini new file mode 100644 index 0000000..609486d --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/系统记录.ini @@ -0,0 +1,9 @@ +C0=40 +C1=80 +C2=80 +C3=80 +C4=67 +C5=283 +C6=80 +C7=80 +C8=80 diff --git a/WT-DMS/bin/Debug/GRID/财务_业务类型.ini b/WT-DMS/bin/Debug/GRID/财务_业务类型.ini new file mode 100644 index 0000000..48bdd52 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_业务类型.ini @@ -0,0 +1 @@ +ó diff --git a/WT-DMS/bin/Debug/GRID/财务_业务类型_销售.ini b/WT-DMS/bin/Debug/GRID/财务_业务类型_销售.ini new file mode 100644 index 0000000..48bdd52 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_业务类型_销售.ini @@ -0,0 +1 @@ +ó diff --git a/WT-DMS/bin/Debug/GRID/财务_交易方.ini b/WT-DMS/bin/Debug/GRID/财务_交易方.ini new file mode 100644 index 0000000..e8307b2 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_交易方.ini @@ -0,0 +1 @@ +CH diff --git a/WT-DMS/bin/Debug/GRID/财务_交易方_销售.ini b/WT-DMS/bin/Debug/GRID/财务_交易方_销售.ini new file mode 100644 index 0000000..4396f39 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_交易方_销售.ini @@ -0,0 +1 @@ +HHH diff --git a/WT-DMS/bin/Debug/GRID/财务_单据类型.ini b/WT-DMS/bin/Debug/GRID/财务_单据类型.ini new file mode 100644 index 0000000..294a76b --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_单据类型.ini @@ -0,0 +1 @@ +Ʊ diff --git a/WT-DMS/bin/Debug/GRID/财务_单据类型_销售.ini b/WT-DMS/bin/Debug/GRID/财务_单据类型_销售.ini new file mode 100644 index 0000000..294a76b --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_单据类型_销售.ini @@ -0,0 +1 @@ +Ʊ diff --git a/WT-DMS/bin/Debug/GRID/财务_客户.ini b/WT-DMS/bin/Debug/GRID/财务_客户.ini new file mode 100644 index 0000000..e8307b2 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_客户.ini @@ -0,0 +1 @@ +CH diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别.ini new file mode 100644 index 0000000..42fa5e3 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_收支类别.ini @@ -0,0 +1,3 @@ +Ŀ +ǹ̶֧ +̶֧ diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别_固定支出.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别_固定支出.ini new file mode 100644 index 0000000..31f4f25 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_收支类别_固定支出.ini @@ -0,0 +1,4 @@ + +н +ˮ + diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别_销售.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别_销售.ini new file mode 100644 index 0000000..2a1e9d2 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_收支类别_销售.ini @@ -0,0 +1,2 @@ + + diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别_销售_店铺销售.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别_销售_店铺销售.ini new file mode 100644 index 0000000..c9b8cf5 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_收支类别_销售_店铺销售.ini @@ -0,0 +1 @@ +Ʒ diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别_销售_网上销售.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别_销售_网上销售.ini new file mode 100644 index 0000000..5f05bee --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_收支类别_销售_网上销售.ini @@ -0,0 +1 @@ +EBAY diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别_非固定支出.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别_非固定支出.ini new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/bin/Debug/GRID/财务_收支类别_项目收入.ini b/WT-DMS/bin/Debug/GRID/财务_收支类别_项目收入.ini new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/bin/Debug/GRID/财务_机种.ini b/WT-DMS/bin/Debug/GRID/财务_机种.ini new file mode 100644 index 0000000..3fac0a1 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_机种.ini @@ -0,0 +1 @@ +N-001 diff --git a/WT-DMS/bin/Debug/GRID/财务_机种_销售.ini b/WT-DMS/bin/Debug/GRID/财务_机种_销售.ini new file mode 100644 index 0000000..5325a8d --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务_机种_销售.ini @@ -0,0 +1 @@ +001 diff --git a/WT-DMS/bin/Debug/GRID/财务管理_查询.ini b/WT-DMS/bin/Debug/GRID/财务管理_查询.ini new file mode 100644 index 0000000..e9a64f8 --- /dev/null +++ b/WT-DMS/bin/Debug/GRID/财务管理_查询.ini @@ -0,0 +1,21 @@ +C0=40 +C1=80 +C2=179 +C3=80 +C4=80 +C5=80 +C6=80 +C7=80 +C8=80 +C9=80 +C10=80 +C11=80 +C12=80 +C13=80 +C14=80 +C15=80 +C16=80 +C17=80 +C18=80 +C19=80 +C20=80 diff --git a/WT-DMS/bin/Debug/INHAOS_DMS.application b/WT-DMS/bin/Debug/INHAOS_DMS.application new file mode 100644 index 0000000..e38fafd --- /dev/null +++ b/WT-DMS/bin/Debug/INHAOS_DMS.application @@ -0,0 +1,21 @@ + + + + + + + + + + + + + + + + + vIp5LckHuYm1zqrtPyQH4PYhli9jl3cREfbkbJMklIw= + + + + \ No newline at end of file diff --git a/WT-DMS/bin/Debug/INHAOS_DMS.exe b/WT-DMS/bin/Debug/INHAOS_DMS.exe new file mode 100644 index 0000000..9ece44f Binary files /dev/null and b/WT-DMS/bin/Debug/INHAOS_DMS.exe differ diff --git a/WT-DMS/bin/Debug/INHAOS_DMS.exe.config b/WT-DMS/bin/Debug/INHAOS_DMS.exe.config new file mode 100644 index 0000000..61ba027 --- /dev/null +++ b/WT-DMS/bin/Debug/INHAOS_DMS.exe.config @@ -0,0 +1,242 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/bin/Debug/INHAOS_DMS.exe.manifest b/WT-DMS/bin/Debug/INHAOS_DMS.exe.manifest new file mode 100644 index 0000000..9a6fdb5 --- /dev/null +++ b/WT-DMS/bin/Debug/INHAOS_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + ImephmNVCd310rdyZWei7B6KUyV7RWlXSQdQ6qeY1sk= + + + + + + + + + + + + u8uxcCQtn/G1ZoCoCx+HVd8RNfnHFFNf87P1dUQvONw= + + + + + + + + + + + + rjgJb/IX0GetL+OMedFvFESHxeLiualxv+MztdOlurA= + + + + + + + + + + + + PqDJ6+dBODutxZTA/ZezocrAf8YZK8buw0nKo9Yeu38= + + + + + + + + + + + + nFJmBfe8bWHS0ADfez5ePVR222r2oQ1FTQELDlR7rZQ= + + + + + + + + + + Ucme27jvG3v+Xfq972Ol/U7MGFoK4S3JDBvffQREd1k= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/bin/Debug/INHAOS_DMS.pdb b/WT-DMS/bin/Debug/INHAOS_DMS.pdb new file mode 100644 index 0000000..f9361b7 Binary files /dev/null and b/WT-DMS/bin/Debug/INHAOS_DMS.pdb differ diff --git a/WT-DMS/bin/Debug/INHAOS_DMS.xml b/WT-DMS/bin/Debug/INHAOS_DMS.xml new file mode 100644 index 0000000..ce9cde3 --- /dev/null +++ b/WT-DMS/bin/Debug/INHAOS_DMS.xml @@ -0,0 +1,54 @@ + + + + +INHAOS_DMS + + + + + + 一个强类型的资源类，用于查找本地化的字符串等。 + + + + + 返回此类使用的缓存的 ResourceManager 实例。 + + + + + 重写当前线程的 CurrentUICulture 属性，对 + 使用此强类型资源类的所有资源查找执行重写。 + + + + + 保存BOM临时表 + + + + + + + 保存BOM临时表 + + + + + + + 加载临时Bom表 + + + + + + + 登录检测 + + + + + + diff --git a/WT-DMS/bin/Debug/MySql.Data.dll b/WT-DMS/bin/Debug/MySql.Data.dll new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/bin/Debug/MySql.Data.dll differ diff --git a/WT-DMS/bin/Debug/app.publish/INHAOS_DMS.exe b/WT-DMS/bin/Debug/app.publish/INHAOS_DMS.exe new file mode 100644 index 0000000..9ece44f Binary files /dev/null and b/WT-DMS/bin/Debug/app.publish/INHAOS_DMS.exe differ diff --git a/WT-DMS/bin/WTDMS_3.7/CamSnapShot.dll b/WT-DMS/bin/WTDMS_3.7/CamSnapShot.dll new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/CamSnapShot.dll differ diff --git a/WT-DMS/bin/WTDMS_3.7/CamSnapShot.pdb b/WT-DMS/bin/WTDMS_3.7/CamSnapShot.pdb new file mode 100644 index 0000000..fc97656 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/CamSnapShot.pdb differ diff --git a/WT-DMS/bin/WTDMS_3.7/DirectShowLib-2005.dll b/WT-DMS/bin/WTDMS_3.7/DirectShowLib-2005.dll new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/DirectShowLib-2005.dll differ diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/Recent_OL.ini b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_OL.ini new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN.ini b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN.ini new file mode 100644 index 0000000..57143ec --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN.ini @@ -0,0 +1 @@ +U01-LGT08F08A-DICE diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_Desc.ini b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_Desc.ini new file mode 100644 index 0000000..0bb4bbc --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_Desc.ini @@ -0,0 +1,10 @@ +IR-9608 ɫ 3pin2.4*2.8cm +IR-5000 ϴ 3pin1*1.9cm +LED-1005 1*1.9cm 2pin +2A 250V AC ܱչ +ɫ NTC-103J-45 5cm 3mm +UC-3000߲ 60cm ɫ 24AWG 3PIN ĸͷ2*3ͷ +UC-3000߲ 60cm ɫ 24AWG 3PIN ĸͷ2*3ͷ +4WD ˫ǿװ 4׳ һ +UNO R3ֵ׼ +ɵ· LGT08F08A DICE diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_Name.ini b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_Name.ini new file mode 100644 index 0000000..f8fabf3 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_Name.ini @@ -0,0 +1,10 @@ +·ģ +·ģ +·ģ +չ + +߲ +߲ + +׼ +ɵ· diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_PN.ini b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_PN.ini new file mode 100644 index 0000000..c5b5cfa --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_PN_PN.ini @@ -0,0 +1,10 @@ +A03-IR-9608 +A03-IR-5000 +A03-LED-1005 +A09-FUSE-2A +A09-NTC-103J-45 +W03-CABLE-UC3000 +W03-CABLE-UC3000 +A09-4WD-CAR +A00-UNO-KIT +U01-LGT08F08A-DICE diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/Recent_UI.ini b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_UI.ini new file mode 100644 index 0000000..dc21352 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/Recent_UI.ini @@ -0,0 +1 @@ +LC-5000Բ diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/料号查询.ini b/WT-DMS/bin/WTDMS_3.7/GRID/料号查询.ini new file mode 100644 index 0000000..47c16fe --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/料号查询.ini @@ -0,0 +1,8 @@ +C0=40 +C1=233 +C2=96 +C3=313 +C4=80 +C5=80 +C6=395 +C7=80 diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/物料库存查询.ini b/WT-DMS/bin/WTDMS_3.7/GRID/物料库存查询.ini new file mode 100644 index 0000000..f6c3b12 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/物料库存查询.ini @@ -0,0 +1,5 @@ +C0=40 +C1=189 +C2=80 +C3=80 +C4=80 diff --git a/WT-DMS/bin/WTDMS_3.7/GRID/系统记录.ini b/WT-DMS/bin/WTDMS_3.7/GRID/系统记录.ini new file mode 100644 index 0000000..3438494 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/GRID/系统记录.ini @@ -0,0 +1,9 @@ +C0=40 +C1=80 +C2=80 +C3=80 +C4=80 +C5=495 +C6=80 +C7=99 +C8=80 diff --git a/WT-DMS/bin/WTDMS_3.7/MySql.Data.dll b/WT-DMS/bin/WTDMS_3.7/MySql.Data.dll new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/MySql.Data.dll differ diff --git a/WT-DMS/bin/WTDMS_3.7/W&T-DMS.vshost.exe.config b/WT-DMS/bin/WTDMS_3.7/W&T-DMS.vshost.exe.config new file mode 100644 index 0000000..718a12e --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/W&T-DMS.vshost.exe.config @@ -0,0 +1,100 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + + diff --git a/WT-DMS/bin/WTDMS_3.7/W&T-DMS.vshost.exe.manifest b/WT-DMS/bin/WTDMS_3.7/W&T-DMS.vshost.exe.manifest new file mode 100644 index 0000000..2acc8a7 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/W&T-DMS.vshost.exe.manifest @@ -0,0 +1,47 @@ + + + + + + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.application b/WT-DMS/bin/WTDMS_3.7/WT_DMS.application new file mode 100644 index 0000000..0b0c643 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + ltrJ+zqbGPziG6eXfK1YaC476xE= + + + + \ No newline at end of file diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe b/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe new file mode 100644 index 0000000..1036806 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe differ diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe.config b/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe.config new file mode 100644 index 0000000..718a12e --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe.config @@ -0,0 +1,100 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + + diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe.manifest b/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe.manifest new file mode 100644 index 0000000..6028084 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + z2vKREUufgYW4xAUzIs7r1lZ7g8= + + + + + + + + + + aCDdLz+4wyE/AMKQBlSUYNzXYNk= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.pdb b/WT-DMS/bin/WTDMS_3.7/WT_DMS.pdb new file mode 100644 index 0000000..bb37df1 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/WT_DMS.pdb differ diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.vshost.exe b/WT-DMS/bin/WTDMS_3.7/WT_DMS.vshost.exe new file mode 100644 index 0000000..6b241bc Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/WT_DMS.vshost.exe differ diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.vshost.exe.config b/WT-DMS/bin/WTDMS_3.7/WT_DMS.vshost.exe.config new file mode 100644 index 0000000..718a12e --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/WT_DMS.vshost.exe.config @@ -0,0 +1,100 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + + diff --git a/WT-DMS/bin/WTDMS_3.7/WT_DMS.xml b/WT-DMS/bin/WTDMS_3.7/WT_DMS.xml new file mode 100644 index 0000000..6e8760e --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/WT_DMS.xml @@ -0,0 +1,30 @@ + + + + +WT_DMS + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + 登录检测 + + + + + + \ No newline at end of file diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/CamSnapShot.dll.deploy b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/DirectShowLib-2005.dll.deploy b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/FlexCell.dll.deploy b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/FlexCell.dll.deploy differ diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/MySql.Data.dll.deploy b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/MySql.Data.dll.deploy differ diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.config.deploy b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..718a12e --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.config.deploy @@ -0,0 +1,100 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + + diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.deploy b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.deploy new file mode 100644 index 0000000..1036806 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.deploy differ diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.manifest b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.manifest new file mode 100644 index 0000000..6028084 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/app.publish/Application Files/WT_DMS_1_5_0_5/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + z2vKREUufgYW4xAUzIs7r1lZ7g8= + + + + + + + + + + aCDdLz+4wyE/AMKQBlSUYNzXYNk= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/WT_DMS.application b/WT-DMS/bin/WTDMS_3.7/app.publish/WT_DMS.application new file mode 100644 index 0000000..7e585b8 --- /dev/null +++ b/WT-DMS/bin/WTDMS_3.7/app.publish/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + ltrJ+zqbGPziG6eXfK1YaC476xE= + + + + \ No newline at end of file diff --git a/WT-DMS/bin/WTDMS_3.7/app.publish/setup.exe b/WT-DMS/bin/WTDMS_3.7/app.publish/setup.exe new file mode 100644 index 0000000..705bd59 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.7/app.publish/setup.exe differ diff --git a/WT-DMS/bin/WTDMS_3.8.zip b/WT-DMS/bin/WTDMS_3.8.zip new file mode 100644 index 0000000..d7348b7 Binary files /dev/null and b/WT-DMS/bin/WTDMS_3.8.zip differ diff --git a/WT-DMS/dlgImage.Designer.vb b/WT-DMS/dlgImage.Designer.vb new file mode 100644 index 0000000..3f7c92a --- /dev/null +++ b/WT-DMS/dlgImage.Designer.vb @@ -0,0 +1,44 @@ + _ +Partial Class dlgImage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.SuspendLayout() + ' + 'dlgImage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.ClientSize = New System.Drawing.Size(490, 340) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.SizableToolWindow + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "dlgImage" + Me.ShowInTaskbar = False + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent + Me.Text = "dlgImage" + Me.ResumeLayout(False) + + End Sub + +End Class diff --git a/WT-DMS/dlgImage.resx b/WT-DMS/dlgImage.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/dlgImage.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/dlgImage.vb b/WT-DMS/dlgImage.vb new file mode 100644 index 0000000..296d0ff --- /dev/null +++ b/WT-DMS/dlgImage.vb @@ -0,0 +1,43 @@ +Imports System.Windows.Forms + +Public Class dlgImage + + Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + Me.DialogResult = System.Windows.Forms.DialogResult.OK + Me.Close() + End Sub + + Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) + Me.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Close() + End Sub + + + Private Sub dlgImage_MouseClick(sender As Object, e As MouseEventArgs) Handles MyBase.MouseClick + Me.Close() + End Sub + + Private Sub dlgImage_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles MyBase.MouseDoubleClick + Me.Close() + End Sub + + Private Sub dlgImage_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown + If e.KeyCode = Keys.Enter OrElse e.KeyCode = Keys.Escape Then + Me.Close() + End If + End Sub + + Private Sub dlgImage_Load(sender As Object, e As EventArgs) Handles MyBase.Load + Me.Width = My.Settings.DLG_IMAGE_WIDTH + Me.Height = My.Settings.DLG_IMAGE_HEIGHT + Me.Left = My.Settings.DLG_IMAGE_LEFT + Me.Top = My.Settings.DLG_IMAGE_TOP + End Sub + Private Sub dlgImage_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + My.Settings.DLG_IMAGE_WIDTH = Me.Width + My.Settings.DLG_IMAGE_HEIGHT = Me.Height + My.Settings.DLG_IMAGE_LEFT = Me.Left + My.Settings.DLG_IMAGE_TOP = Me.Top + My.Settings.Save() + End Sub +End Class diff --git a/WT-DMS/dlg_AddSupplier.Designer.vb b/WT-DMS/dlg_AddSupplier.Designer.vb new file mode 100644 index 0000000..e223592 --- /dev/null +++ b/WT-DMS/dlg_AddSupplier.Designer.vb @@ -0,0 +1,122 @@ + _ +Partial Class dlg_AddSupplier + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(dlg_AddSupplier)) + Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel() + Me.OK_Button = New System.Windows.Forms.Button() + Me.Cancel_Button = New System.Windows.Forms.Button() + Me.Grid1 = New FlexCell.Grid() + Me.Label1 = New System.Windows.Forms.Label() + Me.TableLayoutPanel1.SuspendLayout() + Me.SuspendLayout() + ' + 'TableLayoutPanel1 + ' + Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.TableLayoutPanel1.ColumnCount = 2 + Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0) + Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0) + Me.TableLayoutPanel1.Location = New System.Drawing.Point(466, 374) + Me.TableLayoutPanel1.Name = "TableLayoutPanel1" + Me.TableLayoutPanel1.RowCount = 1 + Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.Size = New System.Drawing.Size(146, 27) + Me.TableLayoutPanel1.TabIndex = 0 + ' + 'OK_Button + ' + Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None + Me.OK_Button.Location = New System.Drawing.Point(3, 3) + Me.OK_Button.Name = "OK_Button" + Me.OK_Button.Size = New System.Drawing.Size(67, 21) + Me.OK_Button.TabIndex = 0 + Me.OK_Button.Text = "保存" + ' + 'Cancel_Button + ' + Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None + Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Cancel_Button.Location = New System.Drawing.Point(76, 3) + Me.Cancel_Button.Name = "Cancel_Button" + Me.Cancel_Button.Size = New System.Drawing.Size(67, 21) + Me.Cancel_Button.TabIndex = 1 + Me.Cancel_Button.Text = "取消" + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(12, 27) + Me.Grid1.MultiSelect = False + Me.Grid1.Name = "Grid1" + Me.Grid1.SelectionMode = FlexCell.SelectionModeEnum.ByRow + Me.Grid1.Size = New System.Drawing.Size(600, 341) + Me.Grid1.TabIndex = 2 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(13, 9) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(107, 12) + Me.Label1.TabIndex = 3 + Me.Label1.Text = "请输入供应商信息:" + ' + 'dlg_AddSupplier + ' + Me.AcceptButton = Me.OK_Button + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.CancelButton = Me.Cancel_Button + Me.ClientSize = New System.Drawing.Size(624, 412) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.Grid1) + Me.Controls.Add(Me.TableLayoutPanel1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "dlg_AddSupplier" + Me.ShowInTaskbar = False + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent + Me.Text = "添加供应商" + Me.TableLayoutPanel1.ResumeLayout(False) + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel + Friend WithEvents OK_Button As System.Windows.Forms.Button + Friend WithEvents Cancel_Button As System.Windows.Forms.Button + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents Label1 As System.Windows.Forms.Label + +End Class diff --git a/WT-DMS/dlg_AddSupplier.resx b/WT-DMS/dlg_AddSupplier.resx new file mode 100644 index 0000000..0f89e9c --- /dev/null +++ b/WT-DMS/dlg_AddSupplier.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/dlg_AddSupplier.vb b/WT-DMS/dlg_AddSupplier.vb new file mode 100644 index 0000000..6e03e08 --- /dev/null +++ b/WT-DMS/dlg_AddSupplier.vb @@ -0,0 +1,80 @@ +Imports System.Windows.Forms + +Public Class dlg_AddSupplier + Dim m_Supplier As New CSupplier + + Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click + If Save() = True Then + Me.DialogResult = System.Windows.Forms.DialogResult.OK + Me.Close() + End If + End Sub + + Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click + Me.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Close() + End Sub + + '获取所有表对应的字段名称列表 + Private Function GetSectionNameList() As Boolean + Dim rTable As New Data.DataTable + Dim result As Boolean = True + + rTable.Columns.Clear() + rTable.Rows.Clear() + rTable.Clear() + + Grid1.Cols = 2 + Grid1.Rows = 1 + Grid1.Column(0).Width = 200 + Grid1.Column(1).Width = 200 + Grid1.Column(0).Alignment = FlexCell.AlignmentEnum.LeftCenter + Grid1.Column(1).Alignment = FlexCell.AlignmentEnum.LeftCenter + + Grid1.Cell(0, 0).Text = "字段名称" + Grid1.Cell(0, 1).Text = "值" + If SQL_Query(COL_RIGHTS.供应商管理, "SELECT * FROM `" & CSupplier.cst_TABLE_NAME & "` WHERE 0", rTable) = True Then + Dim rowindex As Integer = 1 + For i As Integer = 0 To rTable.Columns.Count - 1 + Grid1.Rows += 1 + Grid1.Cell(rowindex, 0).Text = rTable.Columns.Item(i).ColumnName + rowindex += 1 + Next + + If Grid1.Rows > 1 Then + Grid1.Cell(1, 1).Locked = True + End If + Else + result = False + End If + + Return result + End Function + + Private Sub dlg_AddSupplier_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + GetSectionNameList() + End Sub + + Private Function Save() As Boolean + Dim RowCount As Integer = Grid1.Rows - 2 + Dim SectionName(RowCount) As String + Dim Values(RowCount) As String + + Dim tableindex As Integer = 1 + For row As Integer = 0 To RowCount + SectionName(row) = Grid1.Cell(tableindex, 0).Text + Values(row) = Grid1.Cell(tableindex, 1).Text + tableindex += 1 + Next + + Dim result As ERROR_CODE = m_Supplier.AddItem(SectionName, Values) + If result = ERROR_CODE.SUCCESS Then + Return True + Else + MsgBox(GetErrorCodeString(result)) + End If + + Return False + End Function + +End Class diff --git a/WT-DMS/dlg_Input.Designer.vb b/WT-DMS/dlg_Input.Designer.vb new file mode 100644 index 0000000..0106d6e --- /dev/null +++ b/WT-DMS/dlg_Input.Designer.vb @@ -0,0 +1,101 @@ + _ +Partial Class dlg_Input + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel() + Me.OK_Button = New System.Windows.Forms.Button() + Me.Cancel_Button = New System.Windows.Forms.Button() + Me.tb_Input = New System.Windows.Forms.TextBox() + Me.TableLayoutPanel1.SuspendLayout() + Me.SuspendLayout() + ' + 'TableLayoutPanel1 + ' + Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.TableLayoutPanel1.ColumnCount = 2 + Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0) + Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0) + Me.TableLayoutPanel1.Font = New System.Drawing.Font("宋体", 12.0!) + Me.TableLayoutPanel1.Location = New System.Drawing.Point(203, 91) + Me.TableLayoutPanel1.Name = "TableLayoutPanel1" + Me.TableLayoutPanel1.RowCount = 1 + Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.Size = New System.Drawing.Size(210, 40) + Me.TableLayoutPanel1.TabIndex = 0 + ' + 'OK_Button + ' + Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None + Me.OK_Button.Location = New System.Drawing.Point(3, 5) + Me.OK_Button.Name = "OK_Button" + Me.OK_Button.Size = New System.Drawing.Size(99, 29) + Me.OK_Button.TabIndex = 0 + Me.OK_Button.Text = "确定" + ' + 'Cancel_Button + ' + Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None + Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Cancel_Button.Location = New System.Drawing.Point(108, 5) + Me.Cancel_Button.Name = "Cancel_Button" + Me.Cancel_Button.Size = New System.Drawing.Size(99, 29) + Me.Cancel_Button.TabIndex = 1 + Me.Cancel_Button.Text = "取消" + ' + 'tb_Input + ' + Me.tb_Input.Font = New System.Drawing.Font("宋体", 20.0!) + Me.tb_Input.Location = New System.Drawing.Point(12, 32) + Me.tb_Input.Name = "tb_Input" + Me.tb_Input.Size = New System.Drawing.Size(401, 38) + Me.tb_Input.TabIndex = 0 + ' + 'dlg_Input + ' + Me.AcceptButton = Me.OK_Button + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.CancelButton = Me.Cancel_Button + Me.ClientSize = New System.Drawing.Size(425, 142) + Me.Controls.Add(Me.tb_Input) + Me.Controls.Add(Me.TableLayoutPanel1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "dlg_Input" + Me.ShowInTaskbar = False + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent + Me.Text = "dlg_Input" + Me.TableLayoutPanel1.ResumeLayout(False) + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel + Friend WithEvents OK_Button As System.Windows.Forms.Button + Friend WithEvents Cancel_Button As System.Windows.Forms.Button + Friend WithEvents tb_Input As System.Windows.Forms.TextBox + +End Class diff --git a/WT-DMS/dlg_Input.resx b/WT-DMS/dlg_Input.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/dlg_Input.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/dlg_Input.vb b/WT-DMS/dlg_Input.vb new file mode 100644 index 0000000..04f12ea --- /dev/null +++ b/WT-DMS/dlg_Input.vb @@ -0,0 +1,15 @@ +Imports System.Windows.Forms + +Public Class dlg_Input + + Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click + Me.DialogResult = System.Windows.Forms.DialogResult.OK + Me.Close() + End Sub + + Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click + Me.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Close() + End Sub + +End Class diff --git a/WT-DMS/dlg_StoreSelect.Designer.vb b/WT-DMS/dlg_StoreSelect.Designer.vb new file mode 100644 index 0000000..d1a7ffc --- /dev/null +++ b/WT-DMS/dlg_StoreSelect.Designer.vb @@ -0,0 +1,138 @@ + _ +Partial Class dlg_StoreSelect + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel() + Me.OK_Button = New System.Windows.Forms.Button() + Me.Cancel_Button = New System.Windows.Forms.Button() + Me.Label1 = New System.Windows.Forms.Label() + Me.combo_Store = New System.Windows.Forms.ComboBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.lblAddress = New System.Windows.Forms.Label() + Me.TableLayoutPanel1.SuspendLayout() + Me.SuspendLayout() + ' + 'TableLayoutPanel1 + ' + Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.TableLayoutPanel1.ColumnCount = 2 + Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0) + Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0) + Me.TableLayoutPanel1.Location = New System.Drawing.Point(202, 186) + Me.TableLayoutPanel1.Name = "TableLayoutPanel1" + Me.TableLayoutPanel1.RowCount = 1 + Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!)) + Me.TableLayoutPanel1.Size = New System.Drawing.Size(146, 27) + Me.TableLayoutPanel1.TabIndex = 0 + ' + 'OK_Button + ' + Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None + Me.OK_Button.Location = New System.Drawing.Point(3, 3) + Me.OK_Button.Name = "OK_Button" + Me.OK_Button.Size = New System.Drawing.Size(67, 21) + Me.OK_Button.TabIndex = 0 + Me.OK_Button.Text = "确定" + ' + 'Cancel_Button + ' + Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None + Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Cancel_Button.Location = New System.Drawing.Point(76, 3) + Me.Cancel_Button.Name = "Cancel_Button" + Me.Cancel_Button.Size = New System.Drawing.Size(67, 21) + Me.Cancel_Button.TabIndex = 1 + Me.Cancel_Button.Text = "取消" + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Font = New System.Drawing.Font("隶书", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Label1.Location = New System.Drawing.Point(22, 24) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(109, 19) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "请选择仓库" + ' + 'combo_Store + ' + Me.combo_Store.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_Store.Font = New System.Drawing.Font("隶书", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.combo_Store.FormattingEnabled = True + Me.combo_Store.Location = New System.Drawing.Point(64, 49) + Me.combo_Store.Name = "combo_Store" + Me.combo_Store.Size = New System.Drawing.Size(246, 27) + Me.combo_Store.TabIndex = 2 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(26, 91) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(65, 12) + Me.Label2.TabIndex = 3 + Me.Label2.Text = "仓库地点：" + ' + 'lblAddress + ' + Me.lblAddress.ForeColor = System.Drawing.Color.Navy + Me.lblAddress.Location = New System.Drawing.Point(98, 91) + Me.lblAddress.Name = "lblAddress" + Me.lblAddress.Size = New System.Drawing.Size(212, 76) + Me.lblAddress.TabIndex = 4 + ' + 'dlg_StoreSelect + ' + Me.AcceptButton = Me.OK_Button + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.CancelButton = Me.Cancel_Button + Me.ClientSize = New System.Drawing.Size(360, 224) + Me.Controls.Add(Me.lblAddress) + Me.Controls.Add(Me.Label2) + Me.Controls.Add(Me.combo_Store) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.TableLayoutPanel1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.MinimizeBox = False + Me.Name = "dlg_StoreSelect" + Me.ShowInTaskbar = False + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent + Me.Text = "仓库选择" + Me.TableLayoutPanel1.ResumeLayout(False) + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel + Friend WithEvents OK_Button As System.Windows.Forms.Button + Friend WithEvents Cancel_Button As System.Windows.Forms.Button + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents combo_Store As System.Windows.Forms.ComboBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents lblAddress As System.Windows.Forms.Label + +End Class diff --git a/WT-DMS/dlg_StoreSelect.resx b/WT-DMS/dlg_StoreSelect.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/dlg_StoreSelect.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/dlg_StoreSelect.vb b/WT-DMS/dlg_StoreSelect.vb new file mode 100644 index 0000000..06554c6 --- /dev/null +++ b/WT-DMS/dlg_StoreSelect.vb @@ -0,0 +1,55 @@ +Imports System.Windows.Forms + +Public Class dlg_StoreSelect + Dim rTable As New DataTable + Dim m_SQL As New CStore + Dim m_AddressList As New ArrayList + Dim 库位表 As New ArrayList + Public m_SelPosName As String = "" + + Private Function GetStoreList() As Boolean + combo_Store.Items.Clear() + m_AddressList.Clear() + 库位表.Clear() + + If m_SQL.QueryAll(rTable) = ERROR_CODE.SUCCESS Then + For i As Integer = 0 To rTable.Rows.Count - 1 + combo_Store.Items.Add(rTable.Rows(i).Item(CStore.COLS.仓库名称)) + m_AddressList.Add(rTable.Rows(i).Item(CStore.COLS.仓库地点)) + 库位表.Add(rTable.Rows(i).Item(CStore.COLS.仓库库位表)) + Next + Return True + End If + + Return False + End Function + + Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click + If combo_Store.Text.Length = 0 Then + MsgBox("请选择仓库!") + Return + End If + + m_SelPosName = 库位表.Item(combo_Store.SelectedIndex) + + Me.DialogResult = System.Windows.Forms.DialogResult.OK + Me.Close() + End Sub + + Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click + Me.DialogResult = System.Windows.Forms.DialogResult.Cancel + Me.Close() + End Sub + + Private Sub dlg_StoreSelect_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + GetStoreList() + End Sub + + Private Sub combo_Store_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles combo_Store.SelectedIndexChanged + If combo_Store.SelectedIndex >= 0 Then + lblAddress.Text = m_AddressList.Item(combo_Store.SelectedIndex) + Else + lblAddress.Text = "" + End If + End Sub +End Class diff --git a/WT-DMS/form_BomManage.Designer.vb b/WT-DMS/form_BomManage.Designer.vb new file mode 100644 index 0000000..b5e17c9 --- /dev/null +++ b/WT-DMS/form_BomManage.Designer.vb @@ -0,0 +1,803 @@ + _ +Partial Class form_BomManage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(form_BomManage)) + Me.TabControl1 = New System.Windows.Forms.TabControl() + Me.TabPage1 = New System.Windows.Forms.TabPage() + Me.bt_Export = New System.Windows.Forms.Button() + Me.chk_ShowPnImage = New System.Windows.Forms.CheckBox() + Me.chk_ShowPnInfo = New System.Windows.Forms.CheckBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.lblBomPath = New System.Windows.Forms.Label() + Me.btOpenBack = New System.Windows.Forms.Button() + Me.btOpenNext = New System.Windows.Forms.Button() + Me.btUpdate = New System.Windows.Forms.Button() + Me.btDeleteRow = New System.Windows.Forms.Button() + Me.btInsertRow = New System.Windows.Forms.Button() + Me.Grid1 = New FlexCell.Grid() + Me.btDelete = New System.Windows.Forms.Button() + Me.btSave = New System.Windows.Forms.Button() + Me.TabPage2 = New System.Windows.Forms.TabPage() + Me.TabPage3 = New System.Windows.Forms.TabPage() + Me.SplSearch = New System.Windows.Forms.SplitContainer() + Me.GrdSourceBom = New FlexCell.Grid() + Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.查询ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator() + Me.更新当前物料ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.更新物料信息ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.合并相同料号ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.保存至数据库ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.保存至数据库BOM表ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator() + Me.导出ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator() + Me.插入行ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.删除行ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.清空表格ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TabControl2 = New System.Windows.Forms.TabControl() + Me.TabPage4 = New System.Windows.Forms.TabPage() + Me.ChkUpdatePart = New System.Windows.Forms.CheckBox() + Me.ChkHasPartType = New System.Windows.Forms.CheckBox() + Me.ckb_Pn_Inhaos = New System.Windows.Forms.CheckBox() + Me.ckb_PnJohao = New System.Windows.Forms.CheckBox() + Me.bt_QueryQuick = New System.Windows.Forms.Button() + Me.tb_Desc = New System.Windows.Forms.TextBox() + Me.Label6 = New System.Windows.Forms.Label() + Me.tb_Name = New System.Windows.Forms.TextBox() + Me.Label5 = New System.Windows.Forms.Label() + Me.tb_PartNumber = New System.Windows.Forms.TextBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.TabPage5 = New System.Windows.Forms.TabPage() + Me.bt_Query = New System.Windows.Forms.Button() + Me.tb_Value = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.combo_Section = New System.Windows.Forms.ComboBox() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label8 = New System.Windows.Forms.Label() + Me.combo_Operate = New System.Windows.Forms.ComboBox() + Me.GrdQueueResult = New FlexCell.Grid() + Me.tbBomPN = New System.Windows.Forms.TextBox() + Me.btQueryBom = New System.Windows.Forms.Button() + Me.Label1 = New System.Windows.Forms.Label() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.lbl_CurrentPN = New System.Windows.Forms.Label() + Me.TabControl1.SuspendLayout() + Me.TabPage1.SuspendLayout() + Me.TabPage3.SuspendLayout() + CType(Me.SplSearch, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplSearch.Panel1.SuspendLayout() + Me.SplSearch.Panel2.SuspendLayout() + Me.SplSearch.SuspendLayout() + Me.ContextMenuStrip1.SuspendLayout() + Me.TabControl2.SuspendLayout() + Me.TabPage4.SuspendLayout() + Me.TabPage5.SuspendLayout() + Me.GroupBox1.SuspendLayout() + Me.SuspendLayout() + ' + 'TabControl1 + ' + Me.TabControl1.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.TabControl1.Controls.Add(Me.TabPage1) + Me.TabControl1.Controls.Add(Me.TabPage2) + Me.TabControl1.Controls.Add(Me.TabPage3) + Me.TabControl1.Location = New System.Drawing.Point(6, 30) + Me.TabControl1.Name = "TabControl1" + Me.TabControl1.SelectedIndex = 0 + Me.TabControl1.Size = New System.Drawing.Size(753, 502) + Me.TabControl1.TabIndex = 0 + ' + 'TabPage1 + ' + Me.TabPage1.Controls.Add(Me.bt_Export) + Me.TabPage1.Controls.Add(Me.chk_ShowPnImage) + Me.TabPage1.Controls.Add(Me.chk_ShowPnInfo) + Me.TabPage1.Controls.Add(Me.Label2) + Me.TabPage1.Controls.Add(Me.lblBomPath) + Me.TabPage1.Controls.Add(Me.btOpenBack) + Me.TabPage1.Controls.Add(Me.btOpenNext) + Me.TabPage1.Controls.Add(Me.btUpdate) + Me.TabPage1.Controls.Add(Me.btDeleteRow) + Me.TabPage1.Controls.Add(Me.btInsertRow) + Me.TabPage1.Controls.Add(Me.Grid1) + Me.TabPage1.Controls.Add(Me.btDelete) + Me.TabPage1.Controls.Add(Me.btSave) + Me.TabPage1.Location = New System.Drawing.Point(4, 22) + Me.TabPage1.Name = "TabPage1" + Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage1.Size = New System.Drawing.Size(745, 476) + Me.TabPage1.TabIndex = 0 + Me.TabPage1.Text = "料表明细" + Me.TabPage1.UseVisualStyleBackColor = True + ' + 'bt_Export + ' + Me.bt_Export.Location = New System.Drawing.Point(9, 448) + Me.bt_Export.Name = "bt_Export" + Me.bt_Export.Size = New System.Drawing.Size(90, 23) + Me.bt_Export.TabIndex = 14 + Me.bt_Export.Text = "另存为Excel表格" + Me.bt_Export.UseVisualStyleBackColor = True + ' + 'chk_ShowPnImage + ' + Me.chk_ShowPnImage.AutoSize = True + Me.chk_ShowPnImage.Checked = Global.WT_DMS.My.MySettings.Default.CHK_SHOWPNIMAGE + Me.chk_ShowPnImage.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_SHOWPNIMAGE", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chk_ShowPnImage.Location = New System.Drawing.Point(9, 266) + Me.chk_ShowPnImage.Name = "chk_ShowPnImage" + Me.chk_ShowPnImage.Size = New System.Drawing.Size(96, 16) + Me.chk_ShowPnImage.TabIndex = 13 + Me.chk_ShowPnImage.Text = "显示图片信息" + Me.chk_ShowPnImage.UseVisualStyleBackColor = True + ' + 'chk_ShowPnInfo + ' + Me.chk_ShowPnInfo.AutoSize = True + Me.chk_ShowPnInfo.Checked = Global.WT_DMS.My.MySettings.Default.CHK_SHOWPNINFO + Me.chk_ShowPnInfo.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_SHOWPNINFO", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chk_ShowPnInfo.Location = New System.Drawing.Point(9, 244) + Me.chk_ShowPnInfo.Name = "chk_ShowPnInfo" + Me.chk_ShowPnInfo.Size = New System.Drawing.Size(96, 16) + Me.chk_ShowPnInfo.TabIndex = 13 + Me.chk_ShowPnInfo.Text = "显示料号信息" + Me.chk_ShowPnInfo.UseVisualStyleBackColor = True + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Font = New System.Drawing.Font("宋体", 12.0!) + Me.Label2.ForeColor = System.Drawing.Color.DarkCyan + Me.Label2.Location = New System.Drawing.Point(6, 12) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(112, 16) + Me.Label2.TabIndex = 12 + Me.Label2.Text = "料表层级路径:" + ' + 'lblBomPath + ' + Me.lblBomPath.AutoSize = True + Me.lblBomPath.Font = New System.Drawing.Font("宋体", 12.0!) + Me.lblBomPath.ForeColor = System.Drawing.Color.DarkCyan + Me.lblBomPath.Location = New System.Drawing.Point(115, 12) + Me.lblBomPath.Name = "lblBomPath" + Me.lblBomPath.Size = New System.Drawing.Size(96, 16) + Me.lblBomPath.TabIndex = 11 + Me.lblBomPath.Text = "B-002\B-001" + ' + 'btOpenBack + ' + Me.btOpenBack.Location = New System.Drawing.Point(9, 167) + Me.btOpenBack.Name = "btOpenBack" + Me.btOpenBack.Size = New System.Drawing.Size(91, 23) + Me.btOpenBack.TabIndex = 10 + Me.btOpenBack.Text = "返回上一级" + Me.btOpenBack.UseVisualStyleBackColor = True + ' + 'btOpenNext + ' + Me.btOpenNext.Location = New System.Drawing.Point(9, 196) + Me.btOpenNext.Name = "btOpenNext" + Me.btOpenNext.Size = New System.Drawing.Size(91, 23) + Me.btOpenNext.TabIndex = 9 + Me.btOpenNext.Text = "进入下一级" + Me.btOpenNext.UseVisualStyleBackColor = True + ' + 'btUpdate + ' + Me.btUpdate.Location = New System.Drawing.Point(8, 114) + Me.btUpdate.Name = "btUpdate" + Me.btUpdate.Size = New System.Drawing.Size(91, 23) + Me.btUpdate.TabIndex = 8 + Me.btUpdate.Text = "更新信息" + Me.btUpdate.UseVisualStyleBackColor = True + ' + 'btDeleteRow + ' + Me.btDeleteRow.Location = New System.Drawing.Point(8, 69) + Me.btDeleteRow.Name = "btDeleteRow" + Me.btDeleteRow.Size = New System.Drawing.Size(92, 23) + Me.btDeleteRow.TabIndex = 7 + Me.btDeleteRow.Text = "删除行" + Me.btDeleteRow.UseVisualStyleBackColor = True + ' + 'btInsertRow + ' + Me.btInsertRow.Location = New System.Drawing.Point(8, 40) + Me.btInsertRow.Name = "btInsertRow" + Me.btInsertRow.Size = New System.Drawing.Size(92, 23) + Me.btInsertRow.TabIndex = 7 + Me.btInsertRow.Text = "插入行" + Me.btInsertRow.UseVisualStyleBackColor = True + ' + 'Grid1 + ' + Me.Grid1.AllowUserSort = True + Me.Grid1.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.Grid1.BorderStyle = FlexCell.BorderStyleEnum.None + Me.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 7 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(105, 40) + Me.Grid1.Name = "Grid1" + Me.Grid1.Rows = 500 + Me.Grid1.Size = New System.Drawing.Size(634, 430) + Me.Grid1.TabIndex = 6 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'btDelete + ' + Me.btDelete.Location = New System.Drawing.Point(7, 385) + Me.btDelete.Name = "btDelete" + Me.btDelete.Size = New System.Drawing.Size(93, 23) + Me.btDelete.TabIndex = 3 + Me.btDelete.Text = "删除" + Me.btDelete.UseVisualStyleBackColor = True + ' + 'btSave + ' + Me.btSave.Location = New System.Drawing.Point(7, 340) + Me.btSave.Name = "btSave" + Me.btSave.Size = New System.Drawing.Size(93, 23) + Me.btSave.TabIndex = 3 + Me.btSave.Text = "保存" + Me.btSave.UseVisualStyleBackColor = True + ' + 'TabPage2 + ' + Me.TabPage2.Location = New System.Drawing.Point(4, 22) + Me.TabPage2.Name = "TabPage2" + Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage2.Size = New System.Drawing.Size(745, 476) + Me.TabPage2.TabIndex = 1 + Me.TabPage2.Text = "料表平铺" + Me.TabPage2.UseVisualStyleBackColor = True + ' + 'TabPage3 + ' + Me.TabPage3.Controls.Add(Me.SplSearch) + Me.TabPage3.Location = New System.Drawing.Point(4, 22) + Me.TabPage3.Name = "TabPage3" + Me.TabPage3.Size = New System.Drawing.Size(745, 476) + Me.TabPage3.TabIndex = 2 + Me.TabPage3.Text = "AD BOM 向导" + Me.TabPage3.UseVisualStyleBackColor = True + ' + 'SplSearch + ' + Me.SplSearch.Dock = System.Windows.Forms.DockStyle.Fill + Me.SplSearch.Location = New System.Drawing.Point(0, 0) + Me.SplSearch.Name = "SplSearch" + Me.SplSearch.Orientation = System.Windows.Forms.Orientation.Horizontal + ' + 'SplSearch.Panel1 + ' + Me.SplSearch.Panel1.Controls.Add(Me.GrdSourceBom) + ' + 'SplSearch.Panel2 + ' + Me.SplSearch.Panel2.Controls.Add(Me.TabControl2) + Me.SplSearch.Panel2.Controls.Add(Me.GrdQueueResult) + Me.SplSearch.Size = New System.Drawing.Size(745, 476) + Me.SplSearch.SplitterDistance = 269 + Me.SplSearch.SplitterWidth = 6 + Me.SplSearch.TabIndex = 0 + ' + 'GrdSourceBom + ' + Me.GrdSourceBom.BorderStyle = FlexCell.BorderStyleEnum.None + Me.GrdSourceBom.CheckedImage = Nothing + Me.GrdSourceBom.Cols = 20 + Me.GrdSourceBom.ContextMenuStrip = Me.ContextMenuStrip1 + Me.GrdSourceBom.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.GrdSourceBom.Dock = System.Windows.Forms.DockStyle.Fill + Me.GrdSourceBom.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.GrdSourceBom.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.GrdSourceBom.Location = New System.Drawing.Point(0, 0) + Me.GrdSourceBom.Name = "GrdSourceBom" + Me.GrdSourceBom.Size = New System.Drawing.Size(745, 269) + Me.GrdSourceBom.TabIndex = 0 + Me.GrdSourceBom.UncheckedImage = Nothing + ' + 'ContextMenuStrip1 + ' + Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.查询ToolStripMenuItem, Me.ToolStripSeparator2, Me.更新当前物料ToolStripMenuItem, Me.更新物料信息ToolStripMenuItem, Me.合并相同料号ToolStripMenuItem, Me.ToolStripSeparator1, Me.保存至数据库ToolStripMenuItem, Me.保存至数据库BOM表ToolStripMenuItem, Me.ToolStripSeparator3, Me.导出ToolStripMenuItem, Me.ToolStripSeparator4, Me.插入行ToolStripMenuItem, Me.删除行ToolStripMenuItem, Me.清空表格ToolStripMenuItem}) + Me.ContextMenuStrip1.Name = "ContextMenuStrip1" + Me.ContextMenuStrip1.Size = New System.Drawing.Size(191, 248) + ' + '查询ToolStripMenuItem + ' + Me.查询ToolStripMenuItem.Name = "查询ToolStripMenuItem" + Me.查询ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.查询ToolStripMenuItem.Text = "查询物料信息" + ' + 'ToolStripSeparator2 + ' + Me.ToolStripSeparator2.Name = "ToolStripSeparator2" + Me.ToolStripSeparator2.Size = New System.Drawing.Size(187, 6) + ' + '更新当前物料ToolStripMenuItem + ' + Me.更新当前物料ToolStripMenuItem.Name = "更新当前物料ToolStripMenuItem" + Me.更新当前物料ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.更新当前物料ToolStripMenuItem.Text = "更新当前物料" + ' + '更新物料信息ToolStripMenuItem + ' + Me.更新物料信息ToolStripMenuItem.Name = "更新物料信息ToolStripMenuItem" + Me.更新物料信息ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.更新物料信息ToolStripMenuItem.Text = "更新全部物料" + ' + '合并相同料号ToolStripMenuItem + ' + Me.合并相同料号ToolStripMenuItem.Name = "合并相同料号ToolStripMenuItem" + Me.合并相同料号ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.合并相同料号ToolStripMenuItem.Text = "合并相同物料" + ' + 'ToolStripSeparator1 + ' + Me.ToolStripSeparator1.Name = "ToolStripSeparator1" + Me.ToolStripSeparator1.Size = New System.Drawing.Size(187, 6) + ' + '保存至数据库ToolStripMenuItem + ' + Me.保存至数据库ToolStripMenuItem.Name = "保存至数据库ToolStripMenuItem" + Me.保存至数据库ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.保存至数据库ToolStripMenuItem.Text = "保存至数据库临时表" + ' + '保存至数据库BOM表ToolStripMenuItem + ' + Me.保存至数据库BOM表ToolStripMenuItem.Name = "保存至数据库BOM表ToolStripMenuItem" + Me.保存至数据库BOM表ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.保存至数据库BOM表ToolStripMenuItem.Text = "保存至数据库BOM表" + ' + 'ToolStripSeparator3 + ' + Me.ToolStripSeparator3.Name = "ToolStripSeparator3" + Me.ToolStripSeparator3.Size = New System.Drawing.Size(187, 6) + ' + '导出ToolStripMenuItem + ' + Me.导出ToolStripMenuItem.Name = "导出ToolStripMenuItem" + Me.导出ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.导出ToolStripMenuItem.Text = "导出为BOM文件" + ' + 'ToolStripSeparator4 + ' + Me.ToolStripSeparator4.Name = "ToolStripSeparator4" + Me.ToolStripSeparator4.Size = New System.Drawing.Size(187, 6) + ' + '插入行ToolStripMenuItem + ' + Me.插入行ToolStripMenuItem.Name = "插入行ToolStripMenuItem" + Me.插入行ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.插入行ToolStripMenuItem.Text = "插入行" + ' + '删除行ToolStripMenuItem + ' + Me.删除行ToolStripMenuItem.Name = "删除行ToolStripMenuItem" + Me.删除行ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.删除行ToolStripMenuItem.Text = "删除行" + ' + '清空表格ToolStripMenuItem + ' + Me.清空表格ToolStripMenuItem.Name = "清空表格ToolStripMenuItem" + Me.清空表格ToolStripMenuItem.Size = New System.Drawing.Size(190, 22) + Me.清空表格ToolStripMenuItem.Text = "清空表格" + ' + 'TabControl2 + ' + Me.TabControl2.Controls.Add(Me.TabPage4) + Me.TabControl2.Controls.Add(Me.TabPage5) + Me.TabControl2.Dock = System.Windows.Forms.DockStyle.Right + Me.TabControl2.Location = New System.Drawing.Point(387, 0) + Me.TabControl2.Name = "TabControl2" + Me.TabControl2.SelectedIndex = 0 + Me.TabControl2.Size = New System.Drawing.Size(358, 201) + Me.TabControl2.TabIndex = 1 + ' + 'TabPage4 + ' + Me.TabPage4.Controls.Add(Me.ChkUpdatePart) + Me.TabPage4.Controls.Add(Me.ChkHasPartType) + Me.TabPage4.Controls.Add(Me.ckb_Pn_Inhaos) + Me.TabPage4.Controls.Add(Me.ckb_PnJohao) + Me.TabPage4.Controls.Add(Me.bt_QueryQuick) + Me.TabPage4.Controls.Add(Me.tb_Desc) + Me.TabPage4.Controls.Add(Me.Label6) + Me.TabPage4.Controls.Add(Me.tb_Name) + Me.TabPage4.Controls.Add(Me.Label5) + Me.TabPage4.Controls.Add(Me.tb_PartNumber) + Me.TabPage4.Controls.Add(Me.Label4) + Me.TabPage4.Location = New System.Drawing.Point(4, 22) + Me.TabPage4.Name = "TabPage4" + Me.TabPage4.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage4.Size = New System.Drawing.Size(350, 175) + Me.TabPage4.TabIndex = 0 + Me.TabPage4.Text = "快速查询" + Me.TabPage4.UseVisualStyleBackColor = True + ' + 'ChkUpdatePart + ' + Me.ChkUpdatePart.AutoSize = True + Me.ChkUpdatePart.Checked = True + Me.ChkUpdatePart.CheckState = System.Windows.Forms.CheckState.Checked + Me.ChkUpdatePart.Location = New System.Drawing.Point(216, 150) + Me.ChkUpdatePart.Name = "ChkUpdatePart" + Me.ChkUpdatePart.Size = New System.Drawing.Size(96, 16) + Me.ChkUpdatePart.TabIndex = 8 + Me.ChkUpdatePart.Text = "同步更新料号" + Me.ChkUpdatePart.UseVisualStyleBackColor = True + ' + 'ChkHasPartType + ' + Me.ChkHasPartType.AutoSize = True + Me.ChkHasPartType.Checked = True + Me.ChkHasPartType.CheckState = System.Windows.Forms.CheckState.Checked + Me.ChkHasPartType.Location = New System.Drawing.Point(216, 128) + Me.ChkHasPartType.Name = "ChkHasPartType" + Me.ChkHasPartType.Size = New System.Drawing.Size(96, 16) + Me.ChkHasPartType.TabIndex = 7 + Me.ChkHasPartType.Text = "包含型号搜索" + Me.ChkHasPartType.UseVisualStyleBackColor = True + ' + 'ckb_Pn_Inhaos + ' + Me.ckb_Pn_Inhaos.AutoSize = True + Me.ckb_Pn_Inhaos.Checked = True + Me.ckb_Pn_Inhaos.CheckState = System.Windows.Forms.CheckState.Checked + Me.ckb_Pn_Inhaos.Location = New System.Drawing.Point(38, 150) + Me.ckb_Pn_Inhaos.Name = "ckb_Pn_Inhaos" + Me.ckb_Pn_Inhaos.Size = New System.Drawing.Size(96, 16) + Me.ckb_Pn_Inhaos.TabIndex = 6 + Me.ckb_Pn_Inhaos.Text = " INHAOS 料号" + Me.ckb_Pn_Inhaos.UseVisualStyleBackColor = True + ' + 'ckb_PnJohao + ' + Me.ckb_PnJohao.AutoSize = True + Me.ckb_PnJohao.Checked = True + Me.ckb_PnJohao.CheckState = System.Windows.Forms.CheckState.Checked + Me.ckb_PnJohao.Location = New System.Drawing.Point(38, 128) + Me.ckb_PnJohao.Name = "ckb_PnJohao" + Me.ckb_PnJohao.Size = New System.Drawing.Size(78, 16) + Me.ckb_PnJohao.TabIndex = 5 + Me.ckb_PnJohao.Text = " 卓豪料号" + Me.ckb_PnJohao.UseVisualStyleBackColor = True + ' + 'bt_QueryQuick + ' + Me.bt_QueryQuick.Location = New System.Drawing.Point(300, 19) + Me.bt_QueryQuick.Name = "bt_QueryQuick" + Me.bt_QueryQuick.Size = New System.Drawing.Size(38, 90) + Me.bt_QueryQuick.TabIndex = 3 + Me.bt_QueryQuick.Text = "查询" + Me.bt_QueryQuick.UseVisualStyleBackColor = True + ' + 'tb_Desc + ' + Me.tb_Desc.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Desc.Location = New System.Drawing.Point(73, 88) + Me.tb_Desc.Name = "tb_Desc" + Me.tb_Desc.Size = New System.Drawing.Size(221, 21) + Me.tb_Desc.TabIndex = 2 + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(12, 91) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(53, 12) + Me.Label6.TabIndex = 0 + Me.Label6.Text = "规格描述" + ' + 'tb_Name + ' + Me.tb_Name.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Name.Location = New System.Drawing.Point(73, 53) + Me.tb_Name.Name = "tb_Name" + Me.tb_Name.Size = New System.Drawing.Size(221, 21) + Me.tb_Name.TabIndex = 1 + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(12, 56) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(53, 12) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "物料名称" + ' + 'tb_PartNumber + ' + Me.tb_PartNumber.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_PartNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PartNumber.Location = New System.Drawing.Point(73, 19) + Me.tb_PartNumber.MaxLength = 32 + Me.tb_PartNumber.Name = "tb_PartNumber" + Me.tb_PartNumber.Size = New System.Drawing.Size(221, 21) + Me.tb_PartNumber.TabIndex = 0 + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(36, 22) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(29, 12) + Me.Label4.TabIndex = 0 + Me.Label4.Text = "料号" + ' + 'TabPage5 + ' + Me.TabPage5.Controls.Add(Me.bt_Query) + Me.TabPage5.Controls.Add(Me.tb_Value) + Me.TabPage5.Controls.Add(Me.Label3) + Me.TabPage5.Controls.Add(Me.combo_Section) + Me.TabPage5.Controls.Add(Me.Label7) + Me.TabPage5.Controls.Add(Me.Label8) + Me.TabPage5.Controls.Add(Me.combo_Operate) + Me.TabPage5.Location = New System.Drawing.Point(4, 22) + Me.TabPage5.Name = "TabPage5" + Me.TabPage5.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage5.Size = New System.Drawing.Size(350, 175) + Me.TabPage5.TabIndex = 1 + Me.TabPage5.Text = "高级查询" + Me.TabPage5.UseVisualStyleBackColor = True + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(282, 12) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(53, 101) + Me.bt_Query.TabIndex = 3 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'tb_Value + ' + Me.tb_Value.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Value.Location = New System.Drawing.Point(53, 65) + Me.tb_Value.Multiline = True + Me.tb_Value.Name = "tb_Value" + Me.tb_Value.ScrollBars = System.Windows.Forms.ScrollBars.Vertical + Me.tb_Value.Size = New System.Drawing.Size(214, 48) + Me.tb_Value.TabIndex = 2 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(18, 15) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(29, 12) + Me.Label3.TabIndex = 1 + Me.Label3.Text = "字段" + ' + 'combo_Section + ' + Me.combo_Section.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_Section.FormattingEnabled = True + Me.combo_Section.Items.AddRange(New Object() {"料号PN", "物料名称", "规格描述"}) + Me.combo_Section.Location = New System.Drawing.Point(53, 12) + Me.combo_Section.Name = "combo_Section" + Me.combo_Section.Size = New System.Drawing.Size(214, 20) + Me.combo_Section.TabIndex = 0 + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(30, 68) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(17, 12) + Me.Label7.TabIndex = 1 + Me.Label7.Text = "值" + ' + 'Label8 + ' + Me.Label8.AutoSize = True + Me.Label8.Location = New System.Drawing.Point(18, 41) + Me.Label8.Name = "Label8" + Me.Label8.Size = New System.Drawing.Size(29, 12) + Me.Label8.TabIndex = 1 + Me.Label8.Text = "运算" + ' + 'combo_Operate + ' + Me.combo_Operate.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_Operate.FormattingEnabled = True + Me.combo_Operate.Location = New System.Drawing.Point(53, 38) + Me.combo_Operate.Name = "combo_Operate" + Me.combo_Operate.Size = New System.Drawing.Size(214, 20) + Me.combo_Operate.TabIndex = 1 + ' + 'GrdQueueResult + ' + Me.GrdQueueResult.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.GrdQueueResult.BorderStyle = FlexCell.BorderStyleEnum.Light3D + Me.GrdQueueResult.CheckedImage = Nothing + Me.GrdQueueResult.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.GrdQueueResult.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.GrdQueueResult.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.GrdQueueResult.Location = New System.Drawing.Point(0, 0) + Me.GrdQueueResult.Name = "GrdQueueResult" + Me.GrdQueueResult.Size = New System.Drawing.Size(385, 177) + Me.GrdQueueResult.TabIndex = 0 + Me.GrdQueueResult.UncheckedImage = Nothing + ' + 'tbBomPN + ' + Me.tbBomPN.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tbBomPN.Location = New System.Drawing.Point(50, 14) + Me.tbBomPN.Name = "tbBomPN" + Me.tbBomPN.Size = New System.Drawing.Size(246, 21) + Me.tbBomPN.TabIndex = 1 + ' + 'btQueryBom + ' + Me.btQueryBom.Location = New System.Drawing.Point(302, 12) + Me.btQueryBom.Name = "btQueryBom" + Me.btQueryBom.Size = New System.Drawing.Size(75, 23) + Me.btQueryBom.TabIndex = 2 + Me.btQueryBom.Text = "查询" + Me.btQueryBom.UseVisualStyleBackColor = True + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(15, 17) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(35, 12) + Me.Label1.TabIndex = 4 + Me.Label1.Text = "料号:" + ' + 'GroupBox1 + ' + Me.GroupBox1.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.GroupBox1.Controls.Add(Me.lbl_CurrentPN) + Me.GroupBox1.Controls.Add(Me.TabControl1) + Me.GroupBox1.Location = New System.Drawing.Point(12, 41) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.RightToLeft = System.Windows.Forms.RightToLeft.No + Me.GroupBox1.Size = New System.Drawing.Size(765, 553) + Me.GroupBox1.TabIndex = 5 + Me.GroupBox1.TabStop = False + ' + 'lbl_CurrentPN + ' + Me.lbl_CurrentPN.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.lbl_CurrentPN.BackColor = System.Drawing.Color.LightBlue + Me.lbl_CurrentPN.Location = New System.Drawing.Point(5, 13) + Me.lbl_CurrentPN.Name = "lbl_CurrentPN" + Me.lbl_CurrentPN.Size = New System.Drawing.Size(754, 14) + Me.lbl_CurrentPN.TabIndex = 1 + Me.lbl_CurrentPN.Text = "当前料号: " + Me.lbl_CurrentPN.TextAlign = System.Drawing.ContentAlignment.TopCenter + ' + 'form_BomManage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 12!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(790, 597) + Me.Controls.Add(Me.GroupBox1) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.btQueryBom) + Me.Controls.Add(Me.tbBomPN) + Me.KeyPreview = true + Me.Name = "form_BomManage" + Me.Text = "BOM管理" + Me.TabControl1.ResumeLayout(false) + Me.TabPage1.ResumeLayout(false) + Me.TabPage1.PerformLayout + Me.TabPage3.ResumeLayout(false) + Me.SplSearch.Panel1.ResumeLayout(false) + Me.SplSearch.Panel2.ResumeLayout(false) + CType(Me.SplSearch,System.ComponentModel.ISupportInitialize).EndInit + Me.SplSearch.ResumeLayout(false) + Me.ContextMenuStrip1.ResumeLayout(false) + Me.TabControl2.ResumeLayout(false) + Me.TabPage4.ResumeLayout(false) + Me.TabPage4.PerformLayout + Me.TabPage5.ResumeLayout(false) + Me.TabPage5.PerformLayout + Me.GroupBox1.ResumeLayout(false) + Me.ResumeLayout(false) + Me.PerformLayout + +End Sub + Friend WithEvents TabControl1 As System.Windows.Forms.TabControl + Friend WithEvents TabPage1 As System.Windows.Forms.TabPage + Friend WithEvents TabPage2 As System.Windows.Forms.TabPage + Friend WithEvents tbBomPN As System.Windows.Forms.TextBox + Friend WithEvents btQueryBom As System.Windows.Forms.Button + Friend WithEvents btSave As System.Windows.Forms.Button + Friend WithEvents btDelete As System.Windows.Forms.Button + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents lbl_CurrentPN As System.Windows.Forms.Label + Friend WithEvents btDeleteRow As System.Windows.Forms.Button + Friend WithEvents btInsertRow As System.Windows.Forms.Button + Friend WithEvents btUpdate As System.Windows.Forms.Button + Friend WithEvents btOpenNext As System.Windows.Forms.Button + Friend WithEvents btOpenBack As System.Windows.Forms.Button + Friend WithEvents lblBomPath As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents chk_ShowPnImage As System.Windows.Forms.CheckBox + Friend WithEvents chk_ShowPnInfo As System.Windows.Forms.CheckBox + Friend WithEvents bt_Export As System.Windows.Forms.Button + Friend WithEvents TabPage3 As TabPage + Friend WithEvents SplSearch As SplitContainer + Friend WithEvents GrdSourceBom As FlexCell.Grid + Friend WithEvents GrdQueueResult As FlexCell.Grid + Friend WithEvents TabControl2 As TabControl + Friend WithEvents TabPage4 As TabPage + Friend WithEvents ckb_Pn_Inhaos As CheckBox + Friend WithEvents ckb_PnJohao As CheckBox + Friend WithEvents bt_QueryQuick As Button + Friend WithEvents tb_Desc As TextBox + Friend WithEvents Label6 As Label + Friend WithEvents tb_Name As TextBox + Friend WithEvents Label5 As Label + Friend WithEvents tb_PartNumber As TextBox + Friend WithEvents Label4 As Label + Friend WithEvents TabPage5 As TabPage + Friend WithEvents bt_Query As Button + Friend WithEvents tb_Value As TextBox + Friend WithEvents Label3 As Label + Friend WithEvents combo_Section As ComboBox + Friend WithEvents Label7 As Label + Friend WithEvents Label8 As Label + Friend WithEvents combo_Operate As ComboBox + Friend WithEvents ContextMenuStrip1 As ContextMenuStrip + Friend WithEvents 查询ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ToolStripSeparator1 As ToolStripSeparator + Friend WithEvents 导出ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ChkHasPartType As CheckBox + Friend WithEvents 保存至数据库ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ToolStripSeparator2 As ToolStripSeparator + Friend WithEvents 更新物料信息ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents 保存至数据库BOM表ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ToolStripSeparator3 As ToolStripSeparator + Friend WithEvents ChkUpdatePart As CheckBox + Friend WithEvents 更新当前物料ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents ToolStripSeparator4 As ToolStripSeparator + Friend WithEvents 插入行ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents 删除行ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents 清空表格ToolStripMenuItem As ToolStripMenuItem + Friend WithEvents 合并相同料号ToolStripMenuItem As ToolStripMenuItem +End Class diff --git a/WT-DMS/form_BomManage.resx b/WT-DMS/form_BomManage.resx new file mode 100644 index 0000000..2110be1 --- /dev/null +++ b/WT-DMS/form_BomManage.resx @@ -0,0 +1,143 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + + 17, 17 + + + 46 + + \ No newline at end of file diff --git a/WT-DMS/form_BomManage.vb b/WT-DMS/form_BomManage.vb new file mode 100644 index 0000000..0ec4c3f --- /dev/null +++ b/WT-DMS/form_BomManage.vb @@ -0,0 +1,1736 @@ +Imports System.Text + +Public Class form_BomManage + Dim m_Table As New System.Data.DataTable + Dim m_InitOver As Boolean = False + Dim m_PartNumber As New CPartNumber + + Dim m_BomTemplateName As String = "模板" + Dim m_CurrentBomPN As String = "" + Dim m_BomPath As New ArrayList + + Public Enum COLS + 序号 + 工艺流程 + 料号PN + 物料名称 + 规格描述 + 单位 + 用量 + 使用位置 + 父料号 + 图片 + 备注 + 单价 'V2.4 + 单位总价 'V2.4 + max + End Enum + + Public Shared m_COLS_NAME(,) As String = { + {"序号", "0"}, + {"工艺流程", "1"}, + {"料号PN", "1"}, + {"物料名称", "0"}, + {"规格描述", "0"}, + {"单位", "0"}, + {"用量", "1"}, + {"使用位置", "1"}, + {"父料号", "1"}, + {"图片", "0"}, + {"备注", "1"}, + {"单价", "1"}, + {"单位总价", "1"} + } + + Public Shared m_ProcessRoutingTable() As String = { + "Bonding", + "SMT", + "DIP", + "成品组装", + "成品包装", + "线外加工", + "其它-1", + "其它-2", + "其它-3", + "其它-4", + "其它-5" + } + + Private Sub FillGridHeaderByDataTable() + Grid1.NewFile() + + Grid1.AllowUserSort = False + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + Grid1.Cols = COLS.max + For col As Integer = 0 To COLS.max - 1 + Grid1.Cell(0, col).Text = m_COLS_NAME(col, 0) + Next + + Grid1.Column(COLS.父料号).CellType = FlexCell.CellTypeEnum.CheckBox + Grid1.Column(COLS.工艺流程).CellType = FlexCell.CellTypeEnum.ComboBox + With Grid1.ComboBox(COLS.工艺流程) + .DataSource = m_ProcessRoutingTable + .Locked = False + .AutoComplete = True + End With + + '调整宽度 + Grid1.Column(COLS.序号).Width = My.Settings.FORM_BOM_COL_WIDTH_序号 + Grid1.Column(COLS.工艺流程).Width = My.Settings.FORM_BOM_COL_WIDTH_工艺流程 + Grid1.Column(COLS.料号PN).Width = My.Settings.FORM_BOM_COL_WIDTH_料号PN + Grid1.Column(COLS.物料名称).Width = My.Settings.FORM_BOM_COL_WIDTH_物料名称 + Grid1.Column(COLS.规格描述).Width = My.Settings.FORM_BOM_COL_WIDTH_规格描述 + Grid1.Column(COLS.单位).Width = My.Settings.FORM_BOM_COL_WIDTH_单位 + Grid1.Column(COLS.用量).Width = My.Settings.FORM_BOM_COL_WIDTH_用量 + Grid1.Column(COLS.使用位置).Width = My.Settings.FORM_BOM_COL_WIDTH_使用位置 + Grid1.Column(COLS.父料号).Width = My.Settings.FORM_BOM_COL_WIDTH_父料号 + Grid1.Column(COLS.图片).Width = My.Settings.FORM_BOM_COL_WIDTH_图片 + Grid1.Column(COLS.备注).Width = My.Settings.FORM_BOM_COL_WIDTH_备注 + Me.Height = My.Settings.FORM_BOM_HEIGHT + Me.Width = My.Settings.FORM_BOM_WIDTH + + ''Dim row As Integer + 'Dim col As Integer + 'If m_Table.Columns.Count > 0 Then + ' Grid1.Cols = m_Table.Columns.Count + ' For col = 0 To m_Table.Columns.Count - 1 + ' If m_Table.Columns(col).DataType.Name = "Boolean" Then + ' Grid1.Column(col).CellType = FlexCell.CellTypeEnum.CheckBox + ' End If + ' Grid1.Cell(0, col).Text = m_Table.Columns(col).ColumnName + ' Next + 'End If + + 'For i As Integer = 1 To Grid1.Rows - 1 + ' Grid1.Cell(i, 0).Text = i + 'Next + + Grid1.AllowUserSort = True + Grid1.Locked = False + Grid1.Column(COLS.序号).Locked = True + + Grid1.Rows = 500 + + Application.DoEvents() + End Sub + + Private Sub FillGridByDataTable() + Dim row As Integer + Dim col As Integer + + 'Grid1.AutoRedraw = False + If Grid1.Rows < m_Table.Rows.Count Then + Grid1.Rows = m_Table.Rows.Count + 100 + End If + + Dim insertRow As Integer = 0 + + If m_Table.Rows.Count > 0 Then + For row = 0 To m_Table.Rows.Count - 1 + insertRow = row + 1 + + Grid1.Cell(insertRow, COLS.序号).Text = insertRow + 'Dim queryCol As Integer = 1 + Dim queryCol As Integer = 0 + For col = 0 To COLS.max - 1 + If m_COLS_NAME(col, 1) = "1" Then + Try + Grid1.Cell(insertRow, col).Text = m_Table.Rows.Item(row).Item(queryCol) + Catch ex As Exception + Grid1.Cell(insertRow, col).Text = "" + End Try + + queryCol += 1 + End If + Next + Next + End If + + 'Grid1.AutoRedraw = True + 'Grid1.Refresh() + End Sub + + Private Function QueryBom(ByVal BomName As String, ByRef dataTable As Data.DataTable) As Boolean + Dim strSelect As String = "SELECT * FROM `" & "bom_" & BomName & "`" + + '查询入库数量 + Dim result As Boolean = False + Dim strSQL As String = strSelect + dataTable.Rows.Clear() + dataTable.Columns.Clear() + If SQL_Query(COL_RIGHTS.BOM管理, strSQL, dataTable) = True Then + result = True + End If + + Return result + End Function + + Private Function CheckBomExist(ByVal bomName As String, ByRef isExist As Boolean) As Boolean + Dim strSQL As String = "CHECK TABLE `" & "bom_" & bomName & "`" 'CHECK TABLE `BOM_U01-ATMEGA328P-TQFP32` + Dim result As Boolean = False + m_Table.Rows.Clear() + m_Table.Columns.Clear() + isExist = False + If SQL_Query(COL_RIGHTS.BOM管理, strSQL, m_Table) = True Then + If m_Table.Rows.Count > 0 Then + If m_Table.Rows(0).Item(3) = "OK" Then + isExist = True + End If + End If + result = True + End If + + Return result + End Function + + Private Function DropBom(ByVal bomName As String) As Boolean + Dim strSQL As String = "DROP TABLE IF EXISTS `" & "bom_" & bomName & "`" + Dim result As Boolean = False + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSQL) = True Then + result = True + End If + + Return result + End Function + + Private Function CreateBom(ByVal bomName As String) As Boolean + Dim strSQL As String = "CREATE TABLE IF NOT EXISTS `" & "bom_" & bomName & "` Like `" & "bom_" & m_BomTemplateName & "`" + Dim result As Boolean = False + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSQL) = True Then + result = True + End If + + Return result + End Function + + Private Function CreateContextBom(ByVal bomName As String) As Boolean + Dim strSQL As String = "CREATE TABLE IF NOT EXISTS `" & "bom_" & bomName & "` Like `" & "bom_" & m_BomTemplateName & "_context`" + Dim result As Boolean = False + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSQL) = True Then + result = True + End If + + Return result + End Function + + Private Function RenameBom(ByVal oldName As String, ByVal newName As String) As Boolean + Dim strSQL As String = "ALTER TABLE `" & "bom_" & oldName & "`" & " RENAME TO `" & "bom_" & newName & "`" + Dim result As Boolean = False + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSQL) = True Then + result = True + End If + + Return result + End Function + + Private Sub btNew_Click(sender As Object, e As EventArgs) + Dim inputDlg As New dlg_Input + inputDlg.Text = "请输入新建的料号" + inputDlg.tb_Input.MaxLength = 32 + inputDlg.tb_Input.CharacterCasing = CharacterCasing.Upper + If inputDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return + + m_CurrentBomPN = "" + If inputDlg.tb_Input.Text.Length = 0 Then + MsgBox("输入料号不能为空") + Return + End If + + Dim inputBomSn As String = inputDlg.tb_Input.Text + + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(inputBomSn, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return + End If + + '检测输入料号的料表是否已经存在 + If CheckBomExist(inputBomSn, isExist) = True Then + If isExist = True Then + MsgBox("输入料号料表已经存在") + Return + End If + Else + MsgBox("无法查询输入料号对应的料表是否存在，请检查网络连接!") + Return + End If + + m_CurrentBomPN = inputBomSn + lbl_CurrentPN.Text = "当前料表料号:" & m_CurrentBomPN + + '查询料表模板 + If QueryBom(m_BomTemplateName, m_Table) = True Then + FillGridHeaderByDataTable() + End If + End Sub + + 'Private Sub Grid1_LeaveRow(Sender As Object, e As FlexCell.Grid.LeaveRowEventArgs) Handles Grid1.LeaveRow + ' If e.Row > 0 Then + ' If Grid1.Cell(e.Row, COLS.料号PN).Text.Length > 0 Then + ' Grid1.Cell(e.Row, COLS.序号).Text = e.Row + ' End If + ' End If + 'End Sub + + + Private Sub btSave_Click(sender As Object, e As EventArgs) Handles btSave.Click + If m_CurrentBomPN.Length = 0 Then + MsgBox("未指定当前BOM料号!") + Return + End If + + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(m_CurrentBomPN, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return + End If + + '检测内容中的PN字段有效性 + If CheckPNValid() = False Then + MsgBox("输入信息存在错误，不能进行保存!") + Return + End If + + '创建料号表 + If SaveBom(m_CurrentBomPN) = False Then + MsgBox("保存料表失败") + Return + End If + + MsgBox("保存料表:" & m_CurrentBomPN & "成功") + End Sub + + + Private Function CheckPNValid() As Boolean + Dim row As Integer + '清除背景颜色 + For row = 1 To Grid1.Rows - 1 + Grid1.Cell(row, COLS.料号PN).BackColor = Color.White + Grid1.Cell(row, COLS.用量).BackColor = Color.White + Grid1.Cell(row, COLS.序号).Text = "" + Next + + + '检测料表输入数据是否有效 + Dim strPN As String + Dim isExist As Boolean = False + Dim checkResult As Boolean = True + Dim m_SN As Integer = 1 + Dim m_Number As Long + For row = 1 To Grid1.Rows - 1 + strPN = Grid1.Cell(row, COLS.料号PN).Text + If strPN.Length > 0 Then + '检测料号有效性 + If m_PartNumber.CheckPartNumber(strPN, isExist) = ERROR_CODE.SUCCESS Then + If isExist = True Then + Grid1.Cell(row, COLS.料号PN).BackColor = Color.Green + Else + checkResult = False + Grid1.Cell(row, COLS.料号PN).BackColor = Color.Red + End If + Else + checkResult = False + Grid1.Cell(row, COLS.料号PN).BackColor = Color.Red + End If + + '检测“用量”列，是否为数据 + Try + m_Number = Grid1.Cell(row, COLS.用量).Text + Grid1.Cell(row, COLS.用量).BackColor = Color.Green + Catch ex As Exception + Grid1.Cell(row, COLS.用量).BackColor = Color.Red + checkResult = False + End Try + + Grid1.Cell(row, COLS.序号).Text = m_SN + m_SN += 1 + End If + Next + + Return checkResult + End Function + + Private Function SaveBomItems(ByVal bomName As String) As Boolean + Dim row As Integer + Dim col As Integer + Dim result As Boolean = True + + 'INSERT INTO table_name(col_name,...) values(expr,...) + Dim strInsert As String = "INSERT INTO `" & "bom_" & bomName & "` " + Dim insertItems As String = "" + For col = 0 To COLS.max - 3 + If m_COLS_NAME(col, 1) = "1" Then + If insertItems.Length > 0 Then + insertItems &= "," + End If + insertItems &= "`" & m_COLS_NAME(col, 0) & "`" + End If + Next + + For row = 1 To Grid1.Rows - 1 + If Grid1.Cell(row, COLS.料号PN).BackColor = Color.Green Then + Dim insertValues As String = "" + + For col = 0 To COLS.max - 3 + If m_COLS_NAME(col, 1) = "1" Then + If insertValues.Length > 0 Then + insertValues &= "," + End If + + If Grid1.Column(col).CellType = FlexCell.CellTypeEnum.CheckBox Then + If Grid1.Cell(row, col).BooleanValue = True Then + insertValues &= "'1'" + Else + insertValues &= "'0'" + End If + Else + insertValues &= "'" & Grid1.Cell(row, col).Text & "'" + End If + End If + Next + + Dim strSQL As String = strInsert & "(" & insertItems & ") values(" & insertValues & ")" + If SQL_ExeCommand(COL_RIGHTS.BOM管理, strSQL) = False Then + result = False + Exit For + End If + End If + Next + + Return result + End Function + + Private Function SaveBom(ByVal bomName As String) As Boolean + '删除原Bom + 'If DropBom(bomName) = False Then Return False + 'MsgBox("DropBOM OK！") + + '创建新Bom + Dim tempBom As String = bomName & "_temp" + If CreateBom(tempBom) = False Then Return False + 'MsgBox("CreateBom OK！") + + '保存Bom内容 + If SaveBomItems(tempBom) = False Then Return False + 'MsgBox("SaveBomItems OK！") + + '删除原Bom + If DropBom(bomName) = False Then Return False + + '重命名新BOM + If RenameBom(tempBom, bomName) = False Then Return False + + Return True + End Function + + + Private Function SaveBomItems2(tempBom) As Boolean + Dim result As Boolean = True + + Dim cmdText As New StringBuilder + Dim insertStr As New StringBuilder + insertStr.Append($"INSERT INTO `bom_{tempBom}` ") + insertStr.Append("(") + insertStr.Append($"`{SourceGridCols.使用位置}`,") + insertStr.Append($"`{SourceGridCols.用量}`,") + insertStr.Append($"`{SourceGridCols.工艺流程}`,") + insertStr.Append($"`{SourceGridCols.料号PN}`") + insertStr.Append(")") + insertStr.Append(" values") + + For i = 1 To GrdSourceBom.Rows - 1 + If String.IsNullOrEmpty(GrdSourceBom.Cell(i, SourceGridCols.注释).Text) Then + If String.IsNullOrEmpty(GrdSourceBom.Cell(i, SourceGridCols.料号PN).Text) Then + Continue For + End If + End If + + cmdText.Clear() + cmdText.Append(insertStr.ToString) + cmdText.Append("(") + + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.使用位置).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.用量).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.工艺流程).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.料号PN).Text}'") + + cmdText.Append(")") + + If SQL_ExeCommand(COL_RIGHTS.BOM管理, cmdText.ToString) = False Then + result = False + Exit For + End If + Next + + Return result + End Function + + + ''' + ''' 保存BOM临时表 + ''' + ''' + ''' + Private Function SaveBom2(bomName As String) As Boolean + + '创建新Bom + Dim tempBom As String = bomName & "_temp" + If CreateBom(tempBom) = False Then Return False + + '保存Bom内容 + If SaveBomItems2(tempBom) = False Then Return False + + '删除原Bom + If DropBom(bomName) = False Then Return False + + '重命名新BOM + If RenameBom(tempBom, bomName) = False Then Return False + + Return True + End Function + + + Private Function SaveBomContextItems(tempBom) As Boolean + Dim result As Boolean = True + + 'INSERT INTO table_name(col_name,...) values(expr,...) + Dim cmdText As New StringBuilder + Dim insertStr As New StringBuilder + insertStr.Append($"INSERT INTO `bom_{tempBom}` ") + insertStr.Append("(") + insertStr.Append($"`{SourceGridCols.注释}`,") + insertStr.Append($"`{SourceGridCols.使用位置}`,") + insertStr.Append($"`{SourceGridCols.型号}`,") + insertStr.Append($"`{SourceGridCols.用量}`,") + insertStr.Append($"`{SourceGridCols.校验}`,") + insertStr.Append($"`{SourceGridCols.工艺流程}`,") + insertStr.Append($"`{SourceGridCols.料号PN}`") + insertStr.Append(")") + insertStr.Append(" values") + + For i = 1 To GrdSourceBom.Rows - 1 + If String.IsNullOrEmpty(GrdSourceBom.Cell(i, SourceGridCols.注释).Text) Then + If String.IsNullOrEmpty(GrdSourceBom.Cell(i, SourceGridCols.料号PN).Text) Then + Continue For + End If + End If + + cmdText.Clear() + cmdText.Append(insertStr.ToString) + cmdText.Append("(") + + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.注释).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.使用位置).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.型号).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.用量).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.校验).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.工艺流程).Text}',") + cmdText.Append($"'{GrdSourceBom.Cell(i, SourceGridCols.料号PN).Text}'") + + cmdText.Append(")") + + If SQL_ExeCommand(COL_RIGHTS.BOM管理, cmdText.ToString) = False Then + result = False + Exit For + End If + Next + + Return result + End Function + + + ''' + ''' 保存BOM临时表 + ''' + ''' + ''' + Private Function SaveBomContext(bomName As String) As Boolean + '创建新Bom + Dim oldBom As String = bomName & "_context" + Dim tempBom As String = bomName & "_context" & "_temp" + If CreateContextBom(tempBom) = False Then Return False + + '保存Bom内容 + If SaveBomContextItems(tempBom) = False Then Return False + + '删除原Bom + If DropBom(oldBom) = False Then Return False + + '重命名新BOM + If RenameBom(tempBom, oldBom) = False Then Return False + + Return True + End Function + + + + + Private Sub PushToBomPath(ByVal bomName As String) + m_BomPath.Add(m_CurrentBomPN) + RefreshBomPath() + End Sub + + Private Function PopFromBomPath() As String + Dim backBomName As String = "" + + If m_BomPath.Count >= 2 Then + m_BomPath.RemoveAt(m_BomPath.Count - 1) + backBomName = m_BomPath.Item(m_BomPath.Count - 1) + m_BomPath.RemoveAt(m_BomPath.Count - 1) + End If + + RefreshBomPath() + + Return backBomName + End Function + + Private Sub RefreshBomPath() + Dim tempPath As String = "" + + For Each pItem As String In m_BomPath + If tempPath.Length > 0 Then + tempPath &= "\" + End If + tempPath &= pItem + Next + + lblBomPath.Text = tempPath + + If m_BomPath.Count >= 2 Then + btOpenBack.Enabled = True + Else + btOpenBack.Enabled = False + End If + + btOpenNext.Enabled = False + + Application.DoEvents() + End Sub + + Private Function OpenBom(ByVal bomName As String) As Boolean + Dim result As Boolean = False + + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(bomName, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return False + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return False + End If + + '检测输入料号的料表是否已经存在 + If CheckBomExist(bomName, isExist) = True Then + If isExist = True Then + m_CurrentBomPN = bomName + lbl_CurrentPN.Text = "当前料表料号:" & m_CurrentBomPN + + '查询料表模板 + If QueryBom(m_CurrentBomPN, m_Table) = True Then + PushToBomPath(m_CurrentBomPN) + + FillGridHeaderByDataTable() + FillGridByDataTable() + If chk_ShowPnInfo.Checked = True Then + GetAllPNItemInfo() + End If + + result = True + End If + Else + If MessageBox.Show("输入料号BOM不存在,是否新建BOM?" & vbNewLine & "选择""是""新建, 否则""取消""", "新建BOM?", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then + m_CurrentBomPN = bomName + lbl_CurrentPN.Text = "当前料表料号:" & m_CurrentBomPN + + '查询料表模板 + If QueryBom(m_BomTemplateName, m_Table) = True Then + PushToBomPath(m_CurrentBomPN) + FillGridHeaderByDataTable() + + result = True + End If + End If + End If + Else + MsgBox("无法查询输入料号对应的BOM是否存在，请检查网络连接!") + End If + + Return result + End Function + + ''' + ''' 加载临时Bom表 + ''' + ''' + ''' + Private Function OpenBomContext(bomName As String) As Boolean + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(bomName, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return False + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return False + End If + + '检测输入料号的料表是否已经存在 + If CheckBomExist(bomName, isExist) = False Then + MsgBox("无法查询输入料号对应的BOM是否存在，请检查网络连接!") + Return False + End If + + Dim tbName As String '数据表名 + If isExist = False Then + If MessageBox.Show($"输入料号BOM不存在,是否新建BOM?{vbNewLine}选择""是""新建, 否则""取消""", "新建BOM?", MessageBoxButtons.YesNo) <> Windows.Forms.DialogResult.Yes Then + Return False + End If + tbName = $"bom_模板_context" + Else + tbName = $"bom_{bomName}_context" + End If + + lbl_CurrentPN.Text = "当前料表料号:" & bomName + + + '查询云端数据 + Dim strSQL As String = $"Select * From `{tbName}` order by `ID` asc" + Dim dtTable As New DataTable + If SQL_Query(COL_RIGHTS.BOM管理, strSQL, dtTable) = False Then Return False + + '名称有所变化(不明作用) + ' PushToBomPath(bomName) + + '填充至表格 + InitSourceGrid() '初始化表格 + GrdSourceBom.AutoRedraw = False + For i = 0 To dtTable.Rows.Count - 1 + GrdSourceBom.Cell(i + 1, SourceGridCols.注释).Text = dtTable(i)($"{SourceGridCols.注释}").ToString + GrdSourceBom.Cell(i + 1, SourceGridCols.使用位置).Text = dtTable(i)($"{SourceGridCols.使用位置}").ToString + GrdSourceBom.Cell(i + 1, SourceGridCols.型号).Text = dtTable(i)($"{SourceGridCols.型号}").ToString + GrdSourceBom.Cell(i + 1, SourceGridCols.用量).Text = dtTable(i)($"{SourceGridCols.用量}").ToString + GrdSourceBom.Cell(i + 1, SourceGridCols.校验).Text = dtTable(i)($"{SourceGridCols.校验}").ToString + GrdSourceBom.Cell(i + 1, SourceGridCols.工艺流程).Text = dtTable(i)($"{SourceGridCols.工艺流程}").ToString + GrdSourceBom.Cell(i + 1, SourceGridCols.料号PN).Text = dtTable(i)($"{SourceGridCols.料号PN}").ToString + Next + GrdSourceBom.AutoRedraw = True + GrdSourceBom.Refresh() + + If chk_ShowPnInfo.Checked Then + GetAllPnInfo() + End If + + Return True + End Function + + + Private Sub btQueryBom_Click(sender As Object, e As EventArgs) Handles btQueryBom.Click + m_CurrentBomPN = "" + m_BomPath.Clear() + + If tbBomPN.Text.Length = 0 Then + MsgBox("输入料号不能为空") + Return + End If + + If TabControl1.SelectedIndex = 0 Then + OpenBom(tbBomPN.Text) + ElseIf TabControl1.SelectedIndex = 2 Then + OpenBomContext(tbBomPN.Text) '加载临时BOM + End If + End Sub + + Private Function GetPNItemInfo(ByVal gridRowIndex As Integer) As Boolean + Dim 物料名称 As String = "" + Dim 规格描述 As String = "" + Dim 单位 As String = "" + Dim 单重 As Double = 0 + Dim 图片(0) As Byte + Dim 供应商ID As String = "" + + Dim 用量 As String = Grid1.Cell(gridRowIndex, 6).IntegerValue + + + 'Grid1.Cell(gridRowIndex, COLS.物料名称).Text = "" + 'Grid1.Cell(gridRowIndex, COLS.规格描述).Text = "" + 'Grid1.Cell(gridRowIndex, COLS.单位).Text = "" + 'Grid1.Cell(gridRowIndex, COLS.单价).Text = "" + 'Grid1.Cell(gridRowIndex, COLS.单位总价).Text = "" + 'Grid1.Cell(gridRowIndex, COLS.图片).Text = "" + + Dim result As Boolean = False + Dim strPn As String = Grid1.Cell(gridRowIndex, COLS.料号PN).Text + + + 'If chk_ShowPnImage.Checked = True Then + ' If m_PartNumber.QueryItem(strPn, 物料名称, 规格描述, 单位, 单重, 图片, 供应商ID) = ERROR_CODE.SUCCESS Then + ' Grid1.Cell(gridRowIndex, COLS.物料名称).Text = 物料名称 + ' Grid1.Cell(gridRowIndex, COLS.规格描述).Text = 规格描述 + ' Grid1.Cell(gridRowIndex, COLS.单位).Text = 单位 + ' Grid1.Cell(gridRowIndex, COLS.单价).Text = 单重 + ' Grid1.Cell(gridRowIndex, COLS.单位总价).Text = 单重 * 用量 + + ' Grid1.Cell(gridRowIndex, COLS.图片).Text = "" + + ' Dim mImage As System.Drawing.Image = GetImageFromBytes(图片) + ' If Grid1.Images.Count >= gridRowIndex Then + ' Grid1.Images.Remove(gridRowIndex.ToString) + ' End If + ' Grid1.Images.Add(mImage, gridRowIndex.ToString) + ' Grid1.Cell(gridRowIndex, COLS.图片).SetImage(gridRowIndex.ToString) + + ' result = True + ' End If + 'Else + ' If m_PartNumber.QueryItem(strPn, 物料名称, 规格描述, 单位, 单重, 供应商ID) = ERROR_CODE.SUCCESS Then + ' Grid1.Cell(gridRowIndex, COLS.物料名称).Text = 物料名称 + ' Grid1.Cell(gridRowIndex, COLS.规格描述).Text = 规格描述 + ' Grid1.Cell(gridRowIndex, COLS.单位).Text = 单位 + ' Grid1.Cell(gridRowIndex, COLS.单价).Text = 单重 + ' Grid1.Cell(gridRowIndex, COLS.单位总价).Text = 单重 * 用量 + ' Grid1.Cell(gridRowIndex, COLS.图片).Text = "" + ' result = True + ' End If + 'End If + + + + If chk_ShowPnImage.Checked = True Then + If m_PartNumber.QueryItem(strPn, 物料名称, 规格描述, 单位, 单重, 图片, 供应商ID) = ERROR_CODE.SUCCESS Then + '填充图像 + Dim mImage As System.Drawing.Image = GetImageFromBytes(图片) + If Grid1.Images.Count >= gridRowIndex Then + Grid1.Images.Remove(gridRowIndex.ToString) + End If + Grid1.Images.Add(mImage, gridRowIndex.ToString) + Grid1.Cell(gridRowIndex, COLS.图片).SetImage(gridRowIndex.ToString) + + result = True + End If + Else + If m_PartNumber.QueryItem(strPn, 物料名称, 规格描述, 单位, 单重, 供应商ID) = ERROR_CODE.SUCCESS Then + result = True + End If + End If + + Grid1.Cell(gridRowIndex, COLS.物料名称).Text = 物料名称 + Grid1.Cell(gridRowIndex, COLS.规格描述).Text = 规格描述 + Grid1.Cell(gridRowIndex, COLS.单位).Text = 单位 + Grid1.Cell(gridRowIndex, COLS.单价).Text = 单重 + Grid1.Cell(gridRowIndex, COLS.单位总价).Text = 单重 * 用量 + Grid1.Cell(gridRowIndex, COLS.图片).Text = "" + + Return result + End Function + + + Private Function GetAllPNItemInfo() As Boolean + Dim TotalCost As Double = 0 + Dim AvailabeRows As Integer = 0 + + For row As Integer = 1 To Grid1.Rows - 1 + Grid1.Cell(row, COLS.物料名称).Text = "" + Grid1.Cell(row, COLS.规格描述).Text = "" + Grid1.Cell(row, COLS.单位).Text = "" + + Grid1.Cell(row, COLS.单价).Text = "" + Grid1.Cell(row, COLS.单位总价).Text = "" + + Grid1.Cell(row, COLS.图片).Text = "" + Next + + Grid1.Images.Clear() + + Dim result As Boolean = True + + For row As Integer = 1 To Grid1.Rows - 1 + AvailabeRows = AvailabeRows + 1 + If GetPNItemInfo(row) = False Then + result = False + Exit For + End If + TotalCost = TotalCost + Grid1.Cell(row, COLS.单位总价).Text + Next + Grid1.Cell(AvailabeRows, COLS.单位总价 - 1).Text = "Total : " + Grid1.Cell(AvailabeRows, COLS.单位总价).Text = TotalCost + + Return result + End Function + + Private Sub Grid1_LeaveCell(Sender As Object, e As FlexCell.Grid.LeaveCellEventArgs) Handles Grid1.LeaveCell + If e.Row > 1 AndAlso e.Col = COLS.料号PN Then + If Grid1.Cell(e.Row, e.Col).Text.Length > 0 Then + Dim inputBomPn As String = Grid1.Cell(e.Row, e.Col).Text.ToUpper + Grid1.Cell(e.Row, e.Col).Text = inputBomPn + + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(inputBomPn, isExist) = ERROR_CODE.SUCCESS Then + If isExist = True Then + If chk_ShowPnInfo.Checked = True Then + GetPNItemInfo(e.Row) + End If + Else + Grid1.Cell(e.Row, e.Col).BackColor = Color.Red + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return + End If + End If + End If + End Sub + + Private Sub form_BomManage_FormClosed(sender As Object, e As FormClosedEventArgs) Handles Me.FormClosed + My.Settings.FORM_BOM_COL_WIDTH_序号 = Grid1.Column(COLS.序号).Width + My.Settings.FORM_BOM_COL_WIDTH_工艺流程 = Grid1.Column(COLS.工艺流程).Width + My.Settings.FORM_BOM_COL_WIDTH_料号PN = Grid1.Column(COLS.料号PN).Width + My.Settings.FORM_BOM_COL_WIDTH_物料名称 = Grid1.Column(COLS.物料名称).Width + My.Settings.FORM_BOM_COL_WIDTH_规格描述 = Grid1.Column(COLS.规格描述).Width + My.Settings.FORM_BOM_COL_WIDTH_单位 = Grid1.Column(COLS.单位).Width + My.Settings.FORM_BOM_COL_WIDTH_用量 = Grid1.Column(COLS.用量).Width + My.Settings.FORM_BOM_COL_WIDTH_使用位置 = Grid1.Column(COLS.使用位置).Width + My.Settings.FORM_BOM_COL_WIDTH_父料号 = Grid1.Column(COLS.父料号).Width + My.Settings.FORM_BOM_COL_WIDTH_图片 = Grid1.Column(COLS.图片).Width + My.Settings.FORM_BOM_COL_WIDTH_备注 = Grid1.Column(COLS.备注).Width + My.Settings.FORM_BOM_HEIGHT = Me.Height + My.Settings.FORM_BOM_WIDTH = Me.Width + + My.Settings.Save() + End Sub + + Private Sub btInsertRow_Click(sender As Object, e As EventArgs) Handles btInsertRow.Click + Grid1.Selection.InsertRows() + End Sub + + Private Sub btDeleteRow_Click(sender As Object, e As EventArgs) Handles btDeleteRow.Click + Grid1.Selection.DeleteByRow() + End Sub + + Private Sub btUpdate_Click(sender As Object, e As EventArgs) Handles btUpdate.Click + GetAllPNItemInfo() + End Sub + + Private Sub btOpenFatherPN_Click(sender As Object, e As EventArgs) Handles btOpenNext.Click + Dim selRow As Integer = Grid1.Selection.FirstRow + If selRow >= 1 Then + If Grid1.Cell(selRow, COLS.父料号).BooleanValue = True Then + tbBomPN.Text = Grid1.Cell(Grid1.Selection.FirstRow, COLS.料号PN).Text + OpenBom(tbBomPN.Text) + Else + MsgBox("选择项不是父料号，无法打开") + End If + End If + End Sub + + Private Sub btOpenBack_Click(sender As Object, e As EventArgs) Handles btOpenBack.Click + tbBomPN.Text = PopFromBomPath() + If tbBomPN.Text.Length > 0 Then + OpenBom(tbBomPN.Text) + End If + End Sub + + Private Sub form_BomManage_Load(sender As Object, e As EventArgs) Handles MyBase.Load + FillGridHeaderByDataTable() + m_BomPath.Clear() + RefreshBomPath() + btOpenNext.Enabled = False + + InitSourceGrid() + End Sub + + Private Sub Grid1_MouseClick(sender As Object, e As MouseEventArgs) Handles Grid1.MouseClick + btOpenNext.Enabled = False + If Grid1.Selection.FirstRow >= 1 Then + If Grid1.Cell(Grid1.Selection.FirstRow, COLS.父料号).BooleanValue = True Then + If Grid1.Cell(Grid1.Selection.FirstRow, COLS.料号PN).Text.Length > 0 Then + btOpenNext.Enabled = True + End If + End If + End If + End Sub + + Private Sub Grid1_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles Grid1.MouseDoubleClick + Dim selRow As Integer = Grid1.Selection.FirstRow + Dim selCol As Integer = Grid1.Selection.FirstCol + If Grid1.Selection.FirstRow >= 1 Then + If Grid1.Selection.FirstCol = COLS.图片 Then + Dim imageKey As String = Grid1.Cell(selRow, selCol).ImageKey + If Not imageKey Is Nothing AndAlso imageKey.Length > 0 Then + Dim mImage As System.Drawing.Image = Grid1.Images.Item(imageKey).Picture + If Not mImage Is Nothing Then + Dim dlgImage As New dlgImage + dlgImage.Text = Grid1.Cell(selRow, COLS.料号PN).Text + dlgImage.BackgroundImage = mImage + dlgImage.ShowDialog() + End If + End If + End If + End If + End Sub + + Private Sub tbBomPN_KeyDown(sender As Object, e As KeyEventArgs) Handles tbBomPN.KeyDown + If e.KeyCode = Keys.Enter Then + btQueryBom.PerformClick() + End If + End Sub + + Private Sub chk_ShowPnImage_CheckedChanged(sender As Object, e As EventArgs) Handles chk_ShowPnImage.CheckedChanged + If chk_ShowPnImage.Checked = False Then + Grid1.Images.Clear() + End If + End Sub + + Private Sub btDelete_Click(sender As Object, e As EventArgs) Handles btDelete.Click + If m_CurrentBomPN.Length = 0 Then + MsgBox("未指定当前BOM料号!") + Return + End If + + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(m_CurrentBomPN, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return + End If + + '检测Bom表是否存在 + isExist = False + If CheckBomExist(m_CurrentBomPN, isExist) = False Then + MsgBox("指定料号对应BOM不存在！") + Return + End If + + If MessageBox.Show("确认删除指定BOM:" & m_CurrentBomPN & "，删除后无法恢复！", "BOM:" & m_CurrentBomPN & "删除确认", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.OK Then + '删除料号表 + If DropBom(m_CurrentBomPN) = False Then + MsgBox("删除料表失败") + Return + End If + + MsgBox("删除料表:" & m_CurrentBomPN & "成功") + End If + End Sub + + Private Sub bt_Export_Click(sender As Object, e As EventArgs) Handles bt_Export.Click + Dim dlg As New SaveFileDialog() + dlg.DefaultExt = "xls" + dlg.Filter = "Excel File|*.xls" + If dlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return + + If Grid1.ExportToExcel(dlg.FileName, True, True) Then + MsgBox("保存为Excel成功：" & dlg.FileName) + Else + MsgBox("保存失败!") + End If + End Sub + + + + + + + + + '2021/10/06 Qizengbiao修改 +#Region "数据查询" + Public Function GetLikeString(ByVal likestr As String) As String + Dim rString As String = "" + Dim ch As Char + For i As Integer = 1 To likestr.Length + ch = Strings.GetChar(likestr, i) + If ch = "%" OrElse ch = "_" OrElse ch = "/" Then + rString &= "/" + End If + rString &= ch + Next + + Return rString + End Function + + Private Sub QueryData_Quick(partNumber As String, partName As String, partDesc As String, hasInhaos As Boolean, hasJohao As Boolean) + Dim strSQL As String = "SELECT `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.物料名称) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.单位) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.单重) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "`, `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.序号) & "`" + strSQL &= " FROM `" & CPartNumber.cst_TABLE_NAME & "`" + + If partNumber.Length > 0 OrElse + partName.Length > 0 OrElse + partDesc.Length > 0 OrElse + hasInhaos = True OrElse + hasJohao = True Then + + strSQL &= " WHERE " + + Dim strSplit() As String + Dim firstLike As Boolean = True + If partNumber.Length > 0 Then + strSplit = Split(partNumber, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + + If partName.Length > 0 Then + strSplit = Split(partName, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.物料名称) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + + If partDesc.Length > 0 Then + strSplit = Split(partDesc, ",") + For i As Integer = 0 To strSplit.Length - 1 + Dim tmp As String = GetLikeString(strSplit(i)) + If String.IsNullOrEmpty(tmp) Then Continue For + + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + + Select Case tmp(tmp.Length - 1)'查看是否以R或Ω结尾 + Case "R"c + strSQL &= "(" + + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= tmp & "%'" + strSQL &= " escape '/'" + + strSQL &= " or " + + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= tmp.Replace("R"c, "Ω"c) & "%'" + strSQL &= " escape '/'" + + strSQL &= ")" + Case "Ω"c + strSQL &= "(" + + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= tmp & "%'" + strSQL &= " escape '/'" + + strSQL &= " or " + + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= tmp.Replace("Ω"c, "R"c) & "%'" + strSQL &= " escape '/'" + + strSQL &= ")" + Case Else + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + End Select + Next + End If + + Dim customStr As String = "" + If hasInhaos Then + customStr &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` = '02'" + End If + + If hasJohao Then + If String.IsNullOrEmpty(customStr) = False Then + customStr &= " OR " + customStr &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` ='01'" + + customStr = $"({customStr})" + Else + customStr &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` ='01'" + End If + End If + + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= customStr + End If + + SQL_Query(COL_RIGHTS.料号管理, strSQL, m_Table) + End Sub + + + +#End Region + Enum SourceGridCols + Sn + 注释 + 使用位置 + 型号 + 用量 + 校验 + 工艺流程 + 料号PN + 物料名称 + 规格描述 + 单位 + 单价 + Max + End Enum + + Private Sub InitSourceGrid() + GrdSourceBom.NewFile() + + GrdSourceBom.Cols = SourceGridCols.Max + GrdSourceBom.Rows = 500 + + GrdSourceBom.AutoRedraw = False + GrdSourceBom.DisplayRowNumber = True + GrdSourceBom.ExtendLastCol = True + + For i = 0 To GrdSourceBom.Cols - 1 + GrdSourceBom.Cell(0, i).Text = [Enum].GetName(GetType(SourceGridCols), i) + Next + + GrdSourceBom.Column(SourceGridCols.规格描述).Width = 200 + GrdSourceBom.Column(SourceGridCols.校验).CellType = FlexCell.CellTypeEnum.CheckBox + + GrdSourceBom.Column(SourceGridCols.工艺流程).CellType = FlexCell.CellTypeEnum.ComboBox + With GrdSourceBom.ComboBox(SourceGridCols.工艺流程) + .DataSource = m_ProcessRoutingTable + .Locked = False + .AutoComplete = True + End With + + GrdSourceBom.Range(0, SourceGridCols.校验, GrdSourceBom.Rows - 1, SourceGridCols.校验).BackColor = Color.LightBlue + + GrdSourceBom.AutoRedraw = True + GrdSourceBom.Refresh() + End Sub + + Enum QueueGridCols + Sn + 料号PN + 物料名称 + 规格描述 + 单位 + 单重 + 供应商ID + 序号 + End Enum + + Enum DestBomGridCols + 序号 + 工艺流程 + 料号PN + 物料名称 + 规格描述 + 单位 + 用量 + 使用位置 + 单价 + 单位总价 + MAX + End Enum + + + Private Sub 导出ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 导出ToolStripMenuItem.Click + Using fileDialog As New SaveFileDialog + fileDialog.Filter = "Excel文档(*.xls)|*.xls" + fileDialog.AddExtension = True + + If String.IsNullOrEmpty(tbBomPN.Text) Then + fileDialog.FileName = tbBomPN.Text + Else + fileDialog.FileName = tbBomPN.Text & "-BOM" + End If + + + If fileDialog.ShowDialog <> DialogResult.OK Then Return + + GrdSourceBom.ExportToExcel(fileDialog.FileName, True, True) + + Dim tmpGrid As New FlexCell.Grid + tmpGrid.DisplayRowNumber = True + tmpGrid.Cols = DestBomGridCols.MAX + 1 + tmpGrid.Rows = GrdSourceBom.Rows + + tmpGrid.BackColorFixed = tmpGrid.BackColor1 + + tmpGrid.Cell(0, DestBomGridCols.序号).Text = "序号" + tmpGrid.Cell(0, DestBomGridCols.工艺流程).Text = "工艺流程" + tmpGrid.Cell(0, DestBomGridCols.料号PN).Text = "料号PN" + tmpGrid.Cell(0, DestBomGridCols.物料名称).Text = "物料名称" + tmpGrid.Cell(0, DestBomGridCols.规格描述).Text = "规格描述" + tmpGrid.Cell(0, DestBomGridCols.单位).Text = "单位" + tmpGrid.Cell(0, DestBomGridCols.用量).Text = "用量" + tmpGrid.Cell(0, DestBomGridCols.使用位置).Text = "使用位置" + tmpGrid.Cell(0, DestBomGridCols.单价).Text = "单价" + tmpGrid.Cell(0, DestBomGridCols.单位总价).Text = "单位总价" + + tmpGrid.Cell(1, DestBomGridCols.序号 + 1).Text = "序号" + tmpGrid.Cell(1, DestBomGridCols.工艺流程 + 1).Text = "工艺流程" + tmpGrid.Cell(1, DestBomGridCols.料号PN + 1).Text = "料号PN" + tmpGrid.Cell(1, DestBomGridCols.物料名称 + 1).Text = "物料名称" + tmpGrid.Cell(1, DestBomGridCols.规格描述 + 1).Text = "规格描述" + tmpGrid.Cell(1, DestBomGridCols.单位 + 1).Text = "单位" + tmpGrid.Cell(1, DestBomGridCols.用量 + 1).Text = "用量" + tmpGrid.Cell(1, DestBomGridCols.使用位置 + 1).Text = "使用位置" + tmpGrid.Cell(1, DestBomGridCols.单价 + 1).Text = "单价" + tmpGrid.Cell(1, DestBomGridCols.单位总价 + 1).Text = "单位总价" + + For i = 2 To tmpGrid.Rows - 1 + If String.IsNullOrEmpty(GrdSourceBom.Cell(i, SourceGridCols.料号PN).Text) Then + tmpGrid.Cell(i, DestBomGridCols.单价 + 1).Text = "Totel:" + + + Dim totel As Double = 0 + For j = 2 To i - 1 + totel += tmpGrid.Cell(j, DestBomGridCols.单位总价 + 1).DoubleValue + Next + + tmpGrid.Cell(i, DestBomGridCols.单位总价 + 1).Text = totel + Continue For + End If + + tmpGrid.Cell(i, DestBomGridCols.序号 + 1).Text = i - 1 + tmpGrid.Cell(i, DestBomGridCols.工艺流程 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.工艺流程).Text + tmpGrid.Cell(i, DestBomGridCols.料号PN + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.料号PN).Text + tmpGrid.Cell(i, DestBomGridCols.物料名称 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.物料名称).Text + tmpGrid.Cell(i, DestBomGridCols.规格描述 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.规格描述).Text + tmpGrid.Cell(i, DestBomGridCols.单位 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.单位).Text + tmpGrid.Cell(i, DestBomGridCols.用量 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.用量).Text + tmpGrid.Cell(i, DestBomGridCols.使用位置 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.使用位置).Text + tmpGrid.Cell(i, DestBomGridCols.单价 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.单价).Text + tmpGrid.Cell(i, DestBomGridCols.单位总价 + 1).Text = GrdSourceBom.Cell(i - 1, SourceGridCols.用量).IntegerValue * GrdSourceBom.Cell(i - 1, SourceGridCols.单价).DoubleValue + Next + + Try + tmpGrid.ExportToExcel(fileDialog.FileName) + MsgBox($"导出BOM至{fileDialog.FileName}完成！") + Catch ex As Exception + MsgBox($"导出BOM至{fileDialog.FileName}失败,{ex.Message}") + End Try + + End Using + End Sub + + Private Function GetPartFootPrintNum(footPrint As String) As String + Dim result As New StringBuilder + Dim findPoint As Boolean = False + Dim findNum As Boolean = False + + If footPrint.Length = 0 Then Return footPrint + For i = footPrint.Length - 1 To 0 Step -1 + Select Case footPrint(i) + Case "0"c, "1"c, "2"c, "3"c, "4"c, "5"c, "6"c, "7"c, "8"c, "9"c + If findNum = False Then findNum = True + result.Insert(0, footPrint(i)) + Case "."c + If findNum = False Then Continue For '未查找到数字则忽略小数点 + If findPoint Then Exit For '已添加小数点则退出搜索 + If findPoint = False Then findPoint = True '变更状态为已添加小数点 + result.Insert(0, footPrint(i)) + Case Else + If findNum = False Then Continue For '未查找到数字则继续寻找数字 + Exit For '已找到数字则退出搜索 + End Select + Next + + If findNum = False Then Return footPrint '未查找到数字则返回原字符串 + + If result(0) = "."c Then result.Remove(0, 1) '小数点开头则移除小数点 + + Return result.ToString + End Function + + + Private Function GetPartFootComment(footPrint As String) As String + If footPrint.Length = 0 Then Return footPrint + + Select Case footPrint(footPrint.Length - 1) + Case "R"c + footPrint &= $",{footPrint.Replace("R"c, "Ω"c)}" + Case "Ω"c + footPrint &= $",{footPrint.Replace("Ω"c, "R"c)}" + End Select + + Return footPrint + End Function + + + Private Sub QueuePart(partDesc As String) + ' If String.IsNullOrWhiteSpace(partDesc) Then Return + + If partDesc.EndsWith(",") Then + partDesc = partDesc.Remove(partDesc.Length - 1) + End If + + QueryData_Quick(tb_PartNumber.Text, tb_Name.Text, partDesc, ckb_Pn_Inhaos.Checked, ckb_PnJohao.Checked) + + '初始化表格 + GrdQueueResult.DisplayRowNumber = True + GrdQueueResult.AllowUserSort = True + GrdQueueResult.DisplayFocusRect = False + GrdQueueResult.ExtendLastCol = True + GrdQueueResult.DisplayRowArrow = True + GrdQueueResult.BoldFixedCell = False + GrdQueueResult.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '将查询结果与表格绑定 + GrdQueueResult.SetDataBinding(m_Table, "", True, 1) + + GrdQueueResult.Column(QueueGridCols.规格描述).Width = 360 + End Sub + + Private Sub 查询ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 查询ToolStripMenuItem.Click + If GrdSourceBom.ActiveCell Is Nothing Then Return + Dim row As Integer = GrdSourceBom.ActiveCell.Row + + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + + '从数据库查询指定内容的物料信息 + Dim partComment As String = $"{GrdSourceBom.Cell(row, SourceGridCols.注释).Text.Trim}" + + Dim partFootPrint As String = $"{GrdSourceBom.Cell(row, SourceGridCols.型号).Text}" + partFootPrint = GetPartFootPrintNum(partFootPrint) + + Dim partDesc As String = partComment + + If ChkHasPartType.Checked Then + If partDesc.Length = 0 Then + partDesc = partFootPrint + Else + If partFootPrint.Length > 0 Then partDesc &= $",{partFootPrint}" + End If + End If + + tb_Desc.Text = partDesc + + QueuePart(partDesc) + End Sub + + Private Sub GrdSourceBom_DoubleClick(Sender As Object, e As EventArgs) Handles GrdSourceBom.DoubleClick + If GrdSourceBom.ActiveCell Is Nothing Then Return + Dim row As Integer = GrdSourceBom.ActiveCell.Row + + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + + '从数据库查询指定内容的物料信息 + Dim partComment As String = $"{GrdSourceBom.Cell(row, SourceGridCols.注释).Text.Trim.Replace(" "c, ","c).Replace("\", ",").Replace("/", ",")}" + + Dim partFootPrint As String = $"{GrdSourceBom.Cell(row, SourceGridCols.型号).Text}" + partFootPrint = GetPartFootPrintNum(partFootPrint) + + Dim partDesc As String = partComment + + If ChkHasPartType.Checked Then + If partDesc.Length = 0 Then + partDesc = partFootPrint + Else + If partFootPrint.Length > 0 Then partDesc &= $",{partFootPrint}" + End If + End If + + tb_Desc.Text = partDesc + + QueuePart(partDesc) + End Sub + + Private Sub bt_QueryQuick_Click(sender As Object, e As EventArgs) Handles bt_QueryQuick.Click + QueuePart(tb_Desc.Text) + End Sub + + Private Sub GrdQueueResult_DoubleClick(Sender As Object, e As EventArgs) Handles GrdQueueResult.DoubleClick + If GrdSourceBom.ActiveCell Is Nothing Then Return + + If GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.校验).BooleanValue Then Return + + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.校验).Text = "" + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.工艺流程).Text = "" + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.料号PN).Text = GrdQueueResult.Cell(GrdQueueResult.ActiveCell.Row, QueueGridCols.料号PN).Text + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.物料名称).Text = GrdQueueResult.Cell(GrdQueueResult.ActiveCell.Row, QueueGridCols.物料名称).Text + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.规格描述).Text = GrdQueueResult.Cell(GrdQueueResult.ActiveCell.Row, QueueGridCols.规格描述).Text + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.单位).Text = GrdQueueResult.Cell(GrdQueueResult.ActiveCell.Row, QueueGridCols.单位).Text + GrdSourceBom.Cell(GrdSourceBom.ActiveCell.Row, SourceGridCols.单价).Text = GrdQueueResult.Cell(GrdQueueResult.ActiveCell.Row, QueueGridCols.单重).Text + End Sub + + Private Sub GrdSourceBom_CellChange(Sender As Object, e As FlexCell.Grid.CellChangeEventArgs) Handles GrdSourceBom.CellChange + If e.Col = SourceGridCols.校验 Then + If GrdSourceBom.Cell(e.Row, e.Col).BooleanValue = True Then + GrdSourceBom.Range(e.Row, 1, e.Row, GrdSourceBom.Cols - 1).BackColor = Color.LightGreen + + GrdSourceBom.Range(e.Row, 1, e.Row, SourceGridCols.校验 - 1).Locked = True + GrdSourceBom.Range(e.Row, SourceGridCols.校验 + 1, e.Row, GrdSourceBom.Cols - 1).Locked = True + Else + GrdSourceBom.Range(e.Row, 1, e.Row, GrdSourceBom.Cols - 1).BackColor = GrdSourceBom.BackColor1 + GrdSourceBom.Cell(e.Row, e.Col).BackColor = Color.LightBlue + + GrdSourceBom.Range(e.Row, 1, e.Row, SourceGridCols.校验 - 1).Locked = False + GrdSourceBom.Range(e.Row, SourceGridCols.校验 + 1, e.Row, GrdSourceBom.Cols - 1).Locked = False + End If + End If + End Sub + + Private Sub 保存至数据库ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 保存至数据库ToolStripMenuItem.Click + If tbBomPN.Text.Length = 0 Then + MsgBox("未指定当前BOM料号!") + Return + End If + + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(m_CurrentBomPN, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return + End If + + '检测内容中的PN字段有效性 + If CheckPNValid() = False Then + MsgBox("输入信息存在错误，不能进行保存!") + Return + End If + + '创建料号表 + If SaveBomContext(tbBomPN.Text) = False Then + MsgBox("保存料表失败") + Return + End If + + '保存临时表内容至XMl文件 + Try + Dim dirPath As String = Application.StartupPath & "\" & "Context" + IO.Directory.CreateDirectory(dirPath) + GrdSourceBom.ExportToXML($"{dirPath}\{m_CurrentBomPN}_context_{Now:yyyyMMdd_HHmmss}.xml") + Catch ex As Exception + + End Try + + MsgBox("保存料表:" & tbBomPN.Text & "成功") + End Sub + + Private Sub 保存至数据库BOM表ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 保存至数据库BOM表ToolStripMenuItem.Click + If tbBomPN.Text.Length = 0 Then + MsgBox("未指定当前BOM料号!") + Return + End If + + '检查输入料号是否有效 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(m_CurrentBomPN, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + MsgBox("输入料号不存在!") + Return + End If + Else + MsgBox("无法查询输入料号，请检查网络连接!") + Return + End If + + '检测内容中的PN字段有效性 + If CheckPNValid() = False Then + MsgBox("输入信息存在错误，不能进行保存!") + Return + End If + + '创建料号表 + If SaveBom2(tbBomPN.Text) = False Then + MsgBox("保存料表失败") + Return + End If + + MsgBox("保存料表:" & tbBomPN.Text & "成功") + End Sub + + Private Sub 更新当前物料ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 更新当前物料ToolStripMenuItem.Click + If GrdSourceBom.ActiveCell Is Nothing Then Return + + Dim row As Integer = GrdSourceBom.ActiveCell.Row + If row = 0 Then Return + + Dim pn As String + '清空内容 + GrdSourceBom.Cell(row, SourceGridCols.物料名称).Text = "" + GrdSourceBom.Cell(row, SourceGridCols.规格描述).Text = "" + GrdSourceBom.Cell(row, SourceGridCols.单位).Text = "" + GrdSourceBom.Cell(row, SourceGridCols.单价).Text = "" + + '查询指定pn的信息 + pn = GrdSourceBom.Cell(row, SourceGridCols.料号PN).Text + If String.IsNullOrEmpty(pn) Then Return + + Dim pninfo As New PnInfo With {.PN = pn} + + If GetPnInfoByName(pn, pninfo) Then + GrdSourceBom.Cell(row, SourceGridCols.物料名称).Text = pninfo.物料名称 + GrdSourceBom.Cell(row, SourceGridCols.规格描述).Text = pninfo.规格描述 + GrdSourceBom.Cell(row, SourceGridCols.单位).Text = pninfo.单位 + GrdSourceBom.Cell(row, SourceGridCols.单价).Text = pninfo.单重 + End If + End Sub + + Private Sub 更新物料信息ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 更新物料信息ToolStripMenuItem.Click + GetAllPnInfo() + End Sub + + Private Sub GetAllPnInfo() + Dim pn As String + For row = 1 To GrdSourceBom.Rows - 1 + '注释为空后面则认为为无效行 + If String.IsNullOrEmpty(GrdSourceBom.Cell(row, SourceGridCols.注释).Text) Then + If String.IsNullOrEmpty(GrdSourceBom.Cell(row, SourceGridCols.料号PN).Text) Then + Continue For + End If + End If + + '清空内容 + GrdSourceBom.Cell(row, SourceGridCols.物料名称).Text = "" + GrdSourceBom.Cell(row, SourceGridCols.规格描述).Text = "" + GrdSourceBom.Cell(row, SourceGridCols.单位).Text = "" + GrdSourceBom.Cell(row, SourceGridCols.单价).Text = "" + + '查询指定pn的信息 + pn = GrdSourceBom.Cell(row, SourceGridCols.料号PN).Text + If String.IsNullOrEmpty(pn) Then Continue For + + Dim pninfo As New PnInfo With {.PN = pn} + + If GetPnInfoByName(pn, pninfo) Then + GrdSourceBom.Cell(row, SourceGridCols.物料名称).Text = pninfo.物料名称 + GrdSourceBom.Cell(row, SourceGridCols.规格描述).Text = pninfo.规格描述 + GrdSourceBom.Cell(row, SourceGridCols.单位).Text = pninfo.单位 + GrdSourceBom.Cell(row, SourceGridCols.单价).Text = pninfo.单重 + End If + Next + End Sub + + + Private Function GetPnInfoByName(pn As String, ByRef pnInfo As PnInfo) As Boolean + Return m_PartNumber.QueryItem(pn, pnInfo.物料名称, pnInfo.规格描述, pnInfo.单位, pnInfo.单重, pnInfo.供应商ID) = ERROR_CODE.SUCCESS + End Function + + Public Class PnInfo + Public PN As String = "" + + Public 物料名称 As String = "" + Public 规格描述 As String = "" + Public 单位 As String = "" + Public 单重 As Double = 0 + Public 图片(0) As Byte + Public 供应商ID As String = "" + End Class + + Private Sub 插入行ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 插入行ToolStripMenuItem.Click + If GrdSourceBom.Selection Is Nothing Then + GrdSourceBom.AddItem("") + Else + GrdSourceBom.InsertRow(GrdSourceBom.Selection.FirstRow, 1) + End If + + End Sub + + Private Sub 删除行ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 删除行ToolStripMenuItem.Click + If MsgBox("是否删除选中行?", MsgBoxStyle.OkCancel) <> MsgBoxResult.Ok Then Return + If GrdSourceBom.Selection IsNot Nothing Then + GrdSourceBom.Selection.DeleteByRow() + End If + End Sub + + Private Sub 清空表格ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 清空表格ToolStripMenuItem.Click + If MsgBox("是否清空表格?", MsgBoxStyle.OkCancel) <> MsgBoxResult.Ok Then Return + + InitSourceGrid() + End Sub + + Private Sub 合并相同料号ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 合并相同料号ToolStripMenuItem.Click + Dim snList As New Dictionary(Of String, Integer) + Dim deleteRows As New List(Of Integer) + ' 查询所有料号 + Dim pn As String + For row = 1 To GrdSourceBom.Rows - 1 + pn = GrdSourceBom.Cell(row, SourceGridCols.料号PN).Text + If String.IsNullOrEmpty(pn) Then Continue For + + If snList.ContainsKey(pn) Then + deleteRows.Add(row) + + GrdSourceBom.Cell(snList(pn), SourceGridCols.用量).Text = GrdSourceBom.Cell(snList(pn), SourceGridCols.用量).IntegerValue + GrdSourceBom.Cell(row, SourceGridCols.用量).IntegerValue + + + GrdSourceBom.Cell(snList(pn), SourceGridCols.使用位置).Text = GrdSourceBom.Cell(snList(pn), SourceGridCols.使用位置).Text & "," & GrdSourceBom.Cell(row, SourceGridCols.使用位置).Text + Else + snList.Add(pn, row) + End If + Next + + For row = 0 To deleteRows.Count - 1 + GrdSourceBom.Row(deleteRows(row) - row).Delete() + Next + End Sub + +End Class \ No newline at end of file diff --git a/WT-DMS/form_Material.Designer.vb b/WT-DMS/form_Material.Designer.vb new file mode 100644 index 0000000..4f59ee0 --- /dev/null +++ b/WT-DMS/form_Material.Designer.vb @@ -0,0 +1,388 @@ + _ +Partial Class form_Material + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.lstb_Log = New System.Windows.Forms.ListBox() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.bt_Clear = New System.Windows.Forms.Button() + Me.bt_AddStoreLoc = New System.Windows.Forms.Button() + Me.num_Count = New System.Windows.Forms.NumericUpDown() + Me.Label11 = New System.Windows.Forms.Label() + Me.bt_Query = New System.Windows.Forms.Button() + Me.bt_Save = New System.Windows.Forms.Button() + Me.combo_StoreName = New System.Windows.Forms.ComboBox() + Me.combo_StoreLoc = New System.Windows.Forms.ComboBox() + Me.combo_Unit = New System.Windows.Forms.ComboBox() + Me.tb_UseInfo = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label6 = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.tb_OderNumber = New System.Windows.Forms.TextBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.tb_PartNumber = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.GroupBox2 = New System.Windows.Forms.GroupBox() + Me.tb_PartNumberInfo = New System.Windows.Forms.TextBox() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.chk_Preview = New System.Windows.Forms.CheckBox() + Me.lbl_QueryInfo = New System.Windows.Forms.Label() + Me.GroupBox1.SuspendLayout() + CType(Me.num_Count, System.ComponentModel.ISupportInitialize).BeginInit() + Me.GroupBox2.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'lstb_Log + ' + Me.lstb_Log.FormattingEnabled = True + Me.lstb_Log.ItemHeight = 12 + Me.lstb_Log.Location = New System.Drawing.Point(12, 356) + Me.lstb_Log.Name = "lstb_Log" + Me.lstb_Log.Size = New System.Drawing.Size(444, 148) + Me.lstb_Log.TabIndex = 1 + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.bt_Clear) + Me.GroupBox1.Controls.Add(Me.bt_AddStoreLoc) + Me.GroupBox1.Controls.Add(Me.num_Count) + Me.GroupBox1.Controls.Add(Me.Label11) + Me.GroupBox1.Controls.Add(Me.bt_Query) + Me.GroupBox1.Controls.Add(Me.bt_Save) + Me.GroupBox1.Controls.Add(Me.combo_StoreName) + Me.GroupBox1.Controls.Add(Me.combo_StoreLoc) + Me.GroupBox1.Controls.Add(Me.combo_Unit) + Me.GroupBox1.Controls.Add(Me.tb_UseInfo) + Me.GroupBox1.Controls.Add(Me.Label3) + Me.GroupBox1.Controls.Add(Me.Label7) + Me.GroupBox1.Controls.Add(Me.Label6) + Me.GroupBox1.Controls.Add(Me.Label5) + Me.GroupBox1.Controls.Add(Me.Label4) + Me.GroupBox1.Controls.Add(Me.tb_OderNumber) + Me.GroupBox1.Controls.Add(Me.Label2) + Me.GroupBox1.Controls.Add(Me.tb_PartNumber) + Me.GroupBox1.Controls.Add(Me.Label1) + Me.GroupBox1.Location = New System.Drawing.Point(12, 12) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(444, 314) + Me.GroupBox1.TabIndex = 0 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "物料属性" + ' + 'bt_Clear + ' + Me.bt_Clear.Location = New System.Drawing.Point(347, 70) + Me.bt_Clear.Name = "bt_Clear" + Me.bt_Clear.Size = New System.Drawing.Size(80, 71) + Me.bt_Clear.TabIndex = 8 + Me.bt_Clear.Text = "新建" + Me.bt_Clear.UseVisualStyleBackColor = True + ' + 'bt_AddStoreLoc + ' + Me.bt_AddStoreLoc.Location = New System.Drawing.Point(276, 182) + Me.bt_AddStoreLoc.Name = "bt_AddStoreLoc" + Me.bt_AddStoreLoc.Size = New System.Drawing.Size(56, 23) + Me.bt_AddStoreLoc.TabIndex = 9 + Me.bt_AddStoreLoc.Text = "修改" + Me.bt_AddStoreLoc.UseVisualStyleBackColor = True + ' + 'num_Count + ' + Me.num_Count.Location = New System.Drawing.Point(90, 94) + Me.num_Count.Maximum = New Decimal(New Integer() {1215752191, 23, 0, 0}) + Me.num_Count.Name = "num_Count" + Me.num_Count.Size = New System.Drawing.Size(242, 21) + Me.num_Count.TabIndex = 2 + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.ForeColor = System.Drawing.Color.Red + Me.Label11.Location = New System.Drawing.Point(88, 10) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(263, 24) + Me.Label11.TabIndex = 6 + Me.Label11.Text = "提示：带*字段必须填写" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "如果不能输入中文，请单击右键，选择""打开IME""" + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(347, 36) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(80, 26) + Me.bt_Query.TabIndex = 7 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'bt_Save + ' + Me.bt_Save.BackColor = System.Drawing.Color.MistyRose + Me.bt_Save.Font = New System.Drawing.Font("楷体", 21.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.bt_Save.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer)) + Me.bt_Save.Location = New System.Drawing.Point(347, 156) + Me.bt_Save.Name = "bt_Save" + Me.bt_Save.Size = New System.Drawing.Size(80, 140) + Me.bt_Save.TabIndex = 9 + Me.bt_Save.Text = "入库" + Me.bt_Save.UseVisualStyleBackColor = False + ' + 'combo_StoreName + ' + Me.combo_StoreName.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_StoreName.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_StoreName.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_StoreName.FormattingEnabled = True + Me.combo_StoreName.Items.AddRange(New Object() {"pcs", "个", "台", "条", "颗", "盒", "包", "箱"}) + Me.combo_StoreName.Location = New System.Drawing.Point(90, 156) + Me.combo_StoreName.MaxLength = 20 + Me.combo_StoreName.Name = "combo_StoreName" + Me.combo_StoreName.Size = New System.Drawing.Size(180, 20) + Me.combo_StoreName.TabIndex = 4 + ' + 'combo_StoreLoc + ' + Me.combo_StoreLoc.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_StoreLoc.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_StoreLoc.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_StoreLoc.FormattingEnabled = True + Me.combo_StoreLoc.Location = New System.Drawing.Point(90, 183) + Me.combo_StoreLoc.MaxLength = 20 + Me.combo_StoreLoc.Name = "combo_StoreLoc" + Me.combo_StoreLoc.Size = New System.Drawing.Size(180, 20) + Me.combo_StoreLoc.TabIndex = 5 + ' + 'combo_Unit + ' + Me.combo_Unit.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_Unit.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_Unit.FormattingEnabled = True + Me.combo_Unit.ImeMode = System.Windows.Forms.ImeMode.Off + Me.combo_Unit.Items.AddRange(New Object() {"pcs", "个", "台", "条", "颗", "盒", "包", "箱"}) + Me.combo_Unit.Location = New System.Drawing.Point(90, 121) + Me.combo_Unit.MaxLength = 20 + Me.combo_Unit.Name = "combo_Unit" + Me.combo_Unit.Size = New System.Drawing.Size(242, 20) + Me.combo_Unit.TabIndex = 3 + ' + 'tb_UseInfo + ' + Me.tb_UseInfo.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest + Me.tb_UseInfo.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource + Me.tb_UseInfo.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_UseInfo.Location = New System.Drawing.Point(90, 209) + Me.tb_UseInfo.MaxLength = 200 + Me.tb_UseInfo.Multiline = True + Me.tb_UseInfo.Name = "tb_UseInfo" + Me.tb_UseInfo.Size = New System.Drawing.Size(242, 87) + Me.tb_UseInfo.TabIndex = 6 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(37, 186) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(47, 12) + Me.Label3.TabIndex = 0 + Me.Label3.Text = "库位(*)" + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(55, 212) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(29, 12) + Me.Label7.TabIndex = 0 + Me.Label7.Text = "用途" + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(37, 159) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(47, 12) + Me.Label6.TabIndex = 0 + Me.Label6.Text = "仓库(*)" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(37, 96) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(47, 12) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "数量(*)" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(55, 124) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(29, 12) + Me.Label4.TabIndex = 0 + Me.Label4.Text = "单位" + ' + 'tb_OderNumber + ' + Me.tb_OderNumber.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest + Me.tb_OderNumber.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource + Me.tb_OderNumber.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_OderNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_OderNumber.Location = New System.Drawing.Point(90, 67) + Me.tb_OderNumber.Name = "tb_OderNumber" + Me.tb_OderNumber.Size = New System.Drawing.Size(242, 21) + Me.tb_OderNumber.TabIndex = 1 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(43, 70) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(41, 12) + Me.Label2.TabIndex = 0 + Me.Label2.Text = "订单号" + ' + 'tb_PartNumber + ' + Me.tb_PartNumber.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest + Me.tb_PartNumber.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource + Me.tb_PartNumber.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_PartNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PartNumber.Location = New System.Drawing.Point(90, 40) + Me.tb_PartNumber.MaxLength = 32 + Me.tb_PartNumber.Name = "tb_PartNumber" + Me.tb_PartNumber.Size = New System.Drawing.Size(242, 21) + Me.tb_PartNumber.TabIndex = 0 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(37, 43) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(47, 12) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "料号(*)" + ' + 'GroupBox2 + ' + Me.GroupBox2.Controls.Add(Me.tb_PartNumberInfo) + Me.GroupBox2.Controls.Add(Me.PictureBox1) + Me.GroupBox2.Controls.Add(Me.chk_Preview) + Me.GroupBox2.Location = New System.Drawing.Point(462, 12) + Me.GroupBox2.Name = "GroupBox2" + Me.GroupBox2.Size = New System.Drawing.Size(648, 492) + Me.GroupBox2.TabIndex = 11 + Me.GroupBox2.TabStop = False + Me.GroupBox2.Text = "料号信息" + ' + 'tb_PartNumberInfo + ' + Me.tb_PartNumberInfo.Font = New System.Drawing.Font("宋体", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.tb_PartNumberInfo.Location = New System.Drawing.Point(7, 25) + Me.tb_PartNumberInfo.Multiline = True + Me.tb_PartNumberInfo.Name = "tb_PartNumberInfo" + Me.tb_PartNumberInfo.ReadOnly = True + Me.tb_PartNumberInfo.Size = New System.Drawing.Size(204, 461) + Me.tb_PartNumberInfo.TabIndex = 7 + ' + 'PictureBox1 + ' + Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox1.Location = New System.Drawing.Point(217, 49) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(425, 437) + Me.PictureBox1.TabIndex = 2 + Me.PictureBox1.TabStop = False + ' + 'chk_Preview + ' + Me.chk_Preview.AutoSize = True + Me.chk_Preview.Checked = Global.WT_DMS.My.MySettings.Default.CHK_PREVIEW + Me.chk_Preview.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_PREVIEW", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chk_Preview.Location = New System.Drawing.Point(217, 25) + Me.chk_Preview.Name = "chk_Preview" + Me.chk_Preview.Size = New System.Drawing.Size(96, 16) + Me.chk_Preview.TabIndex = 0 + Me.chk_Preview.Text = "物料图片预览" + Me.chk_Preview.UseVisualStyleBackColor = True + ' + 'lbl_QueryInfo + ' + Me.lbl_QueryInfo.AutoSize = True + Me.lbl_QueryInfo.ForeColor = System.Drawing.Color.Blue + Me.lbl_QueryInfo.Location = New System.Drawing.Point(16, 338) + Me.lbl_QueryInfo.Name = "lbl_QueryInfo" + Me.lbl_QueryInfo.Size = New System.Drawing.Size(0, 12) + Me.lbl_QueryInfo.TabIndex = 11 + ' + 'form_Material + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1124, 522) + Me.Controls.Add(Me.lbl_QueryInfo) + Me.Controls.Add(Me.GroupBox2) + Me.Controls.Add(Me.lstb_Log) + Me.Controls.Add(Me.GroupBox1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.Name = "form_Material" + Me.Text = "物料入库" + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + CType(Me.num_Count, System.ComponentModel.ISupportInitialize).EndInit() + Me.GroupBox2.ResumeLayout(False) + Me.GroupBox2.PerformLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents lstb_Log As System.Windows.Forms.ListBox + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents num_Count As System.Windows.Forms.NumericUpDown + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents bt_Save As System.Windows.Forms.Button + Friend WithEvents combo_Unit As System.Windows.Forms.ComboBox + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents tb_UseInfo As System.Windows.Forms.TextBox + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents tb_OderNumber As System.Windows.Forms.TextBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents tb_PartNumber As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents chk_Preview As System.Windows.Forms.CheckBox + Friend WithEvents combo_StoreLoc As System.Windows.Forms.ComboBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents bt_AddStoreLoc As System.Windows.Forms.Button + Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox + Friend WithEvents tb_PartNumberInfo As System.Windows.Forms.TextBox + Friend WithEvents combo_StoreName As System.Windows.Forms.ComboBox + Friend WithEvents bt_Clear As System.Windows.Forms.Button + Friend WithEvents lbl_QueryInfo As System.Windows.Forms.Label +End Class diff --git a/WT-DMS/form_Material.resx b/WT-DMS/form_Material.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/form_Material.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/form_Material.vb b/WT-DMS/form_Material.vb new file mode 100644 index 0000000..03530da --- /dev/null +++ b/WT-DMS/form_Material.vb @@ -0,0 +1,369 @@ +Public Class form_Material + Dim m_Table As New System.Data.DataTable + Dim m_Material As New CMaterialInOut + Dim m_PartNumber As New CPartNumber + Dim 库位表列表 As New ArrayList + Dim 库位表名 As String = "" + Dim m_InitOver As Boolean = False + + Dim m_RecentList_PN As New System.Windows.Forms.AutoCompleteStringCollection + Dim m_RecentList_OrderList As New System.Windows.Forms.AutoCompleteStringCollection + Dim m_RecentList_UseInfo As New System.Windows.Forms.AutoCompleteStringCollection + + Public Property OutStore() As Boolean + Get + Return m_Material.OutStore + End Get + Set(ByVal value As Boolean) + m_Material.OutStore = value + End Set + End Property + + Private Function GetStoreList() As Boolean + Dim m_Store As New CStore + + combo_StoreName.Items.Clear() + 库位表列表.Clear() + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If m_Store.QueryAll(m_Table) = ERROR_CODE.SUCCESS Then + For i As Integer = 0 To m_Table.Rows.Count - 1 + combo_StoreName.Items.Add(m_Table.Rows(i).Item(CStore.COLS.仓库名称)) + 库位表列表.Add(m_Table.Rows(i).Item(CStore.COLS.仓库库位表)) + Next + Return True + End If + + Return False + End Function + + Private Function GetStoreLocationList() As Boolean + Dim m_StoreLocation As New CStoreLocation() + combo_StoreLoc.Items.Clear() + + m_StoreLocation.TABLE_NAME = 库位表名 + m_Table.Rows.Clear() + m_Table.Columns.Clear() + combo_StoreLoc.Items.Add("") + If m_StoreLocation.QueryAll(m_Table) = ERROR_CODE.SUCCESS Then + For i As Integer = 0 To m_Table.Rows.Count - 1 + combo_StoreLoc.Items.Add(m_Table.Rows(i).Item(CStoreLocation.COLS.库位)) + Next + + Return True + End If + + Return False + End Function + + '获取料号信息 + Private Function GetPartNumberInformation(ByVal strPartNumber As String) As Boolean + Dim 物料名称 As String = "" + Dim 规格描述 As String = "" + Dim 单位 As String = "" + Dim 单重 As Double = 0 + Dim 图片(0) As Byte + Dim 供应商ID As String = "" + + Dim strInfo As String = "" + tb_PartNumberInfo.Text = "" + Dim result As Boolean = False + If chk_Preview.Checked = True Then + If m_PartNumber.QueryItem(tb_PartNumber.Text, 物料名称, 规格描述, 单位, 单重, 图片, 供应商ID) = ERROR_CODE.SUCCESS Then + strInfo = "物料名称: " & 物料名称 & vbNewLine + strInfo &= "规格描述: " & 规格描述 & vbNewLine + strInfo &= "单位: " & 单位 & vbNewLine + strInfo &= "单重: " & 单重 & vbNewLine + strInfo &= "供应商ID: " & 供应商ID & vbNewLine + + PictureBox1.BackgroundImage = GetImageFromBytes(图片) + tb_PartNumberInfo.Text = strInfo + result = True + End If + Else + If m_PartNumber.QueryItem(tb_PartNumber.Text, 物料名称, 规格描述, 单位, 单重, 供应商ID) = ERROR_CODE.SUCCESS Then + strInfo = "物料名称: " & 物料名称 & vbNewLine + strInfo &= "规格描述: " & 规格描述 & vbNewLine + strInfo &= "单位: " & 单位 & vbNewLine + strInfo &= "单重: " & 单重 & vbNewLine + strInfo &= "供应商ID: " & 供应商ID & vbNewLine + + PictureBox1.BackgroundImage = Nothing + tb_PartNumberInfo.Text = strInfo + result = True + End If + End If + + If result = True Then + tb_PartNumber.BackColor = Color.White + Else + tb_PartNumber.BackColor = Color.Red + End If + + Return result + End Function + + Private Sub AddLog(ByVal text As String) + Dim index As Integer = lstb_Log.Items.Add(Now.ToString & ":" & text) + lstb_Log.SelectedIndex = index + End Sub + + Private Sub form_Material_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed + My.Settings.Save() + CGirdInfo.SaveRecentList("Recent_PN", m_RecentList_PN) + CGirdInfo.SaveRecentList("Recent_OL", m_RecentList_OrderList) + CGirdInfo.SaveRecentList("Recent_UI", m_RecentList_UseInfo) + End Sub + + Private Sub form_Material_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + CGirdInfo.LoadRecentList("Recent_PN", m_RecentList_PN) + CGirdInfo.LoadRecentList("Recent_OL", m_RecentList_OrderList) + CGirdInfo.LoadRecentList("Recent_UI", m_RecentList_UseInfo) + tb_PartNumber.AutoCompleteCustomSource = m_RecentList_PN + tb_OderNumber.AutoCompleteCustomSource = m_RecentList_OrderList + tb_UseInfo.AutoCompleteCustomSource = m_RecentList_UseInfo + + If CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.WRITE) = False Then + bt_Save.Enabled = False + End If + If CBool(Current_Rights(COL_RIGHTS.原料库存管理) And RIGHTS.READ) = False Then + bt_Query.Enabled = False + End If + + If CBool(Current_Rights(COL_RIGHTS.库位管理) And RIGHTS.WRITE) = False Then + bt_AddStoreLoc.Enabled = False + End If + + My.Settings.Reload() + + GetStoreList() + + Me.Left = My.Settings.FORM_MATERIAL_X + Me.Top = My.Settings.FORM_MATERIAL_Y + + m_InitOver = True + + If Microsoft.VisualBasic.Right(Me.Text, 4) = "物料出库" Then + bt_Save.ForeColor = Color.Red + bt_Save.Text = "出库" + ElseIf Microsoft.VisualBasic.Right(Me.Text, 4) = "物料入库" Then + bt_Save.ForeColor = Color.Blue + bt_Save.Text = "入库" + End If + End Sub + + Private Sub StoreLocUpdated() + '重新载入库位列表 + If GetStoreLocationList() = False Then + MsgBox("载入库位列表失败!") + End If + End Sub + + Private Sub bt_AddStoreLoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_AddStoreLoc.Click + If 库位表名 Is Nothing OrElse 库位表名.Length = 0 Then + MsgBox("未选择仓库") + Return + End If + + Dim pForm As New form_StoreLocManage(库位表名) + pForm.MdiParent = MainForm + AddHandler pForm.StoreLocUpdated, AddressOf StoreLocUpdated + pForm.Show() + End Sub + + Private Function CheckInputValid() As Boolean + Dim valid As Boolean = True + + '料号 + If tb_PartNumber.Text.Length <= 0 Then + valid = False + End If + If tb_PartNumber.Text.Length > SEC_LENGTH.料号PN Then + valid = False + End If + + If valid = True Then + tb_PartNumber.BackColor = Color.White + Else + tb_PartNumber.BackColor = Color.Red + End If + + '订单号 + + '数量 + If num_Count.Value > 0 Then + num_Count.BackColor = Color.White + Else + num_Count.BackColor = Color.Red + valid = False + End If + + '仓库 + If combo_StoreName.Text.Length > 0 Then + combo_StoreName.BackColor = Color.White + Else + combo_StoreName.BackColor = Color.Red + valid = False + End If + + '库位 + If combo_StoreLoc.Text.Length > 0 Then + combo_StoreLoc.BackColor = Color.White + Else + combo_StoreLoc.BackColor = Color.Red + valid = False + End If + + Return valid + End Function + + Private Sub bt_Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Save.Click + If tb_PartNumber.Text.Length > 0 Then + m_RecentList_PN.Add(tb_PartNumber.Text) + End If + If tb_OderNumber.Text.Length > 0 Then + m_RecentList_OrderList.Add(tb_OderNumber.Text) + End If + If tb_UseInfo.Text.Length > 0 Then + m_RecentList_UseInfo.Add(tb_UseInfo.Text) + End If + + If m_RecentList_PN.Count > 10 Then + m_RecentList_PN.RemoveAt(0) + End If + If m_RecentList_OrderList.Count > 10 Then + m_RecentList_OrderList.RemoveAt(0) + End If + If m_RecentList_UseInfo.Count > 10 Then + m_RecentList_UseInfo.RemoveAt(0) + End If + + lbl_QueryInfo.Text = "" + + '首先检查料号信息完整性 + If CheckInputValid() = False Then + MsgBox("物料属性存在错误！请见红色背景提示") + Return + End If + + '检测料号唯一性 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(tb_PartNumber.Text, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + tb_PartNumber.BackColor = Color.Red + MsgBox("当前料号不存在: " & tb_PartNumber.Text) + Return + End If + Else + MsgBox("访问数据库失败: 请检查网络连接或联系管理员!") + Return + End If + '================================================================================================= + '检查物料的当前仓库库位的库存量是否出库后小于0 + + Dim numCount As Integer = num_Count.Value + Dim m_Sum As Integer = m_PartNumber.GetStockSum(combo_StoreName.Text, combo_StoreLoc.Text, isExist) + If m_Material.OutStore Then + If m_Sum - numCount < 0 Then + MsgBox("当前库位库存量不足，出库失败！！") + Return + Else + m_Sum -= numCount + End If + Else + m_Sum += numCount + End If + '================================================================================================= + + '保存物料 + 'Dim m_date As Date = Now + 'Dim result As ERROR_CODE = m_Material.AddItem(m_Material.OutStore, + ' tb_PartNumber.Text, + ' tb_OderNumber.Text, + ' m_date.ToShortDateString, + ' m_date.ToShortTimeString, + ' num_Count.Value, + ' Current_UserName, + ' combo_StoreName.Text, + ' combo_StoreLoc.Text, + ' tb_UseInfo.Text) + + '================================================================================================= + '添加出入库内容至原料库存表 + Dim m_date As Date = Now + Dim result As ERROR_CODE = m_Material.AddItem(m_Material.OutStore, + tb_PartNumber.Text, + tb_OderNumber.Text, + m_date.ToShortDateString, + m_date.ToShortTimeString, + numCount, + Current_UserName, + combo_StoreName.Text, + combo_StoreLoc.Text, + tb_UseInfo.Text, + m_Sum + ) + '================================================================================================= + If result = ERROR_CODE.SUCCESS Then + Dim Count As Integer + Dim minIndex As Integer + Dim maxIndex As Integer + result = m_Material.QueryInformation(Count, minIndex, maxIndex) + + If result = ERROR_CODE.SUCCESS Then + lbl_QueryInfo.Text = "总条数: " & Count & ", 最小序号: " & minIndex & ", 最大序号: " & maxIndex + AddLog("成功添加: " & maxIndex & "，" & + IIf(m_Material.OutStore, "出库", "入库") & "," & + tb_PartNumber.Text & "," & + tb_OderNumber.Text & "," & + num_Count.Value & "," & + combo_StoreName.Text & "," & + combo_StoreLoc.Text & "," & + tb_UseInfo.Text) + Else + MsgBox("保存完成,查询数据库信息失败!") + End If + ElseIf result = ERROR_CODE.NORIGHT Then + MsgBox("保存失败： ""无访问权限!""") + Else + MsgBox("保存失败: 请检查网络连接或联系管理员!") + End If + End Sub + + Private Sub combo_StoreName_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles combo_StoreName.SelectedIndexChanged + If combo_StoreName.SelectedIndex >= 0 Then + 库位表名 = 库位表列表.Item(combo_StoreName.SelectedIndex) + Else + 库位表名 = "" + End If + + StoreLocUpdated() + End Sub + + Private Sub bt_Query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Query.Click + If tb_PartNumber.Text.Length >= 0 Then + GetPartNumberInformation(tb_PartNumber.Text) + End If + End Sub + + Private Sub bt_Clear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Clear.Click + tb_PartNumber.Text = "" + tb_OderNumber.Text = "" + num_Count.Value = 0 + combo_Unit.Text = "" + combo_StoreLoc.Text = "" + tb_UseInfo.Text = "" + tb_PartNumberInfo.Text = "" + PictureBox1.BackgroundImage = Nothing + End Sub + + Private Sub form_Material_LocationChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LocationChanged + If m_InitOver = True Then + My.Settings.FORM_MATERIAL_X = Me.Left + My.Settings.FORM_MATERIAL_Y = Me.Top + My.Settings.Save() + End If + End Sub + +End Class \ No newline at end of file diff --git a/WT-DMS/form_PartNumber.Designer.vb b/WT-DMS/form_PartNumber.Designer.vb new file mode 100644 index 0000000..8f37ff4 --- /dev/null +++ b/WT-DMS/form_PartNumber.Designer.vb @@ -0,0 +1,543 @@ + _ +Partial Class form_PartNumber + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.GroupBox2 = New System.Windows.Forms.GroupBox() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.bt_New = New System.Windows.Forms.Button() + Me.combo_Supplier = New System.Windows.Forms.ComboBox() + Me.num_Weight = New System.Windows.Forms.NumericUpDown() + Me.Label11 = New System.Windows.Forms.Label() + Me.bt_Query = New System.Windows.Forms.Button() + Me.bt_Save = New System.Windows.Forms.Button() + Me.combo_Unit = New System.Windows.Forms.ComboBox() + Me.bt_Browse = New System.Windows.Forms.Button() + Me.Label6 = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label5 = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.tb_Descr = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.tb_Name = New System.Windows.Forms.TextBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.tb_PartNumber = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.lstb_Log = New System.Windows.Forms.ListBox() + Me.lbl_QueryInfo = New System.Windows.Forms.Label() + Me.chk_EnableCam = New System.Windows.Forms.CheckBox() + Me.bt_CaptureImage = New System.Windows.Forms.Button() + Me.GroupBox3 = New System.Windows.Forms.GroupBox() + Me.picBox_Preview = New System.Windows.Forms.PictureBox() + Me.TabControl1 = New System.Windows.Forms.TabControl() + Me.TabPage1 = New System.Windows.Forms.TabPage() + Me.TabPage2 = New System.Windows.Forms.TabPage() + Me.Button2 = New System.Windows.Forms.Button() + Me.btnTips = New System.Windows.Forms.Button() + Me.cb_AutoOverWrite = New System.Windows.Forms.CheckBox() + Me.btn_ImportAll = New System.Windows.Forms.Button() + Me.tb_CurrentLocation = New System.Windows.Forms.TextBox() + Me.tb_SelectedRow = New System.Windows.Forms.TextBox() + Me.Button1 = New System.Windows.Forms.Button() + Me.grid_ImportPartNoList = New FlexCell.Grid() + Me.GroupBox1.SuspendLayout() + Me.GroupBox2.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.num_Weight, System.ComponentModel.ISupportInitialize).BeginInit() + Me.GroupBox3.SuspendLayout() + CType(Me.picBox_Preview, System.ComponentModel.ISupportInitialize).BeginInit() + Me.TabControl1.SuspendLayout() + Me.TabPage1.SuspendLayout() + Me.TabPage2.SuspendLayout() + Me.SuspendLayout() + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.GroupBox2) + Me.GroupBox1.Controls.Add(Me.bt_New) + Me.GroupBox1.Controls.Add(Me.combo_Supplier) + Me.GroupBox1.Controls.Add(Me.num_Weight) + Me.GroupBox1.Controls.Add(Me.Label11) + Me.GroupBox1.Controls.Add(Me.bt_Query) + Me.GroupBox1.Controls.Add(Me.bt_Save) + Me.GroupBox1.Controls.Add(Me.combo_Unit) + Me.GroupBox1.Controls.Add(Me.bt_Browse) + Me.GroupBox1.Controls.Add(Me.Label6) + Me.GroupBox1.Controls.Add(Me.Label7) + Me.GroupBox1.Controls.Add(Me.Label5) + Me.GroupBox1.Controls.Add(Me.Label4) + Me.GroupBox1.Controls.Add(Me.tb_Descr) + Me.GroupBox1.Controls.Add(Me.Label3) + Me.GroupBox1.Controls.Add(Me.tb_Name) + Me.GroupBox1.Controls.Add(Me.Label2) + Me.GroupBox1.Controls.Add(Me.tb_PartNumber) + Me.GroupBox1.Controls.Add(Me.Label1) + Me.GroupBox1.Location = New System.Drawing.Point(13, 13) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(475, 563) + Me.GroupBox1.TabIndex = 0 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "物料属性" + ' + 'GroupBox2 + ' + Me.GroupBox2.Controls.Add(Me.PictureBox1) + Me.GroupBox2.Location = New System.Drawing.Point(107, 303) + Me.GroupBox2.Name = "GroupBox2" + Me.GroupBox2.Size = New System.Drawing.Size(330, 254) + Me.GroupBox2.TabIndex = 11 + Me.GroupBox2.TabStop = False + Me.GroupBox2.Text = "预览" + ' + 'PictureBox1 + ' + Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox1.Location = New System.Drawing.Point(5, 11) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(320, 240) + Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom + Me.PictureBox1.TabIndex = 0 + Me.PictureBox1.TabStop = False + ' + 'bt_New + ' + Me.bt_New.Location = New System.Drawing.Point(370, 177) + Me.bt_New.Name = "bt_New" + Me.bt_New.Size = New System.Drawing.Size(80, 38) + Me.bt_New.TabIndex = 9 + Me.bt_New.Text = "新建" + Me.bt_New.UseVisualStyleBackColor = True + ' + 'combo_Supplier + ' + Me.combo_Supplier.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_Supplier.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_Supplier.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_Supplier.FormattingEnabled = True + Me.combo_Supplier.Location = New System.Drawing.Point(107, 275) + Me.combo_Supplier.MaxLength = 32 + Me.combo_Supplier.Name = "combo_Supplier" + Me.combo_Supplier.Size = New System.Drawing.Size(242, 20) + Me.combo_Supplier.TabIndex = 5 + ' + 'num_Weight + ' + Me.num_Weight.DecimalPlaces = 3 + Me.num_Weight.Location = New System.Drawing.Point(107, 247) + Me.num_Weight.Maximum = New Decimal(New Integer() {10000000, 0, 0, 0}) + Me.num_Weight.Name = "num_Weight" + Me.num_Weight.Size = New System.Drawing.Size(242, 21) + Me.num_Weight.TabIndex = 4 + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.ForeColor = System.Drawing.Color.Red + Me.Label11.Location = New System.Drawing.Point(105, 17) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(263, 24) + Me.Label11.TabIndex = 6 + Me.Label11.Text = "提示：带*字段必须填写" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "如果不能输入中文，请单击右键，选择""打开IME""" + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(370, 42) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(80, 26) + Me.bt_Query.TabIndex = 8 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'bt_Save + ' + Me.bt_Save.Location = New System.Drawing.Point(370, 251) + Me.bt_Save.Name = "bt_Save" + Me.bt_Save.Size = New System.Drawing.Size(80, 46) + Me.bt_Save.TabIndex = 10 + Me.bt_Save.Text = "保存" + Me.bt_Save.UseVisualStyleBackColor = True + ' + 'combo_Unit + ' + Me.combo_Unit.FormattingEnabled = True + Me.combo_Unit.ImeMode = System.Windows.Forms.ImeMode.NoControl + Me.combo_Unit.Items.AddRange(New Object() {"pcs", "个", "台", "条", "颗", "盒", "包", "箱"}) + Me.combo_Unit.Location = New System.Drawing.Point(107, 221) + Me.combo_Unit.MaxLength = 20 + Me.combo_Unit.Name = "combo_Unit" + Me.combo_Unit.Size = New System.Drawing.Size(242, 20) + Me.combo_Unit.TabIndex = 3 + ' + 'bt_Browse + ' + Me.bt_Browse.Location = New System.Drawing.Point(24, 334) + Me.bt_Browse.Name = "bt_Browse" + Me.bt_Browse.Size = New System.Drawing.Size(77, 26) + Me.bt_Browse.TabIndex = 7 + Me.bt_Browse.Text = "..." + Me.bt_Browse.UseVisualStyleBackColor = True + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(22, 319) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(53, 12) + Me.Label6.TabIndex = 0 + Me.Label6.Text = "物料图片" + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(22, 278) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(53, 12) + Me.Label7.TabIndex = 0 + Me.Label7.Text = "供应商ID" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(22, 251) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(53, 12) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "单重(kg)" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(22, 224) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(29, 12) + Me.Label4.TabIndex = 0 + Me.Label4.Text = "单位" + ' + 'tb_Descr + ' + Me.tb_Descr.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.tb_Descr.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource + Me.tb_Descr.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Descr.Location = New System.Drawing.Point(107, 97) + Me.tb_Descr.Multiline = True + Me.tb_Descr.Name = "tb_Descr" + Me.tb_Descr.ScrollBars = System.Windows.Forms.ScrollBars.Vertical + Me.tb_Descr.Size = New System.Drawing.Size(242, 118) + Me.tb_Descr.TabIndex = 2 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(22, 100) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(71, 12) + Me.Label3.TabIndex = 0 + Me.Label3.Text = "规格描述(*)" + ' + 'tb_Name + ' + Me.tb_Name.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest + Me.tb_Name.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource + Me.tb_Name.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Name.Location = New System.Drawing.Point(107, 70) + Me.tb_Name.Name = "tb_Name" + Me.tb_Name.Size = New System.Drawing.Size(242, 21) + Me.tb_Name.TabIndex = 1 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(22, 73) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(71, 12) + Me.Label2.TabIndex = 0 + Me.Label2.Text = "物料名称(*)" + ' + 'tb_PartNumber + ' + Me.tb_PartNumber.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.Suggest + Me.tb_PartNumber.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.CustomSource + Me.tb_PartNumber.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_PartNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PartNumber.Location = New System.Drawing.Point(107, 43) + Me.tb_PartNumber.MaxLength = 32 + Me.tb_PartNumber.Name = "tb_PartNumber" + Me.tb_PartNumber.Size = New System.Drawing.Size(242, 21) + Me.tb_PartNumber.TabIndex = 0 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(22, 46) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(47, 12) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "料号(*)" + ' + 'lstb_Log + ' + Me.lstb_Log.FormattingEnabled = True + Me.lstb_Log.ItemHeight = 12 + Me.lstb_Log.Location = New System.Drawing.Point(13, 601) + Me.lstb_Log.Name = "lstb_Log" + Me.lstb_Log.Size = New System.Drawing.Size(1150, 124) + Me.lstb_Log.TabIndex = 1 + ' + 'lbl_QueryInfo + ' + Me.lbl_QueryInfo.AutoSize = True + Me.lbl_QueryInfo.ForeColor = System.Drawing.Color.Blue + Me.lbl_QueryInfo.Location = New System.Drawing.Point(17, 584) + Me.lbl_QueryInfo.Name = "lbl_QueryInfo" + Me.lbl_QueryInfo.Size = New System.Drawing.Size(0, 12) + Me.lbl_QueryInfo.TabIndex = 6 + ' + 'chk_EnableCam + ' + Me.chk_EnableCam.AutoSize = True + Me.chk_EnableCam.Location = New System.Drawing.Point(17, 28) + Me.chk_EnableCam.Name = "chk_EnableCam" + Me.chk_EnableCam.Size = New System.Drawing.Size(84, 16) + Me.chk_EnableCam.TabIndex = 8 + Me.chk_EnableCam.Text = "开启摄像头" + Me.chk_EnableCam.UseVisualStyleBackColor = True + ' + 'bt_CaptureImage + ' + Me.bt_CaptureImage.Location = New System.Drawing.Point(137, 24) + Me.bt_CaptureImage.Name = "bt_CaptureImage" + Me.bt_CaptureImage.Size = New System.Drawing.Size(198, 23) + Me.bt_CaptureImage.TabIndex = 9 + Me.bt_CaptureImage.Text = "抓取图片" + Me.bt_CaptureImage.UseVisualStyleBackColor = True + ' + 'GroupBox3 + ' + Me.GroupBox3.Controls.Add(Me.picBox_Preview) + Me.GroupBox3.Controls.Add(Me.chk_EnableCam) + Me.GroupBox3.Controls.Add(Me.bt_CaptureImage) + Me.GroupBox3.Location = New System.Drawing.Point(6, 6) + Me.GroupBox3.Name = "GroupBox3" + Me.GroupBox3.Size = New System.Drawing.Size(658, 563) + Me.GroupBox3.TabIndex = 11 + Me.GroupBox3.TabStop = False + Me.GroupBox3.Text = "摄像控制" + ' + 'picBox_Preview + ' + Me.picBox_Preview.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.picBox_Preview.Location = New System.Drawing.Point(17, 120) + Me.picBox_Preview.Name = "picBox_Preview" + Me.picBox_Preview.Size = New System.Drawing.Size(625, 351) + Me.picBox_Preview.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom + Me.picBox_Preview.TabIndex = 12 + Me.picBox_Preview.TabStop = False + ' + 'TabControl1 + ' + Me.TabControl1.Controls.Add(Me.TabPage1) + Me.TabControl1.Controls.Add(Me.TabPage2) + Me.TabControl1.Location = New System.Drawing.Point(494, 13) + Me.TabControl1.Name = "TabControl1" + Me.TabControl1.SelectedIndex = 0 + Me.TabControl1.Size = New System.Drawing.Size(700, 563) + Me.TabControl1.TabIndex = 12 + ' + 'TabPage1 + ' + Me.TabPage1.Controls.Add(Me.GroupBox3) + Me.TabPage1.Location = New System.Drawing.Point(4, 22) + Me.TabPage1.Name = "TabPage1" + Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage1.Size = New System.Drawing.Size(692, 537) + Me.TabPage1.TabIndex = 0 + Me.TabPage1.Text = "物料图片" + Me.TabPage1.UseVisualStyleBackColor = True + ' + 'TabPage2 + ' + Me.TabPage2.Controls.Add(Me.Button2) + Me.TabPage2.Controls.Add(Me.btnTips) + Me.TabPage2.Controls.Add(Me.cb_AutoOverWrite) + Me.TabPage2.Controls.Add(Me.btn_ImportAll) + Me.TabPage2.Controls.Add(Me.tb_CurrentLocation) + Me.TabPage2.Controls.Add(Me.tb_SelectedRow) + Me.TabPage2.Controls.Add(Me.Button1) + Me.TabPage2.Controls.Add(Me.grid_ImportPartNoList) + Me.TabPage2.Location = New System.Drawing.Point(4, 22) + Me.TabPage2.Name = "TabPage2" + Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage2.Size = New System.Drawing.Size(692, 537) + Me.TabPage2.TabIndex = 1 + Me.TabPage2.Text = "批量导入" + Me.TabPage2.UseVisualStyleBackColor = True + ' + 'Button2 + ' + Me.Button2.Font = New System.Drawing.Font("宋体", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Button2.Location = New System.Drawing.Point(591, 4) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(98, 41) + Me.Button2.TabIndex = 10 + Me.Button2.Text = "批量导入" + Me.Button2.UseVisualStyleBackColor = True + ' + 'btnTips + ' + Me.btnTips.Location = New System.Drawing.Point(6, 6) + Me.btnTips.Name = "btnTips" + Me.btnTips.Size = New System.Drawing.Size(40, 36) + Me.btnTips.TabIndex = 9 + Me.btnTips.UseVisualStyleBackColor = True + ' + 'cb_AutoOverWrite + ' + Me.cb_AutoOverWrite.AutoSize = True + Me.cb_AutoOverWrite.Location = New System.Drawing.Point(404, 17) + Me.cb_AutoOverWrite.Name = "cb_AutoOverWrite" + Me.cb_AutoOverWrite.Size = New System.Drawing.Size(72, 16) + Me.cb_AutoOverWrite.TabIndex = 8 + Me.cb_AutoOverWrite.Text = "自动覆盖" + Me.cb_AutoOverWrite.UseVisualStyleBackColor = True + ' + 'btn_ImportAll + ' + Me.btn_ImportAll.Font = New System.Drawing.Font("宋体", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.btn_ImportAll.Location = New System.Drawing.Point(480, 4) + Me.btn_ImportAll.Name = "btn_ImportAll" + Me.btn_ImportAll.Size = New System.Drawing.Size(105, 41) + Me.btn_ImportAll.TabIndex = 7 + Me.btn_ImportAll.Text = "自动导入" + Me.btn_ImportAll.UseVisualStyleBackColor = True + ' + 'tb_CurrentLocation + ' + Me.tb_CurrentLocation.Font = New System.Drawing.Font("宋体", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.tb_CurrentLocation.Location = New System.Drawing.Point(210, 5) + Me.tb_CurrentLocation.Name = "tb_CurrentLocation" + Me.tb_CurrentLocation.Size = New System.Drawing.Size(127, 38) + Me.tb_CurrentLocation.TabIndex = 6 + Me.tb_CurrentLocation.Text = "0" + ' + 'tb_SelectedRow + ' + Me.tb_SelectedRow.Font = New System.Drawing.Font("宋体", 20.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.tb_SelectedRow.Location = New System.Drawing.Point(339, 5) + Me.tb_SelectedRow.Name = "tb_SelectedRow" + Me.tb_SelectedRow.Size = New System.Drawing.Size(59, 38) + Me.tb_SelectedRow.TabIndex = 5 + Me.tb_SelectedRow.Text = "0" + ' + 'Button1 + ' + Me.Button1.Location = New System.Drawing.Point(49, 3) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(158, 43) + Me.Button1.TabIndex = 3 + Me.Button1.Text = "保存文件（文件：c:\import.xls）" + Me.Button1.UseVisualStyleBackColor = True + ' + 'grid_ImportPartNoList + ' + Me.grid_ImportPartNoList.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.grid_ImportPartNoList.Cols = 10 + Me.grid_ImportPartNoList.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.grid_ImportPartNoList.DefaultRowHeight = CType(28, Short) + Me.grid_ImportPartNoList.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.grid_ImportPartNoList.Location = New System.Drawing.Point(6, 48) + Me.grid_ImportPartNoList.MouseWheelSpeed = CType(3, Short) + Me.grid_ImportPartNoList.Name = "grid_ImportPartNoList" + Me.grid_ImportPartNoList.Rows = 100000 + Me.grid_ImportPartNoList.Size = New System.Drawing.Size(680, 483) + Me.grid_ImportPartNoList.TabIndex = 2 + ' + 'form_PartNumber + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(1221, 707) + Me.Controls.Add(Me.TabControl1) + Me.Controls.Add(Me.lbl_QueryInfo) + Me.Controls.Add(Me.lstb_Log) + Me.Controls.Add(Me.GroupBox1) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog + Me.MaximizeBox = False + Me.Name = "form_PartNumber" + Me.Text = "料号管理" + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + Me.GroupBox2.ResumeLayout(False) + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.num_Weight, System.ComponentModel.ISupportInitialize).EndInit() + Me.GroupBox3.ResumeLayout(False) + Me.GroupBox3.PerformLayout() + CType(Me.picBox_Preview, System.ComponentModel.ISupportInitialize).EndInit() + Me.TabControl1.ResumeLayout(False) + Me.TabPage1.ResumeLayout(False) + Me.TabPage2.ResumeLayout(False) + Me.TabPage2.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents tb_Descr As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents tb_Name As System.Windows.Forms.TextBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents tb_PartNumber As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents bt_Browse As System.Windows.Forms.Button + Friend WithEvents combo_Unit As System.Windows.Forms.ComboBox + Friend WithEvents bt_Save As System.Windows.Forms.Button + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents lstb_Log As System.Windows.Forms.ListBox + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents num_Weight As System.Windows.Forms.NumericUpDown + Friend WithEvents combo_Supplier As System.Windows.Forms.ComboBox + Friend WithEvents bt_New As System.Windows.Forms.Button + Friend WithEvents lbl_QueryInfo As System.Windows.Forms.Label + Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox + Friend WithEvents chk_EnableCam As System.Windows.Forms.CheckBox + Friend WithEvents bt_CaptureImage As System.Windows.Forms.Button + Friend WithEvents GroupBox3 As System.Windows.Forms.GroupBox + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents picBox_Preview As System.Windows.Forms.PictureBox + Friend WithEvents TabControl1 As System.Windows.Forms.TabControl + Friend WithEvents TabPage1 As System.Windows.Forms.TabPage + Friend WithEvents TabPage2 As System.Windows.Forms.TabPage + Friend WithEvents grid_ImportPartNoList As FlexCell.Grid + Friend WithEvents Button1 As System.Windows.Forms.Button + Friend WithEvents tb_CurrentLocation As System.Windows.Forms.TextBox + Friend WithEvents tb_SelectedRow As System.Windows.Forms.TextBox + Friend WithEvents cb_AutoOverWrite As CheckBox + Friend WithEvents btnTips As Button + Friend WithEvents Button2 As Button + Friend WithEvents btn_ImportAll As Button +End Class diff --git a/WT-DMS/form_PartNumber.resx b/WT-DMS/form_PartNumber.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/form_PartNumber.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/form_PartNumber.vb b/WT-DMS/form_PartNumber.vb new file mode 100644 index 0000000..1296272 --- /dev/null +++ b/WT-DMS/form_PartNumber.vb @@ -0,0 +1,497 @@ +Imports System.Windows.Forms + +Public Class form_PartNumber + Dim m_PartNumber As New CPartNumber + Dim m_Supplier As New CSupplier + Dim m_InitOver As Boolean = False + + Dim strSupplierID As String = "" + + Dim m_RecentList_PN As New System.Windows.Forms.AutoCompleteStringCollection + Dim m_RecentList_Name As New System.Windows.Forms.AutoCompleteStringCollection + Dim m_RecentList_Desc As New System.Windows.Forms.AutoCompleteStringCollection + + Dim cam As CamSnapShot.Capture = Nothing + + Const VIDEODEVICE = 0 ' zero based index of video capture device to use + Const VIDEOWIDTH = 1920 '// Depends on video device caps + Const VIDEOHEIGHT = 1080 ' // Depends on video device caps + Const VIDEOBITSPERPIXEL = 24 ' // BitsPerPixel values determined by device + + Dim AutoImport_CurrentRow As Integer = 0 + + Dim AutoImport_AutoOverWrite As Boolean = False + Private Function CheckInputValid() As Boolean + Dim valid As Boolean = True + + If tb_PartNumber.Text.Length <= 0 Then + valid = False + End If + If tb_PartNumber.Text.Length > SEC_LENGTH.料号PN Then + valid = False + End If + + If valid = True Then + tb_PartNumber.BackColor = Color.White + Else + tb_PartNumber.BackColor = Color.Red + End If + + If tb_Name.Text.Length <= 0 Then + tb_Name.BackColor = Color.Red + valid = False + Else + tb_Name.BackColor = Color.White + End If + + '检测供应商ID是否合法 + Dim SupplierSplit() As String + Dim SupplierID As String = "" + If combo_Supplier.Text.Length > 0 Then + SupplierSplit = Split(combo_Supplier.Text, ":") + If SupplierSplit.Length >= 1 Then + SupplierID = SupplierSplit(0) + End If + End If + + Dim SupplierIDValid As Boolean = False + If SupplierID.Length > 0 Then + If m_Supplier.CheckSupplierID(SupplierID, SupplierIDValid) = ERROR_CODE.SUCCESS Then + If SupplierIDValid = False Then + combo_Supplier.BackColor = Color.Red + valid = False + Else + strSupplierID = SupplierID + combo_Supplier.BackColor = Color.White + End If + Else + combo_Supplier.BackColor = Color.Red + valid = False + MsgBox("查询""供应商ID""失败") + End If + Else + combo_Supplier.BackColor = Color.White + End If + + If tb_Descr.Text.Length <= 0 Then + tb_Descr.BackColor = Color.Red + valid = False + Else + tb_Descr.BackColor = Color.White + End If + + Return valid + End Function + + '获取供应商列表 + Private Function GetSupplierList() As Boolean + combo_Supplier.Items.Clear() + + Dim m_Supplier As New CSupplier + Dim rTable As New DataTable + Dim strItem As String = "" + If m_Supplier.QueryAll_IDAndName(rTable) = ERROR_CODE.SUCCESS Then + For row As Integer = 0 To rTable.Rows.Count - 1 + strItem = rTable.Rows(row).Item(0) & ":" & rTable.Rows(row).Item(1) + combo_Supplier.Items.Add(strItem) + Next + + Return True + End If + Return False + End Function + + Private Sub form_PartNumber_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed + CGirdInfo.SaveRecentList("Recent_PN_PN", m_RecentList_PN) + CGirdInfo.SaveRecentList("Recent_PN_Name", m_RecentList_Name) + CGirdInfo.SaveRecentList("Recent_PN_Desc", m_RecentList_Desc) + + If Not cam Is Nothing Then + cam.Dispose() + End If + + cam = Nothing + End Sub + + Private Sub form_PartNumber_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + CGirdInfo.LoadRecentList("Recent_PN_PN", m_RecentList_PN) + CGirdInfo.LoadRecentList("Recent_PN_Name", m_RecentList_Name) + CGirdInfo.LoadRecentList("Recent_PN_Desc", m_RecentList_Desc) + AddDataToSlqDic = New Dictionary(Of String, (String, Object())) + tb_PartNumber.AutoCompleteCustomSource = m_RecentList_PN + tb_Name.AutoCompleteCustomSource = m_RecentList_Name + tb_Descr.AutoCompleteCustomSource = m_RecentList_Desc + + If CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.READ) = False Then + bt_Query.Enabled = False + End If + If CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.WRITE) = False Then + bt_Save.Enabled = False + End If + + GetSupplierList() + + + + Me.Left = My.Settings.FORM_PARTNUMBER_X + Me.Top = My.Settings.FORM_PARTNUMBER_Y + + m_InitOver = True + End Sub + + Private Sub bt_Browse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Browse.Click + Dim ofd As New OpenFileDialog() + If ofd.ShowDialog() <> DialogResult.OK Then Return + + PictureBox1.BackgroundImage = Image.FromFile(ofd.FileName) + End Sub + + Private Sub AddLog(ByVal text As String) + Dim index As Integer = lstb_Log.Items.Add(Now.ToString & ":" & text) + lstb_Log.SelectedIndex = index + End Sub + + + '记录要录入对数据 + Public AddDataToSlqDic As Dictionary(Of String, (String, Object())) + Private Sub bt_Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Save.Click + If tb_PartNumber.Text.Length > 0 Then + m_RecentList_PN.Add(tb_PartNumber.Text) + End If + If tb_Name.Text.Length > 0 Then + m_RecentList_Name.Add(tb_Name.Text) + End If + If tb_Descr.Text.Length > 0 Then + m_RecentList_Desc.Add(tb_Descr.Text) + End If + If m_RecentList_PN.Count > 10 Then + m_RecentList_PN.RemoveAt(0) + End If + If m_RecentList_Name.Count > 10 Then + m_RecentList_Name.RemoveAt(0) + End If + If m_RecentList_Desc.Count > 10 Then + m_RecentList_Desc.RemoveAt(0) + End If + + + lbl_QueryInfo.Text = "" + + '首先检查料号信息完整性 + If CheckInputValid() = False Then + MsgBox("输入属性存在错误！请见红色背景提示") + Return + End If + + '检测料号唯一性 + Dim UpdateMode As Boolean = False + Dim isExist As Boolean = True + If m_PartNumber.CheckPartNumber(tb_PartNumber.Text, isExist) = ERROR_CODE.SUCCESS Then + If isExist = True Then + tb_PartNumber.BackColor = Color.Red + If AutoImport_AutoOverWrite = False Then 'Momo 2021-08-10 如果选择自动覆盖，就不弹框 + '==Momo 20180322 + If MsgBox("当前料号已经存在: " & tb_PartNumber.Text & vbNewLine & "是否继续覆盖原数据?", MsgBoxStyle.OkCancel Or MsgBoxStyle.DefaultButton2) <> MsgBoxResult.Ok Then + Return + End If + End If + '==Momo 20180322 + UpdateMode = True + tb_PartNumber.BackColor = Color.White + End If + Else + MsgBox("访问数据库失败: 请检查网络连接或联系管理员!") + Return + End If + + '保存料号 + + Dim result As ERROR_CODE + 'If System.IO.File.Exists(tb_PicPath.Text) = True Then + If Not (PictureBox1.BackgroundImage Is Nothing) Then + Dim imageSize As Integer = PictureBox1.Width * PictureBox1.Height * Image.GetPixelFormatSize(System.Drawing.Imaging.PixelFormat.Format24bppRgb) / 8 + Dim PicBytes(imageSize * 2) As Byte + + Dim pt As Point = PictureBox1.Location + If mdl_Common.GetBytesFromImage(mdl_Common.ZoomImage(PictureBox1.BackgroundImage, PictureBox1.Bounds), PicBytes) = False Then + MsgBox("获取图像失败!") + Return + End If + + If UpdateMode = True Then + result = m_PartNumber.UpdateItem(tb_PartNumber.Text, tb_Name.Text, tb_Descr.Text, combo_Unit.Text, num_Weight.Value, PicBytes, strSupplierID) + Else + result = m_PartNumber.AddItem(tb_PartNumber.Text, tb_Name.Text, tb_Descr.Text, combo_Unit.Text, num_Weight.Value, PicBytes, strSupplierID) + + End If + Else + If UpdateMode = True Then + result = m_PartNumber.UpdateItem(tb_PartNumber.Text, tb_Name.Text, tb_Descr.Text, combo_Unit.Text, num_Weight.Value, Nothing, strSupplierID) + Else + result = m_PartNumber.AddItem(tb_PartNumber.Text, tb_Name.Text, tb_Descr.Text, combo_Unit.Text, num_Weight.Value, strSupplierID) + End If + End If + + If result = ERROR_CODE.SUCCESS Then + '查询保存序号 + Dim SaveIndex As Integer = 0 + Dim minIndex As Integer = 0 + Dim maxIndex As Integer = 0 + Dim TotalCount As Integer = 0 + result = m_PartNumber.QueryInformation(TotalCount, minIndex, maxIndex) + If result = ERROR_CODE.SUCCESS Then + m_PartNumber.QueryItemIndex(tb_PartNumber.Text, SaveIndex) + If result = ERROR_CODE.SUCCESS Then + lbl_QueryInfo.Text = "保存序号: " & SaveIndex & ", 最小序号: " & minIndex & ", 最大序号: " & maxIndex & ", 总条数: " & TotalCount + AddLog("成功添加: " & SaveIndex & "," & tb_PartNumber.Text & "," & tb_Name.Text & "," & tb_Descr.Text & "," & combo_Unit.Text & "," & num_Weight.Value & "," & strSupplierID) + Else + MsgBox("保存失败： ""读取总条数失败!""") + End If + Else + MsgBox("保存失败： ""读取保存信息失败!""") + End If + ElseIf result = ERROR_CODE.NORIGHT Then + MsgBox("保存失败： ""无访问权限!""") + Else + MsgBox("保存失败: 请检查网络连接或联系管理员!") + End If + End Sub + + Private Sub bt_Query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Query.Click + tb_Name.Text = "" + tb_Descr.Text = "" + combo_Unit.Text = "" + num_Weight.Value = 0 + combo_Supplier.Text = "" + PictureBox1.BackgroundImage = Nothing + + Dim 物料名称 As String = "" + Dim 规格描述 As String = "" + Dim 单位 As String = "" + Dim 单重 As Double = 0 + Dim 图片(0) As Byte + Dim 供应商ID As String = "" + If m_PartNumber.QueryItem(tb_PartNumber.Text, 物料名称, 规格描述, 单位, 单重, 图片, 供应商ID) = ERROR_CODE.SUCCESS Then + tb_Name.Text = 物料名称 + tb_Descr.Text = 规格描述 + combo_Unit.Text = 单位 + num_Weight.Value = 单重 + combo_Supplier.Text = 供应商ID + + PictureBox1.BackgroundImage = GetImageFromBytes(图片) + End If + End Sub + + Private Sub bt_New_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_New.Click + tb_PartNumber.Text = "" + tb_Name.Text = "" + tb_Descr.Text = "" + combo_Unit.Text = "pcs" + num_Weight.Value = 0 + combo_Supplier.Text = "" + PictureBox1.BackgroundImage = Nothing + End Sub + + Private Sub form_PartNumber_LocationChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LocationChanged + If m_InitOver = True Then + My.Settings.FORM_PARTNUMBER_X = Me.Left + My.Settings.FORM_PARTNUMBER_Y = Me.Top + My.Settings.Save() + End If + End Sub + + Private Sub chk_EnableCam_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chk_EnableCam.CheckedChanged + If m_InitOver = False Then Return + Try + If chk_EnableCam.Checked = True Then + Dim rc As Rectangle = picBox_Preview.ClientRectangle + + ''保持长宽比 + 'Dim scaleX As Double = VIDEOWIDTH / rc.Width + 'Dim scaleY As Double = VIDEOHEIGHT / rc.Height + 'Dim scale As Double = Math.Min(scaleX, scaleY) + 'Dim rWidth As Double = rc.Width * scale + 'Dim rHeight As Double = rc.Height * scale + ''Dim offsetX As Double = (rc.Width - rWidth) / 2 + ''Dim offsetY As Double = (rc.Height - rHeight) / 2 + 'cam = New CamSnapShot.Capture(VIDEODEVICE, rWidth, rHeight, VIDEOBITSPERPIXEL, picBox_Preview) + + 'cam = New CamSnapShot.Capture(VIDEODEVICE, VIDEOWIDTH, VIDEOHEIGHT, VIDEOBITSPERPIXEL, picBox_Preview) + cam = New CamSnapShot.Capture(VIDEODEVICE, rc.Width, rc.Height, VIDEOBITSPERPIXEL, picBox_Preview) + Else + If Not cam Is Nothing Then + cam.Dispose() + End If + + cam = Nothing + End If + Catch ex As Exception + + End Try + + End Sub + + 'Private Sub ConnectCam() + ' If vcx.Connected Then vcx.Connected = False + ' vcx.AudioDeviceIndex = -1 + ' vcx.CaptureAudio = False + ' vcx.VideoDeviceIndex = 0 'cb1.SelectedIndex + + ' vcx.UseVideoFilter = VIDEOCAPXLib.vcxUseVideoFilterEnum.vcxBoth + ' vcx.Connected = True + ' vcx.Preview = True + + ' vcx.SetVideoFormat(640, 480) + 'End Sub + + 'Private Sub DisConnectCam() + ' vcx.Preview = False + ' vcx.Connected = False + 'End Sub + + Private Sub bt_CaptureImage_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_CaptureImage.Click + 'PictureBox1.BackgroundImage = vcx.GrabFrame + Try + PictureBox1.BackgroundImage = cam.SnapShot + Catch ex As Exception + + End Try + + End Sub + + Private Function vcx() As Object + Throw New NotImplementedException + End Function + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + grid_ImportPartNoList.ExportToExcel("d:\import.xls") + End Sub + + Private Sub grid_ImportPartNoList_Click(Sender As Object, e As EventArgs) Handles grid_ImportPartNoList.Click + AutoImport_CurrentRow = grid_ImportPartNoList.MouseRow + tb_SelectedRow.Text = AutoImport_CurrentRow + + GetItemFromGrid(AutoImport_CurrentRow) + + End Sub + Private Sub GetItemFromGrid(TargetRow As Integer) + tb_PartNumber.Text = grid_ImportPartNoList.Cell(AutoImport_CurrentRow, 1).Text + tb_Name.Text = grid_ImportPartNoList.Cell(AutoImport_CurrentRow, 2).Text + tb_Descr.Text = grid_ImportPartNoList.Cell(AutoImport_CurrentRow, 3).Text + combo_Unit.Text = "Pcs" + num_Weight.Text = grid_ImportPartNoList.Cell(AutoImport_CurrentRow, 5).Text + End Sub + + + Private Sub grid_ImportPartNoList_Load(sender As Object, e As EventArgs) Handles grid_ImportPartNoList.Load + + End Sub + + Private Sub grid_ImportPartNoList_MouseMove(Sender As Object, e As MouseEventArgs) Handles grid_ImportPartNoList.MouseMove + tb_CurrentLocation.Text = grid_ImportPartNoList.MouseRow & " , " & grid_ImportPartNoList.MouseCol + End Sub + + Private Sub btn_ImportAll_Click(sender As Object, e As EventArgs) Handles btn_ImportAll.Click + Dim tempCurrentRowPN As String = "" + 'AddDataToSlqDic.Clear() + + If cb_AutoOverWrite.Checked Then + AutoImport_AutoOverWrite = True + Else + AutoImport_AutoOverWrite = False + End If + + For i = 1 To grid_ImportPartNoList.Rows - 1 + If String.IsNullOrEmpty(grid_ImportPartNoList.Cell(i, 0).Text) Then Continue For + bt_New.PerformClick() + AutoImport_CurrentRow = i + tempCurrentRowPN = grid_ImportPartNoList.Cell(i, 1).Text + If tempCurrentRowPN <> "" Then + grid_ImportPartNoList.Cell(i, 1).SetFocus() + 'grid_ImportPartNoList.Focus() + GetItemFromGrid(i) + If Val(grid_ImportPartNoList.Cell(i, 5).Text) < 0.01 Then grid_ImportPartNoList.Cell(i, 5).Text = "0.01" + num_Weight.Text = grid_ImportPartNoList.Cell(AutoImport_CurrentRow, 5).Text + grid_ImportPartNoList.Cell(i, 7).Text = i + grid_ImportPartNoList.Cell(i, 8).Text = "OK" + strSupplierID = "01" + bt_Save.PerformClick() + 'AddLog("成功添加: " & i & "," & tb_PartNumber.Text & "," & tb_Name.Text & "," & tb_Descr.Text & "," & combo_Unit.Text & "," & num_Weight.Value & "," & strSupplierID) + Else + Exit For + AddLog("添加完成") + End If + + Next + ' Console.WriteLine("添加完成") + End Sub + + Private Sub cb_AutoOverWrite_CheckedChanged(sender As Object, e As EventArgs) Handles cb_AutoOverWrite.CheckedChanged + If cb_AutoOverWrite.Checked Then + AutoImport_AutoOverWrite = True + Else + AutoImport_AutoOverWrite = False + End If + End Sub + + Private Sub btnTips_Click(sender As Object, e As EventArgs) Handles btnTips.Click + Dim strTips = "提示：" & vbCrLf & vbCrLf & + "（1），从ERP系统导出料号到Excel表格" & vbCrLf & + "（2），表格顺序为：1-料号 2-品名 3-规格描述 4-单位 5-单价 " & vbCrLf & + "（3），将Excel数据复制黏贴到表格中" & vbCrLf & + "（4），点击 自动导入 按钮开始导入" & vbCrLf + MsgBox(strTips, MsgBoxStyle.OkOnly + MsgBoxStyle.Information, "料号导入操作提示") + End Sub + + Private Sub grid_ImportPartNoList_CellChange(Sender As Object, e As FlexCell.Grid.CellChangeEventArgs) Handles grid_ImportPartNoList.CellChange + If e.Row = 0 AndAlso e.Col = 0 Then Return + + If String.IsNullOrEmpty(grid_ImportPartNoList.Cell(e.Row, 0).Text) Then + grid_ImportPartNoList.Cell(e.Row, 0).Text = e.Row.ToString + End If + + End Sub + + Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click + + strSupplierID = "01" + AddDataToSlqDic.Clear() + + + ' insert into Table + Dim result As String = " START TRANSACTION;" & vbLf + Dim listCoun As New List(Of Integer) + For i = 1 To grid_ImportPartNoList.Rows - 1 + If String.IsNullOrEmpty(grid_ImportPartNoList.Cell(i, 0).Text) AndAlso String.IsNullOrEmpty(grid_ImportPartNoList.Cell(i, 1).Text) Then Continue For + result = result & m_PartNumber.GetAddItemCmd(grid_ImportPartNoList.Cell(i, 1).Text, grid_ImportPartNoList.Cell(i, 2).Text, grid_ImportPartNoList.Cell(i, 3).Text, grid_ImportPartNoList.Cell(i, 4).Text, grid_ImportPartNoList.Cell(i, 5).Text, strSupplierID) & ";" & vbLf + listCoun.Add(i) + If i Mod 50 = 0 Then + result = result & " COMMIT;" + If SQL_Transaction(COL_RIGHTS.料号管理, result) Then + For Each item In listCoun + grid_ImportPartNoList.Cell(item, 8).Text = "OK" + Next + Else + MsgBox($"导入失败:已导入({i - 50}/{grid_ImportPartNoList.Rows - 1}){vbLf }{mdl_SQLAccessManage.Transactionmsg}") + Return + End If + Console.WriteLine(result) + result = " START TRANSACTION;" & vbLf + End If + Next + + result = result & " COMMIT;" + If SQL_Transaction(COL_RIGHTS.料号管理, result) Then + For Each item In listCoun + grid_ImportPartNoList.Cell(item, 8).Text = "OK" + Next + Else + Dim num As Integer = (grid_ImportPartNoList.Rows - 1) Mod 50 + MsgBox($"导入失败:已导入({(grid_ImportPartNoList.Rows - 1 - num)}/{grid_ImportPartNoList.Rows - 1}){vbLf }{mdl_SQLAccessManage.Transactionmsg}") + Return + End If + MsgBox("导入成功") + Console.WriteLine(result) + + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/form_Product.Designer.vb b/WT-DMS/form_Product.Designer.vb new file mode 100644 index 0000000..da6d657 --- /dev/null +++ b/WT-DMS/form_Product.Designer.vb @@ -0,0 +1,363 @@ + _ +Partial Class form_Product + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Me.GroupBox2 = New System.Windows.Forms.GroupBox() + Me.tb_PartNumberInfo = New System.Windows.Forms.TextBox() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.chk_Preview = New System.Windows.Forms.CheckBox() + Me.bt_AddStoreLoc = New System.Windows.Forms.Button() + Me.num_Count = New System.Windows.Forms.NumericUpDown() + Me.Label11 = New System.Windows.Forms.Label() + Me.lstb_Log = New System.Windows.Forms.ListBox() + Me.bt_Query = New System.Windows.Forms.Button() + Me.bt_Save = New System.Windows.Forms.Button() + Me.combo_StoreName = New System.Windows.Forms.ComboBox() + Me.combo_StoreLoc = New System.Windows.Forms.ComboBox() + Me.combo_Unit = New System.Windows.Forms.ComboBox() + Me.tb_UseInfo = New System.Windows.Forms.TextBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label7 = New System.Windows.Forms.Label() + Me.Label6 = New System.Windows.Forms.Label() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.Label5 = New System.Windows.Forms.Label() + Me.Label4 = New System.Windows.Forms.Label() + Me.tb_OderNumber = New System.Windows.Forms.TextBox() + Me.Label2 = New System.Windows.Forms.Label() + Me.tb_PartNumber = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.Label10 = New System.Windows.Forms.Label() + Me.GroupBox2.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.num_Count, System.ComponentModel.ISupportInitialize).BeginInit() + Me.GroupBox1.SuspendLayout() + Me.SuspendLayout() + ' + 'GroupBox2 + ' + Me.GroupBox2.Controls.Add(Me.tb_PartNumberInfo) + Me.GroupBox2.Controls.Add(Me.PictureBox1) + Me.GroupBox2.Controls.Add(Me.chk_Preview) + Me.GroupBox2.Location = New System.Drawing.Point(445, 21) + Me.GroupBox2.Name = "GroupBox2" + Me.GroupBox2.Size = New System.Drawing.Size(423, 287) + Me.GroupBox2.TabIndex = 11 + Me.GroupBox2.TabStop = False + Me.GroupBox2.Text = "料号信息" + ' + 'tb_PartNumberInfo + ' + Me.tb_PartNumberInfo.Location = New System.Drawing.Point(7, 25) + Me.tb_PartNumberInfo.Multiline = True + Me.tb_PartNumberInfo.Name = "tb_PartNumberInfo" + Me.tb_PartNumberInfo.ReadOnly = True + Me.tb_PartNumberInfo.Size = New System.Drawing.Size(204, 250) + Me.tb_PartNumberInfo.TabIndex = 7 + ' + 'PictureBox1 + ' + Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox1.Location = New System.Drawing.Point(217, 49) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(200, 200) + Me.PictureBox1.TabIndex = 2 + Me.PictureBox1.TabStop = False + ' + 'chk_Preview + ' + Me.chk_Preview.AutoSize = True + Me.chk_Preview.Checked = Global.WT_DMS.My.MySettings.Default.CHK_PREVIEW + Me.chk_Preview.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_PREVIEW", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chk_Preview.Location = New System.Drawing.Point(217, 25) + Me.chk_Preview.Name = "chk_Preview" + Me.chk_Preview.Size = New System.Drawing.Size(96, 16) + Me.chk_Preview.TabIndex = 6 + Me.chk_Preview.Text = "物料图片预览" + Me.chk_Preview.UseVisualStyleBackColor = True + ' + 'bt_AddStoreLoc + ' + Me.bt_AddStoreLoc.Location = New System.Drawing.Point(276, 182) + Me.bt_AddStoreLoc.Name = "bt_AddStoreLoc" + Me.bt_AddStoreLoc.Size = New System.Drawing.Size(56, 23) + Me.bt_AddStoreLoc.TabIndex = 9 + Me.bt_AddStoreLoc.Text = "新建" + Me.bt_AddStoreLoc.UseVisualStyleBackColor = True + ' + 'num_Count + ' + Me.num_Count.Location = New System.Drawing.Point(90, 94) + Me.num_Count.Maximum = New Decimal(New Integer() {1000000, 0, 0, 0}) + Me.num_Count.Name = "num_Count" + Me.num_Count.Size = New System.Drawing.Size(242, 21) + Me.num_Count.TabIndex = 2 + ' + 'Label11 + ' + Me.Label11.AutoSize = True + Me.Label11.ForeColor = System.Drawing.Color.Red + Me.Label11.Location = New System.Drawing.Point(88, 11) + Me.Label11.Name = "Label11" + Me.Label11.Size = New System.Drawing.Size(263, 24) + Me.Label11.TabIndex = 6 + Me.Label11.Text = "提示：带*字段必须填写" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "如果不能输入中文，请单击右键，选择""打开IME""" + ' + 'lstb_Log + ' + Me.lstb_Log.FormattingEnabled = True + Me.lstb_Log.ItemHeight = 12 + Me.lstb_Log.Location = New System.Drawing.Point(12, 356) + Me.lstb_Log.Name = "lstb_Log" + Me.lstb_Log.Size = New System.Drawing.Size(874, 148) + Me.lstb_Log.TabIndex = 13 + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(347, 36) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(80, 26) + Me.bt_Query.TabIndex = 8 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'bt_Save + ' + Me.bt_Save.Location = New System.Drawing.Point(347, 250) + Me.bt_Save.Name = "bt_Save" + Me.bt_Save.Size = New System.Drawing.Size(80, 46) + Me.bt_Save.TabIndex = 7 + Me.bt_Save.Text = "保存" + Me.bt_Save.UseVisualStyleBackColor = True + ' + 'combo_StoreName + ' + Me.combo_StoreName.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_StoreName.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_StoreName.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_StoreName.FormattingEnabled = True + Me.combo_StoreName.Items.AddRange(New Object() {"pcs", "个", "台", "条", "颗", "盒", "包", "箱"}) + Me.combo_StoreName.Location = New System.Drawing.Point(90, 156) + Me.combo_StoreName.MaxLength = 20 + Me.combo_StoreName.Name = "combo_StoreName" + Me.combo_StoreName.Size = New System.Drawing.Size(180, 20) + Me.combo_StoreName.TabIndex = 4 + ' + 'combo_StoreLoc + ' + Me.combo_StoreLoc.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_StoreLoc.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_StoreLoc.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_StoreLoc.FormattingEnabled = True + Me.combo_StoreLoc.Location = New System.Drawing.Point(90, 183) + Me.combo_StoreLoc.MaxLength = 20 + Me.combo_StoreLoc.Name = "combo_StoreLoc" + Me.combo_StoreLoc.Size = New System.Drawing.Size(180, 20) + Me.combo_StoreLoc.TabIndex = 4 + ' + 'combo_Unit + ' + Me.combo_Unit.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend + Me.combo_Unit.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems + Me.combo_Unit.FormattingEnabled = True + Me.combo_Unit.ImeMode = System.Windows.Forms.ImeMode.Off + Me.combo_Unit.Items.AddRange(New Object() {"pcs", "个", "台", "条", "颗", "盒", "包", "箱"}) + Me.combo_Unit.Location = New System.Drawing.Point(90, 121) + Me.combo_Unit.MaxLength = 20 + Me.combo_Unit.Name = "combo_Unit" + Me.combo_Unit.Size = New System.Drawing.Size(242, 20) + Me.combo_Unit.TabIndex = 3 + ' + 'tb_UseInfo + ' + Me.tb_UseInfo.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_UseInfo.Location = New System.Drawing.Point(90, 209) + Me.tb_UseInfo.MaxLength = 200 + Me.tb_UseInfo.Multiline = True + Me.tb_UseInfo.Name = "tb_UseInfo" + Me.tb_UseInfo.Size = New System.Drawing.Size(242, 87) + Me.tb_UseInfo.TabIndex = 5 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(37, 186) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(47, 12) + Me.Label3.TabIndex = 0 + Me.Label3.Text = "库位(*)" + ' + 'Label7 + ' + Me.Label7.AutoSize = True + Me.Label7.Location = New System.Drawing.Point(55, 212) + Me.Label7.Name = "Label7" + Me.Label7.Size = New System.Drawing.Size(29, 12) + Me.Label7.TabIndex = 0 + Me.Label7.Text = "用途" + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(37, 159) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(47, 12) + Me.Label6.TabIndex = 0 + Me.Label6.Text = "仓库(*)" + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.GroupBox2) + Me.GroupBox1.Controls.Add(Me.bt_AddStoreLoc) + Me.GroupBox1.Controls.Add(Me.num_Count) + Me.GroupBox1.Controls.Add(Me.Label11) + Me.GroupBox1.Controls.Add(Me.bt_Query) + Me.GroupBox1.Controls.Add(Me.bt_Save) + Me.GroupBox1.Controls.Add(Me.combo_StoreName) + Me.GroupBox1.Controls.Add(Me.combo_StoreLoc) + Me.GroupBox1.Controls.Add(Me.combo_Unit) + Me.GroupBox1.Controls.Add(Me.tb_UseInfo) + Me.GroupBox1.Controls.Add(Me.Label3) + Me.GroupBox1.Controls.Add(Me.Label7) + Me.GroupBox1.Controls.Add(Me.Label6) + Me.GroupBox1.Controls.Add(Me.Label5) + Me.GroupBox1.Controls.Add(Me.Label4) + Me.GroupBox1.Controls.Add(Me.tb_OderNumber) + Me.GroupBox1.Controls.Add(Me.Label2) + Me.GroupBox1.Controls.Add(Me.tb_PartNumber) + Me.GroupBox1.Controls.Add(Me.Label1) + Me.GroupBox1.Location = New System.Drawing.Point(12, 12) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(874, 314) + Me.GroupBox1.TabIndex = 11 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "物料属性" + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(37, 96) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(47, 12) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "数量(*)" + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(55, 124) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(29, 12) + Me.Label4.TabIndex = 0 + Me.Label4.Text = "单位" + ' + 'tb_OderNumber + ' + Me.tb_OderNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_OderNumber.Location = New System.Drawing.Point(90, 67) + Me.tb_OderNumber.MaxLength = 20 + Me.tb_OderNumber.Name = "tb_OderNumber" + Me.tb_OderNumber.Size = New System.Drawing.Size(242, 21) + Me.tb_OderNumber.TabIndex = 1 + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(43, 70) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(41, 12) + Me.Label2.TabIndex = 0 + Me.Label2.Text = "订单号" + ' + 'tb_PartNumber + ' + Me.tb_PartNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PartNumber.Location = New System.Drawing.Point(90, 40) + Me.tb_PartNumber.MaxLength = 32 + Me.tb_PartNumber.Name = "tb_PartNumber" + Me.tb_PartNumber.Size = New System.Drawing.Size(242, 21) + Me.tb_PartNumber.TabIndex = 0 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(37, 43) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(47, 12) + Me.Label1.TabIndex = 0 + Me.Label1.Text = "料号(*)" + ' + 'Label10 + ' + Me.Label10.AutoSize = True + Me.Label10.Location = New System.Drawing.Point(10, 341) + Me.Label10.Name = "Label10" + Me.Label10.Size = New System.Drawing.Size(29, 12) + Me.Label10.TabIndex = 12 + Me.Label10.Text = "记录" + ' + 'form_Product + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(896, 517) + Me.Controls.Add(Me.lstb_Log) + Me.Controls.Add(Me.GroupBox1) + Me.Controls.Add(Me.Label10) + Me.Name = "form_Product" + Me.Text = "成品库存管理" + Me.GroupBox2.ResumeLayout(False) + Me.GroupBox2.PerformLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.num_Count, System.ComponentModel.ISupportInitialize).EndInit() + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox + Friend WithEvents tb_PartNumberInfo As System.Windows.Forms.TextBox + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents chk_Preview As System.Windows.Forms.CheckBox + Friend WithEvents bt_AddStoreLoc As System.Windows.Forms.Button + Friend WithEvents num_Count As System.Windows.Forms.NumericUpDown + Friend WithEvents Label11 As System.Windows.Forms.Label + Friend WithEvents lstb_Log As System.Windows.Forms.ListBox + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents bt_Save As System.Windows.Forms.Button + Friend WithEvents combo_StoreName As System.Windows.Forms.ComboBox + Friend WithEvents combo_StoreLoc As System.Windows.Forms.ComboBox + Friend WithEvents combo_Unit As System.Windows.Forms.ComboBox + Friend WithEvents tb_UseInfo As System.Windows.Forms.TextBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label7 As System.Windows.Forms.Label + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents tb_OderNumber As System.Windows.Forms.TextBox + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents tb_PartNumber As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents Label10 As System.Windows.Forms.Label +End Class diff --git a/WT-DMS/form_Product.resx b/WT-DMS/form_Product.resx new file mode 100644 index 0000000..1af7de1 --- /dev/null +++ b/WT-DMS/form_Product.resx @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/WT-DMS/form_Product.vb b/WT-DMS/form_Product.vb new file mode 100644 index 0000000..4bfd922 --- /dev/null +++ b/WT-DMS/form_Product.vb @@ -0,0 +1,252 @@ +Public Class form_Product + Dim m_Table As New System.Data.DataTable + Dim m_Product As New CProductsManage + Dim m_PartNumber As New CPartNumber + Dim 库位表列表 As New ArrayList + Dim 库位表名 As String = "" + + Public Property OutStore() As Boolean + Get + Return m_Product.OutStore + End Get + Set(ByVal value As Boolean) + m_Product.OutStore = value + End Set + End Property + + Private Function GetStoreList() As Boolean + Dim m_Store As New CStore + + combo_StoreName.Items.Clear() + 库位表列表.Clear() + + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If m_Store.QueryAll(m_Table) = ERROR_CODE.SUCCESS Then + For i As Integer = 0 To m_Table.Rows.Count - 1 + combo_StoreName.Items.Add(m_Table.Rows(i).Item(CStore.COLS.仓库名称)) + 库位表列表.Add(m_Table.Rows(i).Item(CStore.COLS.仓库库位表)) + Next + Return True + End If + + Return False + End Function + + Private Function GetStoreLocationList() As Boolean + Dim m_StoreLocation As New CStoreLocation() + combo_StoreLoc.Items.Clear() + + m_StoreLocation.TABLE_NAME = 库位表名 + m_Table.Rows.Clear() + m_Table.Columns.Clear() + If m_StoreLocation.QueryAll(m_Table) = ERROR_CODE.SUCCESS Then + For i As Integer = 0 To m_Table.Rows.Count - 1 + combo_StoreLoc.Items.Add(m_Table.Rows(i).Item(CStoreLocation.COLS.库位)) + Next + + Return True + End If + + Return False + End Function + + '获取料号信息 + Private Function GetPartNumberInformation(ByVal strPartNumber As String) As Boolean + Dim 物料名称 As String = "" + Dim 规格描述 As String = "" + Dim 单位 As String = "" + Dim 单重 As Double = 0 + Dim 图片(0) As Byte + Dim 供应商ID As String = "" + + Dim strInfo As String = "" + tb_PartNumberInfo.Text = "" + Dim result As Boolean = False + If chk_Preview.Checked = True Then + If m_PartNumber.QueryItem(tb_PartNumber.Text, 物料名称, 规格描述, 单位, 单重, 图片, 供应商ID) = ERROR_CODE.SUCCESS Then + strInfo = "物料名称: " & 物料名称 & vbNewLine + strInfo &= "规格描述: " & 规格描述 & vbNewLine + strInfo &= "单位: " & 单位 & vbNewLine + strInfo &= "单重: " & 单重 & vbNewLine + strInfo &= "供应商ID: " & 供应商ID & vbNewLine + + PictureBox1.BackgroundImage = GetImageFromBytes(图片) + tb_PartNumberInfo.Text = strInfo + result = True + End If + Else + If m_PartNumber.QueryItem(tb_PartNumber.Text, 物料名称, 规格描述, 单位, 单重, 供应商ID) = ERROR_CODE.SUCCESS Then + strInfo = "物料名称: " & 物料名称 & vbNewLine + strInfo &= "规格描述: " & 规格描述 & vbNewLine + strInfo &= "单位: " & 单位 & vbNewLine + strInfo &= "单重: " & 单重 & vbNewLine + strInfo &= "供应商ID: " & 供应商ID & vbNewLine + + PictureBox1.BackgroundImage = Nothing + tb_PartNumberInfo.Text = strInfo + result = True + End If + End If + + If result = True Then + tb_PartNumber.BackColor = Color.White + Else + tb_PartNumber.BackColor = Color.Red + End If + + Return result + End Function + + Private Sub AddLog(ByVal text As String) + Dim index As Integer = lstb_Log.Items.Add(Now.ToString & ":" & text) + lstb_Log.SelectedIndex = index + End Sub + + Private Sub form_Material_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed + My.Settings.Save() + End Sub + + Private Sub form_Material_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + My.Settings.Reload() + + GetStoreList() + End Sub + + Private Sub StoreLocUpdated() + '重新载入库位列表 + If GetStoreLocationList() = False Then + MsgBox("载入库位列表失败!") + End If + End Sub + + Private Sub bt_AddStoreLoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_AddStoreLoc.Click + Dim pForm As New form_StoreLocManage(库位表名) + pForm.MdiParent = MainForm + AddHandler pForm.StoreLocUpdated, AddressOf StoreLocUpdated + pForm.Show() + End Sub + + Private Sub tb_PartNumber_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tb_PartNumber.TextChanged + If tb_PartNumber.Text.Length >= 8 Then + GetPartNumberInformation(tb_PartNumber.Text) + End If + End Sub + + Private Sub tb_PartNumber_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tb_PartNumber.Leave + If tb_PartNumber.Text.Length > 0 Then + GetPartNumberInformation(tb_PartNumber.Text) + End If + End Sub + + Private Sub chk_Preview_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chk_Preview.CheckedChanged + If tb_PartNumber.Text.Length > 0 Then + GetPartNumberInformation(tb_PartNumber.Text) + End If + End Sub + + Private Function CheckInputValid() As Boolean + Dim valid As Boolean = True + + '料号 + If tb_PartNumber.Text.Length <= 0 Then + valid = False + End If + If tb_PartNumber.Text.Length > SEC_LENGTH.料号PN Then + valid = False + End If + + If valid = True Then + tb_PartNumber.BackColor = Color.White + Else + tb_PartNumber.BackColor = Color.Red + End If + + '订单号 + + '数量 + If num_Count.Value > 0 Then + num_Count.BackColor = Color.White + Else + num_Count.BackColor = Color.Red + valid = False + End If + + '仓库 + If combo_StoreName.Text.Length > 0 Then + combo_StoreName.BackColor = Color.White + Else + combo_StoreName.BackColor = Color.Red + valid = False + End If + + '库位 + If combo_StoreLoc.Text.Length > 0 Then + combo_StoreLoc.BackColor = Color.White + Else + combo_StoreLoc.BackColor = Color.Red + valid = False + End If + + Return valid + End Function + + Private Sub bt_Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Save.Click + '首先检查料号信息完整性 + If CheckInputValid() = False Then + MsgBox("物料属性存在错误！请见红色背景提示") + Return + End If + + '检测料号唯一性 + Dim isExist As Boolean = False + If m_PartNumber.CheckPartNumber(tb_PartNumber.Text, isExist) = ERROR_CODE.SUCCESS Then + If isExist = False Then + tb_PartNumber.BackColor = Color.Red + MsgBox("当前料号不存在: " & tb_PartNumber.Text) + Return + End If + Else + MsgBox("访问数据库失败: 请检查网络连接或联系管理员!") + Return + End If + + + '保存物料 + Dim m_date As Date = Now + Dim result As ERROR_CODE = m_Product.AddItem(m_Product.OutStore, + tb_PartNumber.Text, + tb_OderNumber.Text, + m_date.ToShortDateString, + m_date.ToShortTimeString, + num_Count.Value, + Current_UserName, + combo_StoreName.Text, + combo_StoreLoc.Text, + tb_UseInfo.Text) + If result = ERROR_CODE.SUCCESS Then + AddLog("成功添加: " & + IIf(m_Product.OutStore, "出库", "入库") & "," & + tb_PartNumber.Text & "," & + tb_OderNumber.Text & "," & + num_Count.Value & "," & + combo_StoreName.Text & "," & + combo_StoreLoc.Text & "," & + tb_UseInfo.Text) + ElseIf result = ERROR_CODE.NORIGHT Then + MsgBox("保存失败： ""无访问权限!""") + Else + MsgBox("保存失败: 请检查网络连接或联系管理员!") + End If + End Sub + + Private Sub combo_StoreName_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles combo_StoreName.SelectedIndexChanged + If combo_StoreName.SelectedIndex >= 0 Then + 库位表名 = 库位表列表.Item(combo_StoreName.SelectedIndex) + Else + 库位表名 = "" + End If + + StoreLocUpdated() + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/form_Query.Designer.vb b/WT-DMS/form_Query.Designer.vb new file mode 100644 index 0000000..0f4011e --- /dev/null +++ b/WT-DMS/form_Query.Designer.vb @@ -0,0 +1,214 @@ + _ +Partial Class form_Query + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(form_Query)) + Me.grid_Result = New FlexCell.Grid() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.bt_FillIn = New System.Windows.Forms.Button() + Me.bt_Query = New System.Windows.Forms.Button() + Me.txt_SQL = New System.Windows.Forms.TextBox() + Me.Grid_Conditions = New FlexCell.Grid() + Me.Label4 = New System.Windows.Forms.Label() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.clb_Section = New System.Windows.Forms.CheckedListBox() + Me.clb_Table = New System.Windows.Forms.CheckedListBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.lblItemCount = New System.Windows.Forms.Label() + Me.GroupBox1.SuspendLayout() + Me.SuspendLayout() + ' + 'grid_Result + ' + Me.grid_Result.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.grid_Result.CheckedImage = CType(resources.GetObject("grid_Result.CheckedImage"), System.Drawing.Bitmap) + Me.grid_Result.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.grid_Result.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.grid_Result.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.grid_Result.Location = New System.Drawing.Point(12, 284) + Me.grid_Result.MultiSelect = False + Me.grid_Result.Name = "grid_Result" + Me.grid_Result.Size = New System.Drawing.Size(764, 219) + Me.grid_Result.TabIndex = 2 + Me.grid_Result.UncheckedImage = CType(resources.GetObject("grid_Result.UncheckedImage"), System.Drawing.Bitmap) + ' + 'GroupBox1 + ' + Me.GroupBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.GroupBox1.Controls.Add(Me.bt_FillIn) + Me.GroupBox1.Controls.Add(Me.bt_Query) + Me.GroupBox1.Controls.Add(Me.txt_SQL) + Me.GroupBox1.Controls.Add(Me.Grid_Conditions) + Me.GroupBox1.Controls.Add(Me.Label4) + Me.GroupBox1.Controls.Add(Me.Label3) + Me.GroupBox1.Controls.Add(Me.Label2) + Me.GroupBox1.Controls.Add(Me.clb_Section) + Me.GroupBox1.Controls.Add(Me.clb_Table) + Me.GroupBox1.Location = New System.Drawing.Point(12, 12) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.RightToLeft = System.Windows.Forms.RightToLeft.No + Me.GroupBox1.Size = New System.Drawing.Size(765, 241) + Me.GroupBox1.TabIndex = 5 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "查询条件" + ' + 'bt_FillIn + ' + Me.bt_FillIn.Enabled = False + Me.bt_FillIn.Location = New System.Drawing.Point(324, 40) + Me.bt_FillIn.Name = "bt_FillIn" + Me.bt_FillIn.Size = New System.Drawing.Size(28, 23) + Me.bt_FillIn.TabIndex = 5 + Me.bt_FillIn.Text = ">>" + Me.bt_FillIn.UseVisualStyleBackColor = True + ' + 'bt_Query + ' + Me.bt_Query.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_Query.Location = New System.Drawing.Point(672, 191) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(80, 41) + Me.bt_Query.TabIndex = 7 + Me.bt_Query.Text = "Query" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'txt_SQL + ' + Me.txt_SQL.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txt_SQL.Location = New System.Drawing.Point(12, 191) + Me.txt_SQL.Multiline = True + Me.txt_SQL.Name = "txt_SQL" + Me.txt_SQL.Size = New System.Drawing.Size(654, 41) + Me.txt_SQL.TabIndex = 5 + ' + 'Grid_Conditions + ' + Me.Grid_Conditions.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Grid_Conditions.CheckedImage = CType(resources.GetObject("Grid_Conditions.CheckedImage"), System.Drawing.Bitmap) + Me.Grid_Conditions.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid_Conditions.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid_Conditions.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid_Conditions.Location = New System.Drawing.Point(353, 36) + Me.Grid_Conditions.MultiSelect = False + Me.Grid_Conditions.Name = "Grid_Conditions" + Me.Grid_Conditions.Size = New System.Drawing.Size(399, 149) + Me.Grid_Conditions.TabIndex = 2 + Me.Grid_Conditions.UncheckedImage = CType(resources.GetObject("Grid_Conditions.UncheckedImage"), System.Drawing.Bitmap) + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(351, 21) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(29, 12) + Me.Label4.TabIndex = 4 + Me.Label4.Text = "条件" + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(222, 21) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(53, 12) + Me.Label3.TabIndex = 4 + Me.Label3.Text = "查询字段" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(66, 20) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(41, 12) + Me.Label2.TabIndex = 4 + Me.Label2.Text = "查询表" + ' + 'clb_Section + ' + Me.clb_Section.FormattingEnabled = True + Me.clb_Section.Location = New System.Drawing.Point(172, 36) + Me.clb_Section.Name = "clb_Section" + Me.clb_Section.Size = New System.Drawing.Size(150, 148) + Me.clb_Section.TabIndex = 1 + ' + 'clb_Table + ' + Me.clb_Table.FormattingEnabled = True + Me.clb_Table.Location = New System.Drawing.Point(12, 36) + Me.clb_Table.Name = "clb_Table" + Me.clb_Table.Size = New System.Drawing.Size(154, 148) + Me.clb_Table.TabIndex = 1 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(12, 266) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(53, 12) + Me.Label1.TabIndex = 6 + Me.Label1.Text = "查询结果" + ' + 'lblItemCount + ' + Me.lblItemCount.AutoSize = True + Me.lblItemCount.Location = New System.Drawing.Point(89, 266) + Me.lblItemCount.Name = "lblItemCount" + Me.lblItemCount.Size = New System.Drawing.Size(0, 12) + Me.lblItemCount.TabIndex = 8 + ' + 'form_Query + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(788, 515) + Me.Controls.Add(Me.lblItemCount) + Me.Controls.Add(Me.Label1) + Me.Controls.Add(Me.GroupBox1) + Me.Controls.Add(Me.grid_Result) + Me.Name = "form_Query" + Me.Text = "数据库查询" + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox1.PerformLayout() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents grid_Result As FlexCell.Grid + Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents clb_Table As System.Windows.Forms.CheckedListBox + Friend WithEvents clb_Section As System.Windows.Forms.CheckedListBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents lblItemCount As System.Windows.Forms.Label + Friend WithEvents bt_FillIn As System.Windows.Forms.Button + Friend WithEvents txt_SQL As System.Windows.Forms.TextBox + Friend WithEvents Grid_Conditions As FlexCell.Grid +End Class diff --git a/WT-DMS/form_Query.resx b/WT-DMS/form_Query.resx new file mode 100644 index 0000000..2c3bdf1 --- /dev/null +++ b/WT-DMS/form_Query.resx @@ -0,0 +1,153 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/form_Query.vb b/WT-DMS/form_Query.vb new file mode 100644 index 0000000..8754824 --- /dev/null +++ b/WT-DMS/form_Query.vb @@ -0,0 +1,607 @@ +Public Class form_Query + Dim SectionNameList As New ArrayList + Dim TableNameList As New ArrayList + + Dim m_ComboDataType(COLS.max - 1) As COMBO_DATA_TYPE '存储下拉列表的类型 + Dim m_ConditionCount As Integer = 0 + Dim m_EditCol As Integer + Dim m_EditRow As Integer + + Dim QueryTable As New DataTable + + Public Class SECTION_UNIT + Public name As String + Public check As Boolean + End Class + + Enum COMBO_DATA_TYPE + table + section + End Enum + + Enum COLS + 序号 + 关联 + 字段 + 运算 + 字段_值 + max + End Enum + + Enum SECTION_TYPE + 无效 + 值 + 字段 + End Enum + + '获取W&T Database数据库中所有的表 + Private Function GetTableList() As Boolean + Dim rTable As New Data.DataTable + Dim result As Boolean = True + + TableNameList.Clear() + rTable.Columns.Clear() + rTable.Rows.Clear() + rTable.Clear() + If SQL_Query(CAccountManage.COL_RIGHTS.登录, "show tables", rTable) = True Then + If rTable.Rows.Count > 0 Then + Try + For i As Integer = 0 To rTable.Rows.Count - 1 + Dim pSectionUnit As New SECTION_UNIT + pSectionUnit.name = rTable.Rows.Item(i).Item(0) + pSectionUnit.check = False + TableNameList.Add(pSectionUnit) + Next + Catch ex As Exception + + End Try + End If + Else + result = False + End If + + Return result + End Function + + '获取所有表对应的字段名称列表 + Private Function GetSectionNameList() As Boolean + Dim rTable As New Data.DataTable + Dim result As Boolean = True + + SectionNameList.Clear() + Dim TableName As String + For Each pTableInfo As SECTION_UNIT In TableNameList + TableName = pTableInfo.name + + Dim pItemList As New ArrayList + + rTable.Columns.Clear() + rTable.Rows.Clear() + rTable.Clear() + If SQL_Query("SELECT * FROM `" & TableName & "` WHERE 0", rTable) = True Then + For i As Integer = 0 To rTable.Columns.Count - 1 + Dim pSectionUnit As New SECTION_UNIT + pSectionUnit.name = rTable.Columns.Item(i).ColumnName + pSectionUnit.check = False + pItemList.Add(pSectionUnit) + Next + + SectionNameList.Add(pItemList) + Else + result = False + End If + Next + + Return result + End Function + + Private Sub form_Query_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + If GetTableList() = False Then + MsgBox("载入数据表错误") + Me.Close() + Return + End If + If GetSectionNameList() = False Then + MsgBox("载入数据表字段错误") + Me.Close() + Return + End If + + '填充查询表 + Fill_TableList() + + '初始化Conditions列表 + Init_ConditionTable() + End Sub + + Private Sub Init_ConditionTable() + Grid_Conditions.Cols = COLS.max + Grid_Conditions.Rows = 2 + + '填充列名 + Grid_Conditions.Cell(0, 0).Text = "序号" + Grid_Conditions.Cell(0, 1).Text = "关联" + Grid_Conditions.Cell(0, 2).Text = "字段" + Grid_Conditions.Cell(0, 3).Text = "运算" + Grid_Conditions.Cell(0, 4).Text = "字段/值" + + Grid_Conditions.Cell(1, 0).Text = m_ConditionCount + 1 + Grid_Conditions.Cell(COLS.关联, 1).Locked = True + + '填入“关联”字段列表值 + Grid_Conditions.Column(COLS.关联).CellType = FlexCell.CellTypeEnum.ComboBox + Dim i As Integer + With Grid_Conditions.ComboBox(COLS.关联) + .Locked = True + .AutoComplete = True + For i = 0 To mdl_SQLConst.rel_Conditions.Length / 2 - 1 + .Items.Add(mdl_SQLConst.rel_Conditions(i, 0)) + Next + End With + + '填入“运算”字段列表值 + Grid_Conditions.Column(COLS.运算).CellType = FlexCell.CellTypeEnum.ComboBox + With Grid_Conditions.ComboBox(COLS.运算) + .Locked = True + .AutoComplete = True + For i = 0 To mdl_SQLConst.rel_Operator.Length / 2 - 1 + .Items.Add(mdl_SQLConst.rel_Operator(i, 0)) + Next + End With + + '填入“字段” + Grid_Conditions.Column(COLS.字段).Width = 80 + Grid_Conditions.Column(COLS.字段).CellType = FlexCell.CellTypeEnum.ComboBox + Fill_ComboList(Grid_Conditions.ComboBox(COLS.字段), "", 0, COMBO_DATA_TYPE.table) + + '填入"字段/值" + Grid_Conditions.Column(COLS.字段_值).Width = 80 + Grid_Conditions.Column(COLS.字段_值).CellType = FlexCell.CellTypeEnum.ComboBox + Fill_ComboList(Grid_Conditions.ComboBox(COLS.字段_值), "", 0, COMBO_DATA_TYPE.table) + End Sub + + Private Sub Fill_TableList() + clb_Table.Items.Clear() + + For Each pItem As SECTION_UNIT In TableNameList + clb_Table.Items.Add(pItem.name) + Next + End Sub + + Private Function Fill_SectionList(ByVal index As Integer) As Boolean + If index > SectionNameList.Count Then Return False + + Dim pItem As ArrayList = SectionNameList.Item(index) + clb_Section.Items.Clear() + + Dim sec_idx As Integer + For Each pSec As SECTION_UNIT In pItem + sec_idx = clb_Section.Items.Add(pSec.name) + clb_Section.SetItemChecked(sec_idx, pSec.check) + Next + + Return True + End Function + + Private Sub chklb_Table_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles clb_Table.SelectedIndexChanged + If clb_Table.SelectedIndex >= 0 Then + Fill_SectionList(clb_Table.SelectedIndex) + End If + End Sub + + + Private Function GetAnySectionChecked(ByVal currIndex As Integer) As Boolean + Dim checked As Boolean = False + For i As Integer = 0 To clb_Section.Items.Count - 1 + If i <> currIndex Then + If clb_Section.GetItemChecked(i) = True Then + checked = True + Exit For + End If + End If + Next + + Return checked + End Function + + Private Sub clb_Table_ItemCheck(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ItemCheckEventArgs) Handles clb_Table.ItemCheck + Dim pTable As SECTION_UNIT = TableNameList.Item(e.Index) + pTable.check = e.NewValue + SQLGenerateFromCondition() + End Sub + + Private Sub clb_Section_ItemCheck(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ItemCheckEventArgs) Handles clb_Section.ItemCheck + If clb_Table.SelectedIndex >= 0 AndAlso e.Index >= 0 Then + Dim pTable As ArrayList = SectionNameList(clb_Table.SelectedIndex) + Dim pSec As SECTION_UNIT = pTable(e.Index) + pSec.check = e.NewValue + + If e.NewValue OrElse GetAnySectionChecked(e.Index) = True Then + clb_Table.SetItemChecked(clb_Table.SelectedIndex, True) + Else + clb_Table.SetItemChecked(clb_Table.SelectedIndex, False) + End If + + SQLGenerateFromCondition() + End If + End Sub + + Private Sub Grid_Conditions_LeaveCell(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.LeaveCellEventArgs) Handles Grid_Conditions.LeaveCell + SQLGenerateFromCondition() + End Sub + + '填充dgview_Condition中的“字段”下拉框列表 + Private Function Fill_ComboList(ByRef pCombo As FlexCell.ComboBox, ByVal PreTableName As String, ByVal index As Integer, ByVal type As COMBO_DATA_TYPE) As Boolean + Dim pSection As SECTION_UNIT + + pCombo.Items.Clear() + pCombo.DropDownWidth = 200 + If type = COMBO_DATA_TYPE.table Then + For i As Integer = 0 To TableNameList.Count - 1 + pSection = TableNameList(i) + If pSection.check = True Then + pCombo.Items.Add(pSection.name) + End If + Next + Else + If index > SectionNameList.Count Then Return False + + Dim pTable As ArrayList = SectionNameList.Item(index) + + For Each pSec As SECTION_UNIT In pTable + pCombo.Items.Add(PreTableName & "." & pSec.name) + Next + End If + + Return True + End Function + + Private Sub UpdateComboBoxList(ByVal row As Integer, ByVal col As Integer) + 'Dim col As Integer = e.Col + 'Dim row As Integer = e.Row + + If col < 1 OrElse row < 1 Then Return + + If col = COLS.字段 OrElse col = COLS.字段_值 Then + Try + Dim pCombo As FlexCell.ComboBox = Grid_Conditions.ComboBox(col) + + Dim strContent As String = Grid_Conditions.Cell(row, col).Text + Dim dotPos As Integer = Strings.InStr(strContent, ".") + + If dotPos > 0 Then + Dim tablename As String = Strings.Left(strContent, dotPos - 1) + Dim index As Integer = GetTableIndex(tablename) + If index >= 0 Then + If pCombo.Items.Count = 0 OrElse m_ComboDataType(col) <> COMBO_DATA_TYPE.section Then + Fill_ComboList(pCombo, tablename, index, COMBO_DATA_TYPE.section) + m_ComboDataType(col) = COMBO_DATA_TYPE.section + End If + End If + Else + If pCombo.Items.Count = 0 OrElse m_ComboDataType(col) <> COMBO_DATA_TYPE.table Then + Fill_ComboList(pCombo, "", 0, COMBO_DATA_TYPE.table) + m_ComboDataType(col) = COMBO_DATA_TYPE.table + End If + End If + + pCombo.DropDown() + Catch ex As Exception + + End Try + End If + End Sub + + + 'Private Sub Grid_Conditions_ComboClick(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.ComboClickEventArgs) Handles Grid_Conditions.ComboClick + ' '更新下拉列表 + ' UpdateComboBoxList(m_EditRow, m_EditCol) + 'End Sub + + Private Sub Grid_Conditions_CellChanging(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.CellChangingEventArgs) Handles Grid_Conditions.CellChanging + '更新下拉列表 + UpdateComboBoxList(e.Row, e.Col) + + '自动添加"序号" + If Grid_Conditions.Cell(e.Row, 0).Text <> e.Row.ToString Then + Grid_Conditions.Cell(e.Row, 0).Text = e.Row + End If + + '自动增加一行 + If Grid_Conditions.Rows = (e.Row + 1) Then + Grid_Conditions.Rows += 1 + End If + End Sub + + Private Function dgview_Condition() As Object + Throw New NotImplementedException + End Function + + 'Private Sub Grid_Conditions_EditRow(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.EditRowEventArgs) Handles Grid_Conditions.EditRow + ' If Grid_Conditions.Cell(e.Row, 0).Text <> e.Row.ToString Then + ' Grid_Conditions.Cell(e.Row, 0).Text = e.Row + ' End If + 'End Sub + + Private Sub Grid_Conditions_RowColChange(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.RowColChangeEventArgs) Handles Grid_Conditions.RowColChange + If e.Col = COLS.字段 OrElse e.Col = COLS.字段_值 Then + bt_FillIn.Enabled = True + Else + bt_FillIn.Enabled = False + End If + + m_EditCol = e.Col + m_EditRow = e.Row + + '更新下拉列表 + UpdateComboBoxList(m_EditRow, m_EditCol) + End Sub + + Private Sub bt_FillIn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_FillIn.Click + Dim table_idx As Integer = clb_Table.SelectedIndex + Dim section_idx As Integer = clb_Section.SelectedIndex + + If table_idx >= 0 AndAlso section_idx >= 0 Then + Grid_Conditions.Cell(m_EditRow, m_EditCol).Text = clb_Table.Items(table_idx) & "." & clb_Section.Items(section_idx) + End If + End Sub + + '在TableNameList中查找tblName，并返回序号 + '如果未找到则返回-1 + Private Function GetTableIndex(ByVal tblName As String) As Integer + Dim index As Integer = 0 + For Each pTable As SECTION_UNIT In TableNameList + If pTable.name.ToUpper = tblName.ToUpper Then + Return index + End If + index += 1 + Next + + Return -1 + End Function + + '在SectionNameList中查找secName，并返回序号 + '如果未找到则返回-1 + Private Function GetSectionIndex(ByVal tblIndex As Integer, ByVal secName As String) As Integer + Dim pTable As ArrayList = SectionNameList.Item(tblIndex) + + Dim index As Integer = 0 + For Each pSec As SECTION_UNIT In pTable + If pSec.name.ToUpper = secName.ToUpper Then + Return index + End If + index += 1 + Next + + Return -1 + End Function + + '检查指定的行是否为空 + Private Function CheckConditionTableLineEmpty(ByVal row As Integer) As Boolean + Dim line_not_empty As Boolean = False + Dim cell_text As String + For col = 1 To Grid_Conditions.Cols - 1 + If Not (col = COLS.关联 And row = 1) Then '忽略行1的关联单元 + Try + cell_text = Grid_Conditions.Cell(row, col).Text + If cell_text.Length > 0 Then + line_not_empty = True + Exit For + End If + Catch ex As Exception + + End Try + End If + Next + Return line_not_empty + End Function + + '检查指定字符串是否为有效的字段名 + Private Function CheckTextIsValidSectionName(ByVal text As String) As SECTION_TYPE + If text.Length = 0 Then Return SECTION_TYPE.无效 + + Dim m_section_type As SECTION_TYPE = SECTION_TYPE.无效 + Dim cell_split() As String = Split(text, ".") + If cell_split.Length >= 2 Then '如果包含点，则检查是否为有效的字段名 + '查找当前表名是否存在 + Dim tbl_index As Integer = GetTableIndex(cell_split(0)) + If tbl_index >= 0 Then + If GetSectionIndex(tbl_index, cell_split(1)) >= 0 Then + m_section_type = SECTION_TYPE.字段 + End If + End If + Else + '否则为其它值,非字段名 + m_section_type = SECTION_TYPE.值 + End If + + Return m_section_type + End Function + + '对Grid_Conditions列表进行错误检查 + '并将错误的单元标记为红色 + '返回 True -- 无错误 + ' False -- 错误 + Private Function ConditionCheck() As Boolean + Dim col As Integer + Dim row As Integer + Dim col_count As Integer = Grid_Conditions.Cols + Dim row_count As Integer = Grid_Conditions.Rows + Dim cell_text As String + + Dim valid As Boolean = True + Dim line_not_empty As Boolean + Dim line_valid As Boolean + Dim cell_valid As Boolean + For row = 1 To row_count - 1 + line_valid = True + '检查当前行是否为空行 + line_not_empty = CheckConditionTableLineEmpty(row) + + '如果当前行不为空 + If line_not_empty = True Then + '检测每个行中的值是否有效 + For col = 0 To col_count - 1 + cell_valid = True + If Not (col = COLS.关联 And row = 1) Then '忽略行1的关联单元 + cell_text = Grid_Conditions.Cell(row, col).Text + '当前单元不能为空 + If cell_text.Length > 0 Then + '字段列中的表与字段需要有效 + If col = COLS.字段 OrElse col = COLS.字段_值 Then + If CheckTextIsValidSectionName(cell_text) = SECTION_TYPE.无效 Then + cell_valid = False + End If + End If + Else + cell_valid = False + End If + End If + + If cell_valid = False Then + Grid_Conditions.Cell(row, col).BackColor = Color.Red + line_valid = False + Else + Grid_Conditions.Cell(row, col).BackColor = Color.White + End If + Next + End If + + If line_valid = False Then + Grid_Conditions.Cell(row, 0).BackColor = Color.Red + valid = False + Else + Grid_Conditions.Cell(row, 0).BackColor = Grid_Conditions.Cell(0, 0).BackColor + End If + Next + + Return valid + End Function + + '依据条件设置，生成对应的SQL语句 + Private Sub SQLGenerateFromCondition() + Dim strSQL_all As String = "" + Dim strSQL_Sections As String = "" + Dim strSQL_Tables As String = "" + Dim strSQL_Conditions As String = "" + + Dim pTable As SECTION_UNIT + Dim pSecList As ArrayList + Dim pSec As SECTION_UNIT + Dim tbl_idx As Integer + Dim sec_idx As Integer + + '查询字段与表 + For tbl_idx = 0 To TableNameList.Count - 1 + pTable = TableNameList.Item(tbl_idx) + + '如果表被选中 + If pTable.check = True Then + If strSQL_Tables.Length > 0 Then + strSQL_Tables &= "," + End If + strSQL_Tables &= "`" & pTable.name & "`" + + pSecList = SectionNameList.Item(tbl_idx) + For sec_idx = 0 To pSecList.Count - 1 + pSec = pSecList.Item(sec_idx) + If pSec.check = True Then + If strSQL_Sections.Length > 0 Then + strSQL_Sections &= "," + End If + strSQL_Sections &= "`" & pTable.name & "`.`" & pSec.name & "`" + End If + Next + End If + Next + + '查询条件 + 'Dim col As Integer + Dim row As Integer + Dim col_count As Integer = Grid_Conditions.Cols + Dim row_count As Integer = Grid_Conditions.Rows + Dim cell_text As String + + Dim valid As Boolean = True + Dim line_not_empty As Boolean + Dim line_valid As Boolean + For row = 1 To row_count - 1 + line_valid = True + '检查当前行是否为空行 + line_not_empty = CheckConditionTableLineEmpty(row) + + If line_not_empty = True Then + If strSQL_Conditions.Length > 0 Then + strSQL_Conditions &= " " + End If + + '关联 + cell_text = Grid_Conditions.Cell(row, COLS.关联).Text + If cell_text.Length > 0 Then + strSQL_Conditions &= GetRelConditionSQL(cell_text) & " " + End If + + '字段 + cell_text = Grid_Conditions.Cell(row, COLS.字段).Text + strSQL_Conditions &= cell_text + + '运算符 + cell_text = Grid_Conditions.Cell(row, COLS.运算).Text + strSQL_Conditions &= " " & GetRelOperatorSQL(cell_text) & " " + + '字段/值 + cell_text = Grid_Conditions.Cell(row, COLS.字段_值).Text + If CheckTextIsValidSectionName(cell_text) = SECTION_TYPE.字段 Then + strSQL_Conditions &= " " & cell_text & " " + Else + strSQL_Conditions &= "'" & cell_text & "' " + End If + End If + Next + + '合并各个字段 + strSQL_all = "SELECT " & strSQL_Sections & " FROM " & strSQL_Tables + If strSQL_Conditions.Length > 0 Then + strSQL_all &= " WHERE " & strSQL_Conditions + End If + + txt_SQL.Text = strSQL_all + End Sub + + '通过“关联”名称获取对应的SQL表示符 + Private Function GetRelConditionSQL(ByVal disname As String) As String + For i As Integer = 0 To rel_Conditions.Length / 2 - 1 + If rel_Conditions(i, 0) = disname Then + Return rel_Conditions(i, 1) + End If + Next + Return "" + End Function + + '通过"运算符"民初获取对应的SQL表示符 + Private Function GetRelOperatorSQL(ByVal disname As String) As String + For i As Integer = 0 To rel_Operator.Length / 2 - 1 + If rel_Operator(i, 0) = disname Then + Return rel_Operator(i, 1) + End If + Next + Return "" + End Function + + Private Sub bt_Query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Query.Click + If ConditionCheck() = False Then + MsgBox("条件列表存在错误!") + Else + QueryTable.Columns.Clear() + QueryTable.Rows.Clear() + QueryTable.Clear() + If SQL_Query(txt_SQL.Text, QueryTable) = True Then + grid_Result.SetDataBinding(QueryTable) + End If + grid_Result.Locked = True + + lblItemCount.Text = "共 " & QueryTable.Rows.Count & " 条" + End If + End Sub + +End Class \ No newline at end of file diff --git a/WT-DMS/form_QuerySim.Designer.vb b/WT-DMS/form_QuerySim.Designer.vb new file mode 100644 index 0000000..bdbb854 --- /dev/null +++ b/WT-DMS/form_QuerySim.Designer.vb @@ -0,0 +1,469 @@ + _ +Partial Class form_QuerySim + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(form_QuerySim)) + Me.Grid1 = New FlexCell.Grid() + Me.TabControl1 = New System.Windows.Forms.TabControl() + Me.TabPage1 = New System.Windows.Forms.TabPage() + Me.ckb_Pn_Inhaos = New System.Windows.Forms.CheckBox() + Me.ckb_PnJohao = New System.Windows.Forms.CheckBox() + Me.chkShowImage = New System.Windows.Forms.CheckBox() + Me.bt_QueryQuick = New System.Windows.Forms.Button() + Me.tb_Desc = New System.Windows.Forms.TextBox() + Me.Label6 = New System.Windows.Forms.Label() + Me.tb_Name = New System.Windows.Forms.TextBox() + Me.Label5 = New System.Windows.Forms.Label() + Me.tb_PartNumber = New System.Windows.Forms.TextBox() + Me.Label4 = New System.Windows.Forms.Label() + Me.TabPage2 = New System.Windows.Forms.TabPage() + Me.bt_Query = New System.Windows.Forms.Button() + Me.tb_Value = New System.Windows.Forms.TextBox() + Me.Label1 = New System.Windows.Forms.Label() + Me.combo_Section = New System.Windows.Forms.ComboBox() + Me.Label3 = New System.Windows.Forms.Label() + Me.Label2 = New System.Windows.Forms.Label() + Me.combo_Operate = New System.Windows.Forms.ComboBox() + Me.lbl_Information = New System.Windows.Forms.Label() + Me.lbl_Select = New System.Windows.Forms.Label() + Me.GroupBox2 = New System.Windows.Forms.GroupBox() + Me.lbl_NoImage = New System.Windows.Forms.Label() + Me.lbl_ImageReading = New System.Windows.Forms.Label() + Me.PictureBox1 = New System.Windows.Forms.PictureBox() + Me.bt_Del = New System.Windows.Forms.Button() + Me.btn_Avtive = New System.Windows.Forms.Button() + Me.lab_Tips = New System.Windows.Forms.Label() + Me.btn_SaveChange = New System.Windows.Forms.Button() + Me.chk_MsgForSaveItembyItem = New System.Windows.Forms.CheckBox() + Me.TabControl1.SuspendLayout() + Me.TabPage1.SuspendLayout() + Me.TabPage2.SuspendLayout() + Me.GroupBox2.SuspendLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.Cols = 10 + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(-1, 272) + Me.Grid1.Name = "Grid1" + Me.Grid1.Size = New System.Drawing.Size(607, 300) + Me.Grid1.TabIndex = 1 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'TabControl1 + ' + Me.TabControl1.Controls.Add(Me.TabPage1) + Me.TabControl1.Controls.Add(Me.TabPage2) + Me.TabControl1.Location = New System.Drawing.Point(-1, 1) + Me.TabControl1.Name = "TabControl1" + Me.TabControl1.SelectedIndex = 0 + Me.TabControl1.Size = New System.Drawing.Size(352, 205) + Me.TabControl1.TabIndex = 0 + ' + 'TabPage1 + ' + Me.TabPage1.Controls.Add(Me.ckb_Pn_Inhaos) + Me.TabPage1.Controls.Add(Me.ckb_PnJohao) + Me.TabPage1.Controls.Add(Me.chkShowImage) + Me.TabPage1.Controls.Add(Me.bt_QueryQuick) + Me.TabPage1.Controls.Add(Me.tb_Desc) + Me.TabPage1.Controls.Add(Me.Label6) + Me.TabPage1.Controls.Add(Me.tb_Name) + Me.TabPage1.Controls.Add(Me.Label5) + Me.TabPage1.Controls.Add(Me.tb_PartNumber) + Me.TabPage1.Controls.Add(Me.Label4) + Me.TabPage1.Location = New System.Drawing.Point(4, 22) + Me.TabPage1.Name = "TabPage1" + Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage1.Size = New System.Drawing.Size(344, 179) + Me.TabPage1.TabIndex = 0 + Me.TabPage1.Text = "快速查询" + Me.TabPage1.UseVisualStyleBackColor = True + ' + 'ckb_Pn_Inhaos + ' + Me.ckb_Pn_Inhaos.AutoSize = True + Me.ckb_Pn_Inhaos.Checked = True + Me.ckb_Pn_Inhaos.CheckState = System.Windows.Forms.CheckState.Checked + Me.ckb_Pn_Inhaos.Location = New System.Drawing.Point(38, 150) + Me.ckb_Pn_Inhaos.Name = "ckb_Pn_Inhaos" + Me.ckb_Pn_Inhaos.Size = New System.Drawing.Size(96, 16) + Me.ckb_Pn_Inhaos.TabIndex = 6 + Me.ckb_Pn_Inhaos.Text = " INHAOS 料号" + Me.ckb_Pn_Inhaos.UseVisualStyleBackColor = True + ' + 'ckb_PnJohao + ' + Me.ckb_PnJohao.AutoSize = True + Me.ckb_PnJohao.Checked = True + Me.ckb_PnJohao.CheckState = System.Windows.Forms.CheckState.Checked + Me.ckb_PnJohao.Location = New System.Drawing.Point(38, 128) + Me.ckb_PnJohao.Name = "ckb_PnJohao" + Me.ckb_PnJohao.Size = New System.Drawing.Size(78, 16) + Me.ckb_PnJohao.TabIndex = 5 + Me.ckb_PnJohao.Text = " 卓豪料号" + Me.ckb_PnJohao.UseVisualStyleBackColor = True + ' + 'chkShowImage + ' + Me.chkShowImage.AutoSize = True + Me.chkShowImage.Checked = Global.WT_DMS.My.MySettings.Default.CHK_SHOWIMAGE + Me.chkShowImage.DataBindings.Add(New System.Windows.Forms.Binding("Checked", Global.WT_DMS.My.MySettings.Default, "CHK_SHOWIMAGE", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) + Me.chkShowImage.Location = New System.Drawing.Point(216, 128) + Me.chkShowImage.Name = "chkShowImage" + Me.chkShowImage.Size = New System.Drawing.Size(108, 16) + Me.chkShowImage.TabIndex = 4 + Me.chkShowImage.Text = "选中时预览图片" + Me.chkShowImage.UseVisualStyleBackColor = True + ' + 'bt_QueryQuick + ' + Me.bt_QueryQuick.Location = New System.Drawing.Point(300, 19) + Me.bt_QueryQuick.Name = "bt_QueryQuick" + Me.bt_QueryQuick.Size = New System.Drawing.Size(38, 90) + Me.bt_QueryQuick.TabIndex = 3 + Me.bt_QueryQuick.Text = "查询" + Me.bt_QueryQuick.UseVisualStyleBackColor = True + ' + 'tb_Desc + ' + Me.tb_Desc.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Desc.Location = New System.Drawing.Point(73, 88) + Me.tb_Desc.Name = "tb_Desc" + Me.tb_Desc.Size = New System.Drawing.Size(221, 21) + Me.tb_Desc.TabIndex = 2 + ' + 'Label6 + ' + Me.Label6.AutoSize = True + Me.Label6.Location = New System.Drawing.Point(12, 91) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(53, 12) + Me.Label6.TabIndex = 0 + Me.Label6.Text = "规格描述" + ' + 'tb_Name + ' + Me.tb_Name.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Name.Location = New System.Drawing.Point(73, 53) + Me.tb_Name.Name = "tb_Name" + Me.tb_Name.Size = New System.Drawing.Size(221, 21) + Me.tb_Name.TabIndex = 1 + ' + 'Label5 + ' + Me.Label5.AutoSize = True + Me.Label5.Location = New System.Drawing.Point(12, 56) + Me.Label5.Name = "Label5" + Me.Label5.Size = New System.Drawing.Size(53, 12) + Me.Label5.TabIndex = 0 + Me.Label5.Text = "物料名称" + ' + 'tb_PartNumber + ' + Me.tb_PartNumber.CharacterCasing = System.Windows.Forms.CharacterCasing.Upper + Me.tb_PartNumber.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_PartNumber.Location = New System.Drawing.Point(73, 19) + Me.tb_PartNumber.MaxLength = 32 + Me.tb_PartNumber.Name = "tb_PartNumber" + Me.tb_PartNumber.Size = New System.Drawing.Size(221, 21) + Me.tb_PartNumber.TabIndex = 0 + ' + 'Label4 + ' + Me.Label4.AutoSize = True + Me.Label4.Location = New System.Drawing.Point(36, 22) + Me.Label4.Name = "Label4" + Me.Label4.Size = New System.Drawing.Size(29, 12) + Me.Label4.TabIndex = 0 + Me.Label4.Text = "料号" + ' + 'TabPage2 + ' + Me.TabPage2.Controls.Add(Me.bt_Query) + Me.TabPage2.Controls.Add(Me.tb_Value) + Me.TabPage2.Controls.Add(Me.Label1) + Me.TabPage2.Controls.Add(Me.combo_Section) + Me.TabPage2.Controls.Add(Me.Label3) + Me.TabPage2.Controls.Add(Me.Label2) + Me.TabPage2.Controls.Add(Me.combo_Operate) + Me.TabPage2.Location = New System.Drawing.Point(4, 22) + Me.TabPage2.Name = "TabPage2" + Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) + Me.TabPage2.Size = New System.Drawing.Size(344, 179) + Me.TabPage2.TabIndex = 1 + Me.TabPage2.Text = "高级查询" + Me.TabPage2.UseVisualStyleBackColor = True + ' + 'bt_Query + ' + Me.bt_Query.Location = New System.Drawing.Point(282, 12) + Me.bt_Query.Name = "bt_Query" + Me.bt_Query.Size = New System.Drawing.Size(53, 101) + Me.bt_Query.TabIndex = 3 + Me.bt_Query.Text = "查询" + Me.bt_Query.UseVisualStyleBackColor = True + ' + 'tb_Value + ' + Me.tb_Value.ImeMode = System.Windows.Forms.ImeMode.Off + Me.tb_Value.Location = New System.Drawing.Point(53, 65) + Me.tb_Value.Multiline = True + Me.tb_Value.Name = "tb_Value" + Me.tb_Value.ScrollBars = System.Windows.Forms.ScrollBars.Vertical + Me.tb_Value.Size = New System.Drawing.Size(214, 48) + Me.tb_Value.TabIndex = 2 + ' + 'Label1 + ' + Me.Label1.AutoSize = True + Me.Label1.Location = New System.Drawing.Point(18, 15) + Me.Label1.Name = "Label1" + Me.Label1.Size = New System.Drawing.Size(29, 12) + Me.Label1.TabIndex = 1 + Me.Label1.Text = "字段" + ' + 'combo_Section + ' + Me.combo_Section.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_Section.FormattingEnabled = True + Me.combo_Section.Items.AddRange(New Object() {"料号PN", "物料名称", "规格描述"}) + Me.combo_Section.Location = New System.Drawing.Point(53, 12) + Me.combo_Section.Name = "combo_Section" + Me.combo_Section.Size = New System.Drawing.Size(214, 20) + Me.combo_Section.TabIndex = 0 + ' + 'Label3 + ' + Me.Label3.AutoSize = True + Me.Label3.Location = New System.Drawing.Point(30, 68) + Me.Label3.Name = "Label3" + Me.Label3.Size = New System.Drawing.Size(17, 12) + Me.Label3.TabIndex = 1 + Me.Label3.Text = "值" + ' + 'Label2 + ' + Me.Label2.AutoSize = True + Me.Label2.Location = New System.Drawing.Point(18, 41) + Me.Label2.Name = "Label2" + Me.Label2.Size = New System.Drawing.Size(29, 12) + Me.Label2.TabIndex = 1 + Me.Label2.Text = "运算" + ' + 'combo_Operate + ' + Me.combo_Operate.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.combo_Operate.FormattingEnabled = True + Me.combo_Operate.Location = New System.Drawing.Point(53, 38) + Me.combo_Operate.Name = "combo_Operate" + Me.combo_Operate.Size = New System.Drawing.Size(214, 20) + Me.combo_Operate.TabIndex = 1 + ' + 'lbl_Information + ' + Me.lbl_Information.AutoSize = True + Me.lbl_Information.ForeColor = System.Drawing.Color.Blue + Me.lbl_Information.Location = New System.Drawing.Point(3, 236) + Me.lbl_Information.Name = "lbl_Information" + Me.lbl_Information.Size = New System.Drawing.Size(0, 12) + Me.lbl_Information.TabIndex = 2 + ' + 'lbl_Select + ' + Me.lbl_Select.AutoSize = True + Me.lbl_Select.ForeColor = System.Drawing.Color.Blue + Me.lbl_Select.Location = New System.Drawing.Point(3, 254) + Me.lbl_Select.Name = "lbl_Select" + Me.lbl_Select.Size = New System.Drawing.Size(0, 12) + Me.lbl_Select.TabIndex = 2 + ' + 'GroupBox2 + ' + Me.GroupBox2.Controls.Add(Me.lbl_NoImage) + Me.GroupBox2.Controls.Add(Me.lbl_ImageReading) + Me.GroupBox2.Controls.Add(Me.PictureBox1) + Me.GroupBox2.Location = New System.Drawing.Point(357, 3) + Me.GroupBox2.Name = "GroupBox2" + Me.GroupBox2.Size = New System.Drawing.Size(330, 263) + Me.GroupBox2.TabIndex = 12 + Me.GroupBox2.TabStop = False + Me.GroupBox2.Text = "预览" + ' + 'lbl_NoImage + ' + Me.lbl_NoImage.AutoSize = True + Me.lbl_NoImage.Font = New System.Drawing.Font("宋体", 12.0!) + Me.lbl_NoImage.Location = New System.Drawing.Point(142, 117) + Me.lbl_NoImage.Name = "lbl_NoImage" + Me.lbl_NoImage.Size = New System.Drawing.Size(56, 16) + Me.lbl_NoImage.TabIndex = 1 + Me.lbl_NoImage.Text = "无图片" + ' + 'lbl_ImageReading + ' + Me.lbl_ImageReading.AutoSize = True + Me.lbl_ImageReading.Font = New System.Drawing.Font("宋体", 12.0!) + Me.lbl_ImageReading.Location = New System.Drawing.Point(106, 117) + Me.lbl_ImageReading.Name = "lbl_ImageReading" + Me.lbl_ImageReading.Size = New System.Drawing.Size(128, 16) + Me.lbl_ImageReading.TabIndex = 1 + Me.lbl_ImageReading.Text = "正在读取图片..." + ' + 'PictureBox1 + ' + Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox1.Location = New System.Drawing.Point(5, 18) + Me.PictureBox1.Name = "PictureBox1" + Me.PictureBox1.Size = New System.Drawing.Size(320, 240) + Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom + Me.PictureBox1.TabIndex = 0 + Me.PictureBox1.TabStop = False + ' + 'bt_Del + ' + Me.bt_Del.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_Del.Location = New System.Drawing.Point(612, 272) + Me.bt_Del.Name = "bt_Del" + Me.bt_Del.Size = New System.Drawing.Size(75, 23) + Me.bt_Del.TabIndex = 13 + Me.bt_Del.Text = "删除" + Me.bt_Del.UseVisualStyleBackColor = True + ' + 'btn_Avtive + ' + Me.btn_Avtive.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btn_Avtive.BackColor = System.Drawing.Color.Red + Me.btn_Avtive.Font = New System.Drawing.Font("楷体", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.btn_Avtive.ForeColor = System.Drawing.Color.White + Me.btn_Avtive.Location = New System.Drawing.Point(612, 320) + Me.btn_Avtive.Name = "btn_Avtive" + Me.btn_Avtive.Size = New System.Drawing.Size(74, 61) + Me.btn_Avtive.TabIndex = 14 + Me.btn_Avtive.Text = "激活编辑" + Me.btn_Avtive.UseVisualStyleBackColor = False + ' + 'lab_Tips + ' + Me.lab_Tips.AutoSize = True + Me.lab_Tips.Location = New System.Drawing.Point(1, 209) + Me.lab_Tips.Name = "lab_Tips" + Me.lab_Tips.Size = New System.Drawing.Size(263, 12) + Me.lab_Tips.TabIndex = 15 + Me.lab_Tips.Text = "Tip：按""激活编辑""可以激活表格进行批量编辑！" + ' + 'btn_SaveChange + ' + Me.btn_SaveChange.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btn_SaveChange.BackColor = System.Drawing.Color.FromArgb(CType(CType(128, Byte), Integer), CType(CType(128, Byte), Integer), CType(CType(255, Byte), Integer)) + Me.btn_SaveChange.Font = New System.Drawing.Font("楷体", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.btn_SaveChange.ForeColor = System.Drawing.Color.Red + Me.btn_SaveChange.Location = New System.Drawing.Point(612, 397) + Me.btn_SaveChange.Name = "btn_SaveChange" + Me.btn_SaveChange.Size = New System.Drawing.Size(74, 61) + Me.btn_SaveChange.TabIndex = 16 + Me.btn_SaveChange.Text = "保存修改" + Me.btn_SaveChange.UseVisualStyleBackColor = False + ' + 'chk_MsgForSaveItembyItem + ' + Me.chk_MsgForSaveItembyItem.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.chk_MsgForSaveItembyItem.AutoSize = True + Me.chk_MsgForSaveItembyItem.Location = New System.Drawing.Point(622, 467) + Me.chk_MsgForSaveItembyItem.Name = "chk_MsgForSaveItembyItem" + Me.chk_MsgForSaveItembyItem.Size = New System.Drawing.Size(72, 16) + Me.chk_MsgForSaveItembyItem.TabIndex = 17 + Me.chk_MsgForSaveItembyItem.Text = "逐项提示" + Me.chk_MsgForSaveItembyItem.UseVisualStyleBackColor = True + ' + 'form_QuerySim + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(692, 572) + Me.Controls.Add(Me.chk_MsgForSaveItembyItem) + Me.Controls.Add(Me.btn_SaveChange) + Me.Controls.Add(Me.lab_Tips) + Me.Controls.Add(Me.btn_Avtive) + Me.Controls.Add(Me.bt_Del) + Me.Controls.Add(Me.GroupBox2) + Me.Controls.Add(Me.lbl_Select) + Me.Controls.Add(Me.lbl_Information) + Me.Controls.Add(Me.TabControl1) + Me.Controls.Add(Me.Grid1) + Me.MinimumSize = New System.Drawing.Size(16, 38) + Me.Name = "form_QuerySim" + Me.Text = "料号查询" + Me.TabControl1.ResumeLayout(False) + Me.TabPage1.ResumeLayout(False) + Me.TabPage1.PerformLayout() + Me.TabPage2.ResumeLayout(False) + Me.TabPage2.PerformLayout() + Me.GroupBox2.ResumeLayout(False) + Me.GroupBox2.PerformLayout() + CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() + Me.ResumeLayout(False) + Me.PerformLayout() + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents TabControl1 As System.Windows.Forms.TabControl + Friend WithEvents TabPage1 As System.Windows.Forms.TabPage + Friend WithEvents TabPage2 As System.Windows.Forms.TabPage + Friend WithEvents bt_Query As System.Windows.Forms.Button + Friend WithEvents tb_Value As System.Windows.Forms.TextBox + Friend WithEvents Label1 As System.Windows.Forms.Label + Friend WithEvents combo_Section As System.Windows.Forms.ComboBox + Friend WithEvents Label3 As System.Windows.Forms.Label + Friend WithEvents Label2 As System.Windows.Forms.Label + Friend WithEvents combo_Operate As System.Windows.Forms.ComboBox + Friend WithEvents bt_QueryQuick As System.Windows.Forms.Button + Friend WithEvents tb_Desc As System.Windows.Forms.TextBox + Friend WithEvents Label6 As System.Windows.Forms.Label + Friend WithEvents tb_Name As System.Windows.Forms.TextBox + Friend WithEvents Label5 As System.Windows.Forms.Label + Friend WithEvents tb_PartNumber As System.Windows.Forms.TextBox + Friend WithEvents Label4 As System.Windows.Forms.Label + Friend WithEvents lbl_Information As System.Windows.Forms.Label + Friend WithEvents lbl_Select As System.Windows.Forms.Label + Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox + Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox + Friend WithEvents chkShowImage As System.Windows.Forms.CheckBox + Friend WithEvents lbl_ImageReading As System.Windows.Forms.Label + Friend WithEvents lbl_NoImage As System.Windows.Forms.Label + Friend WithEvents bt_Del As System.Windows.Forms.Button + Friend WithEvents btn_Avtive As System.Windows.Forms.Button + Friend WithEvents lab_Tips As System.Windows.Forms.Label + Friend WithEvents btn_SaveChange As System.Windows.Forms.Button + Friend WithEvents chk_MsgForSaveItembyItem As System.Windows.Forms.CheckBox + Friend WithEvents ckb_Pn_Inhaos As System.Windows.Forms.CheckBox + Friend WithEvents ckb_PnJohao As System.Windows.Forms.CheckBox +End Class diff --git a/WT-DMS/form_QuerySim.resx b/WT-DMS/form_QuerySim.resx new file mode 100644 index 0000000..0f89e9c --- /dev/null +++ b/WT-DMS/form_QuerySim.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/form_QuerySim.vb b/WT-DMS/form_QuerySim.vb new file mode 100644 index 0000000..9b041dc --- /dev/null +++ b/WT-DMS/form_QuerySim.vb @@ -0,0 +1,545 @@ +Public Class form_QuerySim + Dim m_Table As New System.Data.DataTable + Dim m_QuickMode As Boolean = True + Dim m_TotalCount As Integer = 0 + Dim m_MaxIndex As Integer = 0 + Dim m_MinIndex As Integer = 0 + Dim m_CurSelItem_Col As Integer = 0 + Dim m_CurSelItem_Row As Integer = 0 + Dim m_InitOver As Boolean = False + + Dim m_Cell_Enable_Edit As Boolean = False + + Dim m_PartNumber As New CPartNumber + + + Public Function GetLikeString(ByVal likestr As String) As String + Dim rString As String = "" + Dim ch As Char + For i As Integer = 1 To likestr.Length + ch = Strings.GetChar(likestr, i) + If ch = "%" OrElse ch = "_" OrElse ch = "/" Then + rString &= "/" + End If + rString &= ch + Next + + Return rString + End Function + + Private Sub QueryData() + Dim strSQL As String = "SELECT `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.物料名称) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.单位) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.单重) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "`" + strSQL &= " FROM `" & CPartNumber.cst_TABLE_NAME & "`" + + Dim oper_idx As Integer = combo_Operate.SelectedIndex + If combo_Operate.Text.Length > 0 AndAlso + combo_Section.Text.Length > 0 AndAlso + tb_Value.Text.Length > 0 Then + + Dim oper_str As String = rel_Operator(oper_idx, 1) + Dim isescape As Boolean = CBool(rel_Operator(oper_idx, 3)) + Dim str_Value As String = tb_Value.Text + If isescape = True Then + str_Value = GetLikeString(tb_Value.Text) + End If + + strSQL &= " WHERE `" & combo_Section.Text & "` " & + " COLLATE gbk_chinese_ci " & + rel_Operator(oper_idx, 1) & + str_Value & + rel_Operator(oper_idx, 2) + + If isescape = True Then + strSQL &= " escape '/'" + End If + + End If + + SQL_Query(COL_RIGHTS.料号管理, strSQL, m_Table) + End Sub + + Private Sub SetDataBinding() + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + + If m_QuickMode = True Then + QueryData_Quick() + Else + QueryData() + End If + + Grid1.DisplayRowNumber = True + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + Grid1.SetDataBinding(m_Table, "", True, 1) + + CGirdInfo.LoadGridInfo("料号查询", Grid1) + Grid1.AllowUserSort = True + + Grid1.Locked = True + End Sub + + Private Sub bt_Query_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Query.Click + m_QuickMode = False + SetDataBinding() + End Sub + + Private Sub form_QuerySim_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + Me.Width = My.Settings.FORM_QUERYSIM_WIDHT + Me.Height = My.Settings.FORM_QUERYSIM_HEIGHT + Me.WindowState = My.Settings.FORM_QUERYSIM_WINSTATE + Me.Left = My.Settings.FORM_QUERYSIM_X + Me.Top = My.Settings.FORM_QUERYSIM_Y + + lbl_ImageReading.Visible = False + lbl_NoImage.Visible = False + + bt_Del.Enabled = False + + If CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.READ) = False Then + bt_Query.Enabled = False + bt_QueryQuick.Enabled = False + End If + + If CBool(Current_Rights(COL_RIGHTS.料号管理) And RIGHTS.MANAGE) = True Then + bt_Del.Enabled = True + End If + + combo_Operate.Items.Clear() + + For i As Integer = 0 To (rel_Operator.Length / 4 - 1) + combo_Operate.Items.Add(rel_Operator(i, 0)) + Next + + m_InitOver = True + End Sub + + Private Sub QueryData_Quick() + Dim strSQL As String = "SELECT `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.物料名称) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.单位) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.单重) & "`,`" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "`, `" & + CPartNumber.m_COLS_NAME(CPartNumber.COLS.序号) & "`" + strSQL &= " FROM `" & CPartNumber.cst_TABLE_NAME & "`" + + If tb_PartNumber.Text.Length > 0 OrElse + tb_Name.Text.Length > 0 OrElse + tb_Desc.Text.Length > 0 OrElse + ckb_Pn_Inhaos.Checked = True OrElse + ckb_PnJohao.Checked = True Then + + strSQL &= " WHERE " + + Dim strSplit() As String + Dim firstLike As Boolean = True + If tb_PartNumber.Text.Length > 0 Then + strSplit = Split(tb_PartNumber.Text, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + + If tb_Name.Text.Length > 0 Then + strSplit = Split(tb_Name.Text, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.物料名称) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + + If tb_Desc.Text.Length > 0 Then + strSplit = Split(tb_Desc.Text, ",") + For i As Integer = 0 To strSplit.Length - 1 + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.规格描述) & "`" + strSQL &= " COLLATE gbk_chinese_ci " + strSQL &= " LIKE '%" + strSQL &= GetLikeString(strSplit(i)) & "%'" + strSQL &= " escape '/'" + Next + End If + + Dim customStr As String = "" + If ckb_Pn_Inhaos.Checked Then + customStr &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` = '02'" + End If + + If ckb_PnJohao.Checked Then + If String.IsNullOrEmpty(customStr) = False Then + customStr &= " OR " + customStr &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` ='01'" + + customStr = $"({customStr})" + Else + customStr &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` ='01'" + End If + End If + + If firstLike = True Then + firstLike = False + Else + strSQL &= " AND " + End If + strSQL &= customStr + + 'If ckb_Pn_Inhaos.Checked Then + ' If firstLike = True Then + ' firstLike = False + ' Else + ' strSQL &= " AND " + ' End If + ' strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` = '02'" + 'End If + + 'If ckb_PnJohao.Checked Then + ' If firstLike = True Then + ' firstLike = False + ' Else + ' If ckb_Pn_Inhaos.Checked Then + ' strSQL &= " or " + ' Else + ' strSQL &= " AND " + ' End If + ' End If + ' strSQL &= "`" & CPartNumber.m_COLS_NAME(CPartNumber.COLS.供应商ID) & "` ='01'" + 'End If + + End If + + SQL_Query(COL_RIGHTS.料号管理, strSQL, m_Table) + End Sub + + Private Function GetTableInformation() As Boolean + Dim m_PartNumber As New CPartNumber + lbl_Information.Text = "" + If m_PartNumber.QueryInformation(m_TotalCount, m_MinIndex, m_MaxIndex) = ERROR_CODE.SUCCESS Then + Return True + Else + m_TotalCount = 0 + m_MinIndex = 0 + m_MaxIndex = 0 + End If + Return False + End Function + + Private Sub ShowCurrSelectInformation(ByVal index As Integer) + lbl_Information.Text = "查询条数: " & m_Table.Rows.Count + lbl_Information.Text &= ", 总条数: " & m_TotalCount + lbl_Information.Text &= ", 最小序号: " & m_MinIndex + lbl_Information.Text &= ", 最大序号:" & m_MaxIndex + If index >= 0 Then + lbl_Select.Text = "当前条: " & index + lbl_Select.Text &= ", 当前序号: " & Grid1.Cell(index, 7).Text + Else + lbl_Select.Text = "" + End If + End Sub + + Private Sub bt_QueryQuick_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_QueryQuick.Click + Dim tempRowIndex As Integer = 0 + + Grid1.AutoRedraw = False + + m_QuickMode = True + SetDataBinding() + If GetTableInformation() Then + ShowCurrSelectInformation(-1) + End If + + For tempRowIndex = 1 To Grid1.Rows - 1 + Grid1.Cell(tempRowIndex, 0).ForeColor = Color.Black + Grid1.Cell(tempRowIndex, 1).ForeColor = Color.Black + Grid1.Cell(tempRowIndex, 1).FontBold = False + Next + + Grid1.Refresh() + Grid1.AutoRedraw = True + End Sub + + Private Sub Grid1_CellChange(Sender As Object, e As FlexCell.Grid.CellChangeEventArgs) Handles Grid1.CellChange + 'If m_Cell_Enable_Edit Then MessageBox.Show(e.Col & "," & e.Row) + 'Grid1.Row(e.Row). = Color.Red + If m_Cell_Enable_Edit Then + Grid1.Cell(e.Row, e.Col).ForeColor = Color.Red + Grid1.Cell(e.Row, 1).ForeColor = Color.Red + Grid1.Cell(e.Row, 1).FontBold = True + End If + + ' Grid1.Selection.ForeColor = Color.Red + End Sub + + Private Sub Grid1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Grid1.MouseDoubleClick + Try + If e.Button = MouseButtons.Left Then + Dim isHeaderClicked As Boolean = False + Dim row As Integer + + '判断是否双击列HEADER + Dim X_Start As Integer = 0 + Dim X_End As Integer = X_Start + Grid1.Column(0).Width + If e.X >= X_Start AndAlso e.X <= X_End Then + If e.Y < Grid1.Height Then + row = e.Y \ Grid1.Row(0).Height + + If row >= Grid1.Rows Then + Return + End If + + If row >= 0 Then + isHeaderClicked = True + End If + End If + End If + + If isHeaderClicked = True Then + Dim strCopy As String = "" + For i As Integer = 0 To Grid1.Cols - 1 + strCopy &= Grid1.Cell(row, i).Text & vbTab + Next + Clipboard.SetText(strCopy) + Else + row = Grid1.Selection.FirstRow + Dim col As Integer = Grid1.Selection.FirstCol + Grid1.Selection.ClearAll() + If row >= 1 AndAlso col >= 1 Then + Clipboard.SetText(Grid1.Cell(row, col).Text) + End If + End If + End If + + Catch ex As Exception + + End Try + End Sub + + Private Sub Grid1_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Grid1.MouseClick + m_CurSelItem_Col = -1 + m_CurSelItem_Row = -1 + + If e.Button = MouseButtons.Left Then + Dim isHeaderClicked As Boolean = False + Dim row As Integer + + '判断是否双击列HEADER + Dim X_Start As Integer = 0 + Dim X_End As Integer = X_Start + Grid1.Column(0).Width + If e.X >= X_Start AndAlso e.X <= X_End Then + If e.Y < Grid1.Height Then + row = e.Y \ Grid1.Row(0).Height + + If row >= Grid1.Rows Then + Return + End If + + If row >= 0 Then + isHeaderClicked = True + End If + End If + End If + + If isHeaderClicked = True Then + Else + row = Grid1.Selection.FirstRow + Dim col As Integer = Grid1.Selection.FirstCol + Grid1.Selection.ClearAll() + If row >= 1 AndAlso col >= 1 Then + m_CurSelItem_Col = col + m_CurSelItem_Row = row + + If chkShowImage.Checked = True Then + PictureBox1.BackgroundImage = Nothing + lbl_ImageReading.Visible = True + lbl_NoImage.Visible = False + Application.DoEvents() + If GetItemImage(Grid1.Cell(row, 1).Text) = ERROR_CODE.SUCCESS Then + If PictureBox1.BackgroundImage Is Nothing Then + lbl_NoImage.Visible = True + End If + End If + lbl_ImageReading.Visible = False + End If + End If + End If + End If + End Sub + + Private Sub Grid1_SelChange(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.SelChangeEventArgs) Handles Grid1.SelChange + If e.FirstRow >= 1 Then + ShowCurrSelectInformation(e.FirstRow) + End If + End Sub + + Private Sub Grid1_ColWidthChange(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.ColWidthChangeEventArgs) Handles Grid1.ColWidthChange + CGirdInfo.SaveGirdInfo("料号查询", Grid1) + End Sub + + Private Sub form_QuerySim_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize + If m_InitOver = True Then + My.Settings.FORM_QUERYSIM_WIDHT = Me.Width + My.Settings.FORM_QUERYSIM_HEIGHT = Me.Height + My.Settings.FORM_QUERYSIM_WINSTATE = Me.WindowState + My.Settings.Save() + End If + End Sub + + Private Sub form_QuerySim_LocationChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LocationChanged + If m_InitOver = True Then + My.Settings.FORM_QUERYSIM_X = Me.Left + My.Settings.FORM_QUERYSIM_Y = Me.Top + My.Settings.Save() + End If + End Sub + + Private Function GetItemImage(ByVal strPN As String) As ERROR_CODE + tb_Name.Text = "" + PictureBox1.BackgroundImage = Nothing + + Dim strSQL As String = "SELECT 图片 FROM " & CPartNumber.cst_TABLE_NAME & " WHERE " + strSQL &= CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & " = '" & strPN & "'" + + Dim 图片(0) As Byte + Dim rValueTable(0) As Object + If SQL_DataReader(COL_RIGHTS.料号管理, strSQL, rValueTable) = True Then + 图片 = rValueTable(0) + + PictureBox1.BackgroundImage = GetImageFromBytes(图片) + + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + Private Function DeleteItem(ByVal strPN As String) As ERROR_CODE + tb_Name.Text = "" + PictureBox1.BackgroundImage = Nothing + 'DELETE FROM 料号表 WHERE 料号PN = 'U01-C8051F321-MLP28' + Dim strSQL As String = "DELETE FROM " & CPartNumber.cst_TABLE_NAME & " WHERE " + strSQL &= CPartNumber.m_COLS_NAME(CPartNumber.COLS.料号PN) & " = '" & strPN & "'" + + If SQL_ExeCommand(COL_RIGHTS.料号管理, strSQL) = True Then + Return ERROR_CODE.SUCCESS + End If + + Return ERROR_CODE.ACCESS + End Function + + + Private Sub chkShowImage_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chkShowImage.CheckedChanged + If chkShowImage.Checked = False Then + PictureBox1.BackgroundImage = Nothing + End If + End Sub + + Private Sub bt_Del_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Del.Click + If m_CurSelItem_Col >= 1 AndAlso m_CurSelItem_Row >= 1 Then '如果选择有效则删除 + Dim strPN As String = Grid1.Cell(m_CurSelItem_Row, 1).Text + If MessageBox.Show("请确认删除料号: '" & strPN & "'", "料号删除", MessageBoxButtons.OKCancel) = DialogResult.OK Then + If DeleteItem(strPN) = ERROR_CODE.SUCCESS Then + MsgBox("删除料号: '" & strPN & "' 成功!") + Else + MsgBox("删除料号: '" & strPN & "' 失败!") + End If + + bt_QueryQuick.PerformClick() + End If + End If + End Sub + + Private Sub btn_Avtive_Click(sender As Object, e As EventArgs) Handles btn_Avtive.Click + If Grid1.Locked = True Then + Grid1.Locked = False + btn_Avtive.Text = "锁定编辑" + btn_Avtive.BackColor = Color.Green + m_Cell_Enable_Edit = True + Grid1.Column(1).Locked = True '锁定料号列 + Grid1.Column(7).Locked = True '锁定序列号列 + Else + Grid1.Locked = True + btn_Avtive.Text = "激活编辑" + btn_Avtive.BackColor = Color.Red + m_Cell_Enable_Edit = False + End If + End Sub + Private Sub btn_SaveChange_Click(sender As Object, e As EventArgs) Handles btn_SaveChange.Click + Dim tempRowIndex As Integer = 0 + Dim tb_PartNumber_Text As String = "" + Dim tb_Name_Text As String = "" + Dim tb_Descr_Text As String = "" + Dim combo_Unit_Text As String = "" + Dim num_Weight_Value As String = "" + Dim strSupplierID As String = "" + Dim SavedCount As Integer = 0 + Dim ChangeCount As Integer = 0 + + Dim result As ERROR_CODE + + For tempRowIndex = 0 To Grid1.Rows - 1 + If Grid1.Cell(tempRowIndex, 1).ForeColor = Color.Red Then '判断数据修改过 + 'MessageBox.Show(tempRowIndex) + ChangeCount = ChangeCount + 1 + '保存料号 + tb_PartNumber_Text = Grid1.Cell(tempRowIndex, 1).Text + tb_Name_Text = Grid1.Cell(tempRowIndex, 2).Text + tb_Descr_Text = Grid1.Cell(tempRowIndex, 3).Text + combo_Unit_Text = Grid1.Cell(tempRowIndex, 4).Text + num_Weight_Value = Grid1.Cell(tempRowIndex, 5).Text + strSupplierID = Grid1.Cell(tempRowIndex, 6).Text + + result = m_PartNumber.UpdateItem(tb_PartNumber_Text, tb_Name_Text, tb_Descr_Text, combo_Unit_Text, num_Weight_Value, Nothing, strSupplierID) + + If result = ERROR_CODE.SUCCESS Then + If chk_MsgForSaveItembyItem.Checked Then MsgBox("第 " & tempRowIndex & " 行保存成功！") + Grid1.Cell(tempRowIndex, 1).ForeColor = Color.Green + SavedCount = SavedCount + 1 + ElseIf result = ERROR_CODE.NORIGHT Then + MsgBox("保存失败： ""无访问权限!""") + Else + MsgBox("保存失败: 请检查网络连接或联系管理员!") + End If + End If + Next + MsgBox("保存完成，共有 " & ChangeCount & " 项修改！共有 " & SavedCount & " 项保存成功！") + + End Sub + + + +End Class \ No newline at end of file diff --git a/WT-DMS/form_StoreLocManage.Designer.vb b/WT-DMS/form_StoreLocManage.Designer.vb new file mode 100644 index 0000000..1357136 --- /dev/null +++ b/WT-DMS/form_StoreLocManage.Designer.vb @@ -0,0 +1,71 @@ + _ +Partial Class form_StoreLocManage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(form_StoreLocManage)) + Me.btSave = New System.Windows.Forms.Button() + Me.Grid1 = New FlexCell.Grid() + Me.SuspendLayout() + ' + 'btSave + ' + Me.btSave.Location = New System.Drawing.Point(12, 5) + Me.btSave.Name = "btSave" + Me.btSave.Size = New System.Drawing.Size(83, 22) + Me.btSave.TabIndex = 4 + Me.btSave.Text = "保存" + Me.btSave.UseVisualStyleBackColor = True + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(12, 33) + Me.Grid1.MultiSelect = False + Me.Grid1.Name = "Grid1" + Me.Grid1.SelectionMode = FlexCell.SelectionModeEnum.ByRow + Me.Grid1.Size = New System.Drawing.Size(531, 431) + Me.Grid1.TabIndex = 3 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'form_StoreLocManage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(555, 476) + Me.Controls.Add(Me.btSave) + Me.Controls.Add(Me.Grid1) + Me.Name = "form_StoreLocManage" + Me.Text = "库位管理" + Me.ResumeLayout(False) + + End Sub + Friend WithEvents btSave As System.Windows.Forms.Button + Friend WithEvents Grid1 As FlexCell.Grid +End Class diff --git a/WT-DMS/form_StoreLocManage.resx b/WT-DMS/form_StoreLocManage.resx new file mode 100644 index 0000000..0f89e9c --- /dev/null +++ b/WT-DMS/form_StoreLocManage.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/form_StoreLocManage.vb b/WT-DMS/form_StoreLocManage.vb new file mode 100644 index 0000000..4a51e01 --- /dev/null +++ b/WT-DMS/form_StoreLocManage.vb @@ -0,0 +1,59 @@ +Public Class form_StoreLocManage + Public Event StoreLocUpdated() + + Dim m_Table As New System.Data.DataTable + Dim m_库位表名 As String = "" + + Public Sub New(ByVal 库位表名 As String) + Me.InitializeComponent() + m_库位表名 = 库位表名 + End Sub + + Private Sub form_StoreLocManage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + If CBool(Current_Rights(COL_RIGHTS.库位管理) And RIGHTS.WRITE) = False Then + btSave.Enabled = False + End If + + SetDataBinding() + End Sub + + Private Sub GetDataSet() + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + 'SQL_Query("SELECT * FROM `AccountManageTable`", m_Table) + SQL_Query(COL_RIGHTS.库位管理, "SELECT * FROM `" & m_库位表名 & "`", m_Table) + End Sub + + Private Sub SetDataBinding() + GetDataSet() + + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '绑定到数据源时可以指定固定行数，但绑定后不能改变Grid.FixedRows属性的值 + 'Grid1.SetDataBinding(m_Table, "products", True, 2) + Grid1.SetDataBinding(m_Table, "", True, 1) + Grid1.Column(CStoreLocation.COLS.序号 + 1).Locked = True + End Sub + + Private Sub Grid1_BeforeUserDeleteRow(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.BeforeUserDeleteRowEventArgs) Handles Grid1.BeforeUserDeleteRow + If MsgBox("确定要删除该行数据？", MsgBoxStyle.OkCancel Or MsgBoxStyle.DefaultButton2, "删除确认") <> MsgBoxResult.Ok Then + e.Cancel = True + End If + End Sub + + Private Sub btSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btSave.Click + + Grid1.EndCurrentEdit() + SQL_Update(COL_RIGHTS.库位管理, m_Table) + SetDataBinding() + + RaiseEvent StoreLocUpdated() + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/form_SupplierManage.Designer.vb b/WT-DMS/form_SupplierManage.Designer.vb new file mode 100644 index 0000000..a1a4ba3 --- /dev/null +++ b/WT-DMS/form_SupplierManage.Designer.vb @@ -0,0 +1,98 @@ + _ +Partial Class form_SupplierManage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(form_SupplierManage)) + Me.Grid1 = New FlexCell.Grid() + Me.bt_Refresh = New System.Windows.Forms.Button() + Me.bt_Add = New System.Windows.Forms.Button() + Me.bt_Del = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.ImeMode = System.Windows.Forms.ImeMode.[On] + Me.Grid1.Location = New System.Drawing.Point(12, 12) + Me.Grid1.MultiSelect = False + Me.Grid1.Name = "Grid1" + Me.Grid1.SelectionMode = FlexCell.SelectionModeEnum.ByRow + Me.Grid1.Size = New System.Drawing.Size(654, 352) + Me.Grid1.TabIndex = 3 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'bt_Refresh + ' + Me.bt_Refresh.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_Refresh.Location = New System.Drawing.Point(673, 12) + Me.bt_Refresh.Name = "bt_Refresh" + Me.bt_Refresh.Size = New System.Drawing.Size(75, 23) + Me.bt_Refresh.TabIndex = 0 + Me.bt_Refresh.Text = "刷新" + Me.bt_Refresh.UseVisualStyleBackColor = True + ' + 'bt_Add + ' + Me.bt_Add.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_Add.Location = New System.Drawing.Point(673, 67) + Me.bt_Add.Name = "bt_Add" + Me.bt_Add.Size = New System.Drawing.Size(75, 23) + Me.bt_Add.TabIndex = 1 + Me.bt_Add.Text = "添加" + Me.bt_Add.UseVisualStyleBackColor = True + ' + 'bt_Del + ' + Me.bt_Del.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.bt_Del.Location = New System.Drawing.Point(672, 96) + Me.bt_Del.Name = "bt_Del" + Me.bt_Del.Size = New System.Drawing.Size(75, 23) + Me.bt_Del.TabIndex = 2 + Me.bt_Del.Text = "删除" + Me.bt_Del.UseVisualStyleBackColor = True + ' + 'form_SupplierManage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(760, 376) + Me.Controls.Add(Me.bt_Del) + Me.Controls.Add(Me.bt_Add) + Me.Controls.Add(Me.bt_Refresh) + Me.Controls.Add(Me.Grid1) + Me.Name = "form_SupplierManage" + Me.Text = "供应商管理" + Me.ResumeLayout(False) + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents bt_Refresh As System.Windows.Forms.Button + Friend WithEvents bt_Add As System.Windows.Forms.Button + Friend WithEvents bt_Del As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/form_SupplierManage.resx b/WT-DMS/form_SupplierManage.resx new file mode 100644 index 0000000..0f89e9c --- /dev/null +++ b/WT-DMS/form_SupplierManage.resx @@ -0,0 +1,137 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + \ No newline at end of file diff --git a/WT-DMS/form_SupplierManage.vb b/WT-DMS/form_SupplierManage.vb new file mode 100644 index 0000000..ffba27c --- /dev/null +++ b/WT-DMS/form_SupplierManage.vb @@ -0,0 +1,82 @@ +Public Class form_SupplierManage + Dim m_Table As New System.Data.DataTable + Dim m_Supplier As New CSupplier + + Private Sub GetDataSet() + 'SQL_Query("SELECT * FROM `AccountManageTable`", m_Table) + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + SQL_Query(COL_RIGHTS.供应商管理, "SELECT * FROM `" & CSupplier.cst_TABLE_NAME & "`", m_Table) + End Sub + + Private Sub SetDataBinding() + GetDataSet() + + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '绑定到数据源时可以指定固定行数，但绑定后不能改变Grid.FixedRows属性的值 + 'Grid1.SetDataBinding(m_Table, "products", True, 2) + Grid1.SetDataBinding(m_Table, "", True, 1) + + Grid1.Locked = True + End Sub + + Private Function DeleteItem(ByVal strID As String) As Boolean + Dim result As ERROR_CODE = m_Supplier.DeleteItem(strID) + If result = ERROR_CODE.SUCCESS Then + SetDataBinding() + Return True + ElseIf result = ERROR_CODE.NORIGHT Then + MsgBox("删除失败： ""无访问权限!""") + Else + MsgBox("删除失败: 请检查网络连接或联系管理员!") + End If + + Return False + End Function + + Private Sub Grid1_BeforeUserDeleteRow(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.BeforeUserDeleteRowEventArgs) Handles Grid1.BeforeUserDeleteRow + e.Cancel = True + 'If MsgBox("确定要删除该行数据？", MsgBoxStyle.OkCancel Or MsgBoxStyle.DefaultButton2, "删除确认") <> MsgBoxResult.Ok Then + ' e.Cancel = True + 'Else + ' Dim strSupplierID As String = Grid1.Cell(e.FirstRow, CSupplier.COLS.供应商ID + 1).Text + ' DeleteItem(strSupplierID) + ' SetDataBinding() + 'End If + End Sub + + Private Sub form_SupplierManage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + If CBool(Current_Rights(COL_RIGHTS.供应商管理) And RIGHTS.WRITE) = False Then + bt_Add.Enabled = False + bt_Del.Enabled = False + End If + + SetDataBinding() + End Sub + + Private Sub bt_Refresh_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Refresh.Click + SetDataBinding() + End Sub + + Private Sub bt_Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Add.Click + Dim pAddDlg As New dlg_AddSupplier + pAddDlg.ShowDialog() + SetDataBinding() + End Sub + + Private Sub bt_Del_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_Del.Click + If Grid1.Selection.FirstRow >= 1 Then + Dim strSupplierID As String = Grid1.Cell(Grid1.Selection.FirstRow, CSupplier.COLS.供应商ID + 1).Text + DeleteItem(strSupplierID) + SetDataBinding() + End If + End Sub +End Class \ No newline at end of file diff --git a/WT-DMS/form_UserManage.Designer.vb b/WT-DMS/form_UserManage.Designer.vb new file mode 100644 index 0000000..ffd1cce --- /dev/null +++ b/WT-DMS/form_UserManage.Designer.vb @@ -0,0 +1,70 @@ + _ +Partial Class form_UserManage + Inherits System.Windows.Forms.Form + + 'Form 重写 Dispose，以清理组件列表。 + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Windows 窗体设计器所必需的 + Private components As System.ComponentModel.IContainer + + '注意: 以下过程是 Windows 窗体设计器所必需的 + '可以使用 Windows 窗体设计器修改它。 + '不要使用代码编辑器修改它。 + _ + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(form_UserManage)) + Me.Grid1 = New FlexCell.Grid() + Me.btSave = New System.Windows.Forms.Button() + Me.SuspendLayout() + ' + 'Grid1 + ' + Me.Grid1.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.Grid1.CheckedImage = CType(resources.GetObject("Grid1.CheckedImage"), System.Drawing.Bitmap) + Me.Grid1.DefaultFont = New System.Drawing.Font("宋体", 9.0!) + Me.Grid1.Font = New System.Drawing.Font("宋体", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) + Me.Grid1.GridColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(192, Byte), Integer)) + Me.Grid1.Location = New System.Drawing.Point(12, 40) + Me.Grid1.MultiSelect = False + Me.Grid1.Name = "Grid1" + Me.Grid1.SelectionMode = FlexCell.SelectionModeEnum.ByRow + Me.Grid1.Size = New System.Drawing.Size(923, 339) + Me.Grid1.TabIndex = 0 + Me.Grid1.UncheckedImage = CType(resources.GetObject("Grid1.UncheckedImage"), System.Drawing.Bitmap) + ' + 'btSave + ' + Me.btSave.Location = New System.Drawing.Point(12, 12) + Me.btSave.Name = "btSave" + Me.btSave.Size = New System.Drawing.Size(87, 22) + Me.btSave.TabIndex = 2 + Me.btSave.Text = "保存" + Me.btSave.UseVisualStyleBackColor = True + ' + 'form_UserManage + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(947, 391) + Me.Controls.Add(Me.btSave) + Me.Controls.Add(Me.Grid1) + Me.Name = "form_UserManage" + Me.Text = "用户管理" + Me.ResumeLayout(False) + + End Sub + Friend WithEvents Grid1 As FlexCell.Grid + Friend WithEvents btSave As System.Windows.Forms.Button +End Class diff --git a/WT-DMS/form_UserManage.resx b/WT-DMS/form_UserManage.resx new file mode 100644 index 0000000..843ab95 --- /dev/null +++ b/WT-DMS/form_UserManage.resx @@ -0,0 +1,140 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/w///4AAAI/wAP//gAAAjwAAD/+AAACPAPAA/4AAAI8P/wAPgAAAj///8A+A + AACP////D4AAAI//////gAAAiIiIiIiAAAA= + + + + + Qk3OAAAAAAAAAHYAAAAoAAAACwAAAAsAAAABAAQAAAAAAAAAAADEDgAAxA4AABAAAAAQAAAAAAAA/wAA + gP8AgAD/AICA/4AAAP+AAID/gIAA/8DAwP+AgID/AAD//wD/AP8A/////wAA//8A/////wD//////4iI + iIiIgAAAj/////+AAACP/////4AAAI//////gAAAj/////+AAACP/////4AAAI//////gAAAj/////+A + AACP/////4AAAI//////gAAAiIiIiIiAAAA= + + + + 38 + + \ No newline at end of file diff --git a/WT-DMS/form_UserManage.vb b/WT-DMS/form_UserManage.vb new file mode 100644 index 0000000..521a08c --- /dev/null +++ b/WT-DMS/form_UserManage.vb @@ -0,0 +1,110 @@ +Imports MySql.Data.MySqlClient +Public Class form_UserManage + Dim m_Table As New System.Data.DataTable + + Private Sub form_UserManage_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load + If CBool(Current_Rights(COL_RIGHTS.用户管理) And RIGHTS.WRITE) = False Then + btSave.Enabled = False + End If + + SetDataBinding() + End Sub + + Private Sub GetDataSet() + If Not m_Table Is Nothing Then + m_Table.Dispose() + End If + m_Table = New DataTable + + 'SQL_Query("SELECT * FROM `AccountManageTable`", m_Table) + SQL_Query(COL_RIGHTS.用户管理, "SELECT * FROM `帐号表`", m_Table) + End Sub + + Private Sub SetDataBinding() + GetDataSet() + + Grid1.AllowUserSort = True + Grid1.DisplayFocusRect = False + Grid1.ExtendLastCol = True + Grid1.DisplayRowArrow = True + Grid1.BoldFixedCell = False + Grid1.SortIndicatorStyle = FlexCell.SortIndicatorStyleEnum.Light3D + + '绑定到数据源时可以指定固定行数，但绑定后不能改变Grid.FixedRows属性的值 + 'Grid1.SetDataBinding(m_Table, "products", True, 2) + Grid1.SetDataBinding(m_Table, "", True, 2) + + Grid1.Cell(0, 0).Text = "" + Grid1.Cell(1, 0).Text = "" + Dim src_col As Integer = 0 + Dim col As Integer = 1 + For src_col = 0 To m_Table.Columns.Count - 1 + Grid1.Cell(1, col).Text = m_Table.Columns.Item(src_col).ColumnName + col += 1 + Next + Grid1.Range(0, 0, 1, 0).Merge() + Grid1.Range(0, 1, 1, 1).Merge() + Grid1.Range(0, 2, 1, 2).Merge() + Grid1.Range(0, 3, 1, 3).Merge() + Grid1.Range(0, 4, 1, 4).Merge() + Grid1.Range(0, 5, 0, 17).Merge() + + Grid1.Cell(0, 5).Text = "权限" + + Dim rights_table() As String + '权限列设定 + + '登录权限 + rights_table = {"禁止", "开启"} + col = CAccountManage.COLS.登录 + 1 + Grid1.Column(col).CellType = FlexCell.CellTypeEnum.ComboBox + Grid1.Column(col).Mask = FlexCell.MaskEnum.DefaultMask + + With Grid1.ComboBox(col) + .DataSource = rights_table + .Locked = True + .AutoComplete = True + End With + + '系统记录 + rights_table = {"禁止", "只读"} + col = CAccountManage.COLS.系统记录 + 1 + Grid1.Column(col).CellType = FlexCell.CellTypeEnum.ComboBox + Grid1.Column(col).Mask = FlexCell.MaskEnum.DefaultMask + + With Grid1.ComboBox(col) + .DataSource = rights_table + .Locked = True + .AutoComplete = True + End With + + '其它权限 + rights_table = {"禁止", "只读", "读写", "管理"} + For col = CAccountManage.COLS.用户管理 + 1 To Grid1.Cols - 1 + Grid1.Column(col).CellType = FlexCell.CellTypeEnum.ComboBox + Grid1.Column(col).Mask = FlexCell.MaskEnum.DefaultMask + + With Grid1.ComboBox(col) + .DataSource = rights_table + .Locked = True + .AutoComplete = True + End With + Next + + 'Grid1.Locked = True + End Sub + + Private Sub Grid1_BeforeUserDeleteRow(ByVal Sender As System.Object, ByVal e As FlexCell.Grid.BeforeUserDeleteRowEventArgs) Handles Grid1.BeforeUserDeleteRow + If MsgBox("确定要删除该行数据？", MsgBoxStyle.OkCancel Or MsgBoxStyle.DefaultButton2, "删除确认") <> MsgBoxResult.Ok Then + e.Cancel = True + End If + End Sub + + Private Sub btSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btSave.Click + Grid1.EndCurrentEdit() + SQL_Update(COL_RIGHTS.用户管理, m_Table) + SetDataBinding() + End Sub + + +End Class \ No newline at end of file diff --git a/WT-DMS/mdl_Common.vb b/WT-DMS/mdl_Common.vb new file mode 100644 index 0000000..52b7005 --- /dev/null +++ b/WT-DMS/mdl_Common.vb @@ -0,0 +1,73 @@ +Public Module mdl_Common + Public MainForm As Form1 = Nothing + + Public Function GetLocalIPAddress() As String + Dim IPAdress As System.Net.IPAddress + Dim HostName As String = System.Net.Dns.GetHostName '获得本机的机器名 + IPAdress = System.Net.Dns.GetHostEntry(HostName).AddressList.GetValue(0) '获得本机的IP + Return IPAdress.ToString '本机的IP + End Function + + Public Function GetIPFromNetUrl(ByVal url As String) As String + Dim objIPHostEntry As System.Net.IPHostEntry + + Try + objIPHostEntry = System.Net.Dns.GetHostEntry(url) '把http://blog.sina.com.cn/u/1459845580的域名对应的ip地址解析出来 + Return objIPHostEntry.AddressList(0).ToString + Catch ex As Exception + MessageBox.Show(ex.Message) + End Try + + Return "" + End Function + + '对图片进行缩放 + '将图片Image缩放到aimRect指定的区域 + Public Function ZoomImage(ByRef image As Image, ByVal aimRect As Rectangle) As Image + Dim factor As Double = aimRect.Width / image.Width + Dim factor_y As Double = aimRect.Height / image.Height + + '按照最小的缩放比确定新的矩形框 + If factor > factor_y Then + factor = factor_y + End If + + Dim newRect As New Rectangle + newRect.Width = factor * image.Width + newRect.Height = factor * image.Height + + Dim new_Image As New Bitmap(newRect.Width, newRect.Height, System.Drawing.Imaging.PixelFormat.Format24bppRgb) + Dim new_Graphic As Graphics = Graphics.FromImage(new_Image) + new_Graphic.DrawImage(image, newRect, New Rectangle(0, 0, image.Width, image.Height), System.Drawing.GraphicsUnit.Pixel) + Return new_Image + End Function + + '并获取数据字节 + Public Function GetBytesFromImage(ByVal image As Image, ByRef picBuffer() As Byte) As Boolean + Dim stream As New System.IO.MemoryStream(picBuffer) + image.Save(stream, System.Drawing.Imaging.ImageFormat.Bmp) + Return True + End Function + + Public Function GetImageFromBytes(ByRef picBuffer() As Byte) As Image + Dim image As Image = Nothing + Try + Dim stream As New System.IO.MemoryStream(picBuffer) + image = image.FromStream(stream) + Catch ex As Exception + End Try + + Return image + End Function + + Public Function isDoubleValue(ByVal valString As String) As Boolean + Dim m_dbl As Double = 0 + Try + m_dbl = CDbl(valString) + Return True + Catch ex As Exception + End Try + + Return False + End Function +End Module diff --git a/WT-DMS/mdl_Defs.vb b/WT-DMS/mdl_Defs.vb new file mode 100644 index 0000000..2097c69 --- /dev/null +++ b/WT-DMS/mdl_Defs.vb @@ -0,0 +1,38 @@ +Public Module mdl_Defs + '权限定义 + Public Enum RIGHTS + NONE = &H0 + READ = &H1 + WRITE = &H2 + READ_WRITE = &H3 + MANAGE = &H4 + End Enum + + '错误码定义 + Public Enum ERROR_CODE + NONE + SUCCESS + NORIGHT + ACCESS + End Enum + + '退出原因 + Public Enum QUIT_RESON + close + logout + End Enum + + '返回错误码字符串 + Public Function GetErrorCodeString(ByVal errorcode As ERROR_CODE) As String + Select Case errorcode + Case ERROR_CODE.SUCCESS + Return "" + Case ERROR_CODE.NORIGHT + Return "无访问权限!" + Case ERROR_CODE.ACCESS + Return "访问数据库失败，请检查网络连接或联系管理员!" + Case Else + Return "未知错误" + End Select + End Function +End Module diff --git a/WT-DMS/mdl_SQLAccessManage.vb b/WT-DMS/mdl_SQLAccessManage.vb new file mode 100644 index 0000000..1066689 --- /dev/null +++ b/WT-DMS/mdl_SQLAccessManage.vb @@ -0,0 +1,133 @@ +Public Module mdl_SQLAccessManage + Public m_SQL As New CMSQL_Interface + Dim m_Log As New CLogManage + + Public Enum COL_RIGHTS + 登录 + 系统记录 + 用户管理 + 料号管理 + 原料库存管理 + 成品库存管理 + BOM管理 + 供应商管理 + ECN管理 + 公司管理 + 部门管理 + 仓库管理 + 库位管理 + 财务管理 + max + End Enum + + Public AccessTableName() As String = + { + "", + "系统记录表", + "帐号表", + "料号表", + "原料库存表", + "成品库存表", + "BOM表", + "供应商信息表", + "", + "公司信息表", + "部门信息表", + "仓库表", + "库位表", + "收支明细表" + } + + Public Current_UserName As String + Public Current_Rights(COL_RIGHTS.max - 1) As RIGHTS + + Public Function SQL_ConnectionSetting(ByVal strHostIp As String, ByVal DataBaseName As String, ByVal user As String, ByVal password As String) As Boolean + Return m_SQL.ConnectionSetting(strHostIp, DataBaseName, user, password) + End Function + + Public Function SQL_Query(ByVal RightID As RIGHTS, ByVal strQuery As String, ByRef r_Table As DataTable) As Boolean + If CBool(Current_Rights(RightID) And RIGHTS.READ) Then + Return m_SQL.Query(strQuery, r_Table) + End If + Return False + End Function + + Private Function GetUpdateLogString(ByRef tbl As DataTable) As String + Dim rString As String = "" + For row As Integer = 0 To tbl.Rows.Count - 1 + Dim rowString As String = "" + Dim tStr As String = "" + For col As Integer = 0 To tbl.Columns.Count - 1 + Try + tStr = tbl.Rows.Item(row).Item(col) + Catch ex As Exception + tStr = "" + End Try + + If rowString.Length > 0 Then + rowString &= "," + End If + rowString &= tStr + Next + + If rString.Length > 0 Then + rString &= ";" + End If + rString &= rowString + Next + + Return rString + End Function + + Public Function SQL_Update(ByVal RightID As RIGHTS, ByRef upTable As DataTable) As Boolean + If CBool(Current_Rights(RightID) And RIGHTS.WRITE) Then + If m_SQL.Update(upTable) = True Then + m_Log.AddItem(AccessTableName(RightID), "UPDATE: " & GetUpdateLogString(upTable), Current_UserName) + Return True + End If + End If + Return False + End Function + + Public Function SQL_ExeCommand(ByVal RightID As RIGHTS, ByVal strExe As String) As Boolean + If CBool(Current_Rights(RightID) And RIGHTS.WRITE) Then + If m_SQL.ExeCommand(strExe) = True Then + m_Log.AddItem(AccessTableName(RightID), "EXECUTE:" & strExe, Current_UserName) + Return True + End If + End If + Return False + End Function + + Public Function SQL_ExeCommandWithParamters(ByVal RightID As RIGHTS, ByVal strExe As String, ByRef ParamName() As String, ByRef ParamValue() As Object) As Boolean + If CBool(Current_Rights(RightID) And RIGHTS.WRITE) Then + If m_SQL.ExeCommandWithParamters(strExe, ParamName, ParamValue) = True Then + m_Log.AddItem(AccessTableName(RightID), "EXECUTE:" & strExe, Current_UserName) + Return True + End If + End If + Return False + End Function + + Public Function SQL_DataReader(ByVal RightID As RIGHTS, ByVal strSelect As String, ByRef valueTable() As Object) As Boolean + If CBool(Current_Rights(RightID) And RIGHTS.READ) Then + Return m_SQL.DataReader(strSelect, valueTable) + End If + Return False + End Function + '事务操作 + Public Transactionmsg As String + Public Function SQL_Transaction(ByVal RightID As RIGHTS, ByVal strExe As String) As Boolean + If CBool(Current_Rights(RightID) And RIGHTS.WRITE) Then + Dim result As String = m_SQL.TransactionExeCommand(strExe) + Transactionmsg = result + If String.IsNullOrEmpty(result) = True Then + m_Log.AddItem(AccessTableName(RightID), "TRANSACTION: " & strExe, Current_UserName) + Return True + End If + End If + + Return False + + End Function +End Module diff --git a/WT-DMS/mdl_SQLConst.vb b/WT-DMS/mdl_SQLConst.vb new file mode 100644 index 0000000..5610aa1 --- /dev/null +++ b/WT-DMS/mdl_SQLConst.vb @@ -0,0 +1,32 @@ +Public Module mdl_SQLConst + + '条件与条件间关系 + Public rel_Conditions(,) As String = + { + {"并且", "AND"}, + {"或者", "OR"}, + {"非", "NOT"} + } + + '运算符 + Public rel_Operator(,) As String = + { + {"包含", "LIKE '%", "%'", "1"}, + {"等于", "= '", "'", "0"}, + {"不等于", "!= '", "'", "0"}, + {"大于等于", ">= '", "'", "0"}, + {"大于", "> '", "'", "0"}, + {"小于等于", "<= '", "'", "0"}, + {"小于", "< '", "'", "0"}, + {"类似", "LIKE '", "'", "0"}, + {"开始于", "LIKE '", "%'", "1"}, + {"结束于", "LIKE '%", "'", "1"} + } + + Public Enum SEC_LENGTH + 料号PN = 32 + 供应商ID = 16 + 单位 = 20 + End Enum + +End Module diff --git a/WT-DMS/obj/x86/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb b/WT-DMS/obj/x86/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb new file mode 100644 index 0000000..e7dcac5 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb @@ -0,0 +1,7 @@ +' + Option Strict Off + Option Explicit On + + Imports System + Imports System.Reflection + diff --git a/WT-DMS/obj/x86/Debug/AxInterop.VIDEOCAPXLib.dll b/WT-DMS/obj/x86/Debug/AxInterop.VIDEOCAPXLib.dll new file mode 100644 index 0000000..a12d68f Binary files /dev/null and b/WT-DMS/obj/x86/Debug/AxInterop.VIDEOCAPXLib.dll differ diff --git a/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache new file mode 100644 index 0000000..c0df038 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferences.cache differ diff --git a/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput-冲突-Momo_Win7.cache b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput-冲突-Momo_Win7.cache new file mode 100644 index 0000000..efcd0da Binary files /dev/null and b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput-冲突-Momo_Win7.cache differ diff --git a/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput-冲突-TONY.cache b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput-冲突-TONY.cache new file mode 100644 index 0000000..18dd281 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput-冲突-TONY.cache differ diff --git a/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput.cache b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput.cache new file mode 100644 index 0000000..e5758ec Binary files /dev/null and b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput.cache differ diff --git a/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.cache b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.cache new file mode 100644 index 0000000..6e8e0be Binary files /dev/null and b/WT-DMS/obj/x86/Debug/DesignTimeResolveAssemblyReferencesInput_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.cache differ diff --git a/WT-DMS/obj/x86/Debug/GenerateResource.read.1.tlog b/WT-DMS/obj/x86/Debug/GenerateResource.read.1.tlog new file mode 100644 index 0000000..dc0d451 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/GenerateResource.read.1.tlog differ diff --git a/WT-DMS/obj/x86/Debug/GenerateResource.write.1.tlog b/WT-DMS/obj/x86/Debug/GenerateResource.write.1.tlog new file mode 100644 index 0000000..fa67847 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/GenerateResource.write.1.tlog differ diff --git a/WT-DMS/obj/x86/Debug/INHAOS_DMS.TrustInfo.xml b/WT-DMS/obj/x86/Debug/INHAOS_DMS.TrustInfo.xml new file mode 100644 index 0000000..7d06743 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/INHAOS_DMS.TrustInfo.xml @@ -0,0 +1,12 @@ + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/INHAOS_DMS.application b/WT-DMS/obj/x86/Debug/INHAOS_DMS.application new file mode 100644 index 0000000..e38fafd --- /dev/null +++ b/WT-DMS/obj/x86/Debug/INHAOS_DMS.application @@ -0,0 +1,21 @@ + + + + + + + + + + + + + + + + + vIp5LckHuYm1zqrtPyQH4PYhli9jl3cREfbkbJMklIw= + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/INHAOS_DMS.exe b/WT-DMS/obj/x86/Debug/INHAOS_DMS.exe new file mode 100644 index 0000000..9ece44f Binary files /dev/null and b/WT-DMS/obj/x86/Debug/INHAOS_DMS.exe differ diff --git a/WT-DMS/obj/x86/Debug/INHAOS_DMS.exe.manifest b/WT-DMS/obj/x86/Debug/INHAOS_DMS.exe.manifest new file mode 100644 index 0000000..9a6fdb5 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/INHAOS_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + ImephmNVCd310rdyZWei7B6KUyV7RWlXSQdQ6qeY1sk= + + + + + + + + + + + + u8uxcCQtn/G1ZoCoCx+HVd8RNfnHFFNf87P1dUQvONw= + + + + + + + + + + + + rjgJb/IX0GetL+OMedFvFESHxeLiualxv+MztdOlurA= + + + + + + + + + + + + PqDJ6+dBODutxZTA/ZezocrAf8YZK8buw0nKo9Yeu38= + + + + + + + + + + + + nFJmBfe8bWHS0ADfez5ePVR222r2oQ1FTQELDlR7rZQ= + + + + + + + + + + Ucme27jvG3v+Xfq972Ol/U7MGFoK4S3JDBvffQREd1k= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/INHAOS_DMS.pdb b/WT-DMS/obj/x86/Debug/INHAOS_DMS.pdb new file mode 100644 index 0000000..f9361b7 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/INHAOS_DMS.pdb differ diff --git a/WT-DMS/obj/x86/Debug/INHAOS_DMS.xml b/WT-DMS/obj/x86/Debug/INHAOS_DMS.xml new file mode 100644 index 0000000..ce9cde3 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/INHAOS_DMS.xml @@ -0,0 +1,54 @@ + + + + +INHAOS_DMS + + + + + + 一个强类型的资源类，用于查找本地化的字符串等。 + + + + + 返回此类使用的缓存的 ResourceManager 实例。 + + + + + 重写当前线程的 CurrentUICulture 属性，对 + 使用此强类型资源类的所有资源查找执行重写。 + + + + + 保存BOM临时表 + + + + + + + 保存BOM临时表 + + + + + + + 加载临时Bom表 + + + + + + + 登录检测 + + + + + + diff --git a/WT-DMS/obj/x86/Debug/Interop.VIDEOCAPXLib.dll b/WT-DMS/obj/x86/Debug/Interop.VIDEOCAPXLib.dll new file mode 100644 index 0000000..205f748 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/Interop.VIDEOCAPXLib.dll differ diff --git a/WT-DMS/obj/x86/Debug/TempPE/My Project.Resources.Designer.vb.dll b/WT-DMS/obj/x86/Debug/TempPE/My Project.Resources.Designer.vb.dll new file mode 100644 index 0000000..d05f124 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/TempPE/My Project.Resources.Designer.vb.dll differ diff --git a/WT-DMS/obj/x86/Debug/W&T-DMS.exe b/WT-DMS/obj/x86/Debug/W&T-DMS.exe new file mode 100644 index 0000000..3866fae Binary files /dev/null and b/WT-DMS/obj/x86/Debug/W&T-DMS.exe differ diff --git a/WT-DMS/obj/x86/Debug/W&T-DMS.pdb b/WT-DMS/obj/x86/Debug/W&T-DMS.pdb new file mode 100644 index 0000000..c3197c9 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/W&T-DMS.pdb differ diff --git a/WT-DMS/obj/x86/Debug/W&T-DMS.xml b/WT-DMS/obj/x86/Debug/W&T-DMS.xml new file mode 100644 index 0000000..0d745f8 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/W&T-DMS.xml @@ -0,0 +1,30 @@ + + + + +W&T-DMS + + + + + + 登录检测 + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.exe b/WT-DMS/obj/x86/Debug/WT-DMS.exe new file mode 100644 index 0000000..72d9051 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.pdb b/WT-DMS/obj/x86/Debug/WT-DMS.pdb new file mode 100644 index 0000000..a26e654 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.AssemblyReference.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.AssemblyReference.cache new file mode 100644 index 0000000..f5e894a Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.AssemblyReference.cache differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.CopyComplete b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.CopyComplete new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.CoreCompileInputs.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.CoreCompileInputs.cache new file mode 100644 index 0000000..81dae02 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.CoreCompileInputs.cache @@ -0,0 +1 @@ +79c771f8a96a1bd2c9a08131885a3b0642cbcc0e diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute.txt b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute.txt new file mode 100644 index 0000000..84af123 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute.txt @@ -0,0 +1,1585 @@ +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.pdb +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.xml +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.exe +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.pdb +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe.config +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Query.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe.config +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.pdb +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.xml +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Query.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.exe +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.pdb +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe.config +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.pdb +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.xml +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Query.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.exe +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml +F:\Sync_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.pdb +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.tlog +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.tlog +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.tlog +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.tlog +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.exe +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.xml +E:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.exe.config +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\try\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\bin\Debug\W&T-DMS.exe.config +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\bin\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\bin\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\bin\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\bin\Debug\MySql.Data.dll +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.0\WT-DMS\obj\x86\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\bin\Debug\W&T-DMS.exe.config +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\bin\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\bin\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\bin\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\bin\Debug\MySql.Data.dll +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.1\WT-DMS\obj\x86\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\W&T-DMS.exe.config +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\W&T-DMS.pdb +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\MySql.Data.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\Interop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Debug\AxInterop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\Interop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\AxInterop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.ResolveComReference.cache +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Debug\W&T-DMS.pdb +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\WT_DMS.application +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\WT_DMS.exe +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\WT_DMS.pdb +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\WT_DMS.xml +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\CamSnapShot.dll +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\DirectShowLib-2005.dll +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\MySql.Data.dll +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Debug\CamSnapShot.pdb +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\WT_DMS.application +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\WT_DMS.exe +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\WT_DMS.pdb +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\WT_DMS.xml +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\CamSnapShot.dll +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\DirectShowLib-2005.dll +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\MySql.Data.dll +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\bin\Debug\CamSnapShot.pdb +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\Momo_Sync_Files_360\Momo_Sync_DropBox\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.6\WT-DMS\obj\x86\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.7 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\WT_DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\bin\Debug\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.8\WT-DMS\obj\x86\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9 beta\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.9\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.0 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.1 - 副本\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\MySql.Data.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.2\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\CamSnapShot.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.3 beta\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.application +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.exe +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.pdb +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.xml +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\CamSnapShot.dll +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\DirectShowLib-2005.dll +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\CamSnapShot.pdb +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.application +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.exe +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\WT_DMS.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\CamSnapShot.dll +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\DirectShowLib-2005.dll +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\bin\Debug\CamSnapShot.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.4\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\WT_DMS.application +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\WT_DMS.exe +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\WT_DMS.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\WT_DMS.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\CamSnapShot.dll +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\DirectShowLib-2005.dll +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\bin\Debug\CamSnapShot.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.5\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\WT_DMS.application +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\WT_DMS.exe +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\WT_DMS.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\WT_DMS.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\CamSnapShot.dll +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\DirectShowLib-2005.dll +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\bin\Debug\CamSnapShot.pdb +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\Sync\Sync_Tony_New\WT-DMS\SW\WT-DMS V2.6\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.application +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.exe +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.pdb +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.xml +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\Sync_Tony_2017\Sync_Tony_2017\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.application +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.exe +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.pdb +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\WT_DMS.xml +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT_DMS.pdb +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +G:\T\WT-DMS\WT-DMS V2.8\WT-DMS\bin\Debug\MySql.Data.dll +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.exe.config +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.exe.manifest +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.application +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.exe +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.pdb +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.xml +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\MySql.Data.dll +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.application +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.exe +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.xml +G:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.application +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.exe +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.pdb +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\bin\Debug\WT_DMS.xml +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\T\WT-DMS\WT-DMS V2.9\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.application +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.exe +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.pdb +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.xml +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\T\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.application +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.exe +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.pdb +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\WT_DMS.xml +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\bin\Debug\MySql.Data.dll +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\Sync\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.0\WT-DMS\obj\x86\Debug\WT_DMS.pdb +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\bin\Debug\WT_DMS.exe.config +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\bin\Debug\WT_DMS.exe.manifest +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\bin\Debug\WT_DMS.application +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\bin\Debug\WT_DMS.exe +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\bin\Debug\WT_DMS.pdb +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\bin\Debug\WT_DMS.xml +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT-DMS.vbprojResolveAssemblyReference.cache +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.Cache +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.application +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.exe +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.xml +F:\blw-SW-1\QiZengBiao\WT-DMS\WT-DMS V3.1\WT-DMS\obj\x86\Debug\WT_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\WT_DMS.exe.config +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\WT_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\WT_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\WT_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\WT_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\WT_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\bin\Debug\FlexCell.dll +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT-DMS.vbprojAssemblyReference.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.2\WT-DMS\obj\x86\Debug\WT_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\WT_DMS.exe.config +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\WT_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\WT_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\WT_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\WT_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\WT_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\bin\Debug\FlexCell.dll +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT-DMS.vbprojAssemblyReference.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.TrustInfo.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.3\WT-DMS\obj\x86\Debug\WT_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\INHAOS_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\INHAOS_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\INHAOS_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\INHAOS_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\bin\Debug\FlexCell.dll +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.4\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.AssemblyReference.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\INHAOS_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\INHAOS_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\INHAOS_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\INHAOS_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\bin\Debug\FlexCell.dll +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.5\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +X:\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbprojAssemblyReference.cache +X:\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +X:\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +X:\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.application +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.exe +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.pdb +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.xml +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\bin\Debug\FlexCell.dll +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.AssemblyReference.cache +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.SuggestedBindingRedirects.cache +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +D:\CW\RD_WEB\WT_DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.pdb +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\INHAOS_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\bin\Debug\FlexCell.dll +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +E:\Sync\UTS\Inhaos Project\WT-DMS\WT-DMS V3.6\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\INHAOS_DMS.application +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\INHAOS_DMS.exe +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\INHAOS_DMS.pdb +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\INHAOS_DMS.xml +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\bin\Debug\FlexCell.dll +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT-DMS.vbprojAssemblyReference.cache +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.7\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\INHAOS_DMS.application +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\INHAOS_DMS.exe +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\INHAOS_DMS.pdb +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\INHAOS_DMS.xml +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\bin\Debug\FlexCell.dll +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT-DMS.vbprojAssemblyReference.cache +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +E:\BLV_Sync\RD_PC\Project\WT-DMS\WT-DMS V3.8\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +G:\Git\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +G:\Git\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +G:\Git\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.application +G:\Git\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.exe +G:\Git\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.pdb +G:\Git\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.xml +G:\Git\WT-DMS\WT-DMS\bin\Debug\FlexCell.dll +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.AssemblyReference.cache +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.Up2Date +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +G:\Git\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.AssemblyReference.cache +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlgImage.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_Input.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_BomManage.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Development.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialQuery_Sales.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Development.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_FinancialRecords_Sales.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorageRecord.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_合并备料查询.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_备份管理.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.GenerateResource.cache +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CoreCompileInputs.cache +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.xml +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.pdb +E:\Sync\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.exe.config +E:\Sync\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.exe.manifest +E:\Sync\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.application +E:\Sync\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.exe +E:\Sync\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.pdb +E:\Sync\WT-DMS\WT-DMS\bin\Debug\INHAOS_DMS.xml +E:\Sync\WT-DMS\WT-DMS\bin\Debug\FlexCell.dll +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.TrustInfo.xml +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.exe.manifest +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\INHAOS_DMS.application +E:\Sync\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.vbproj.CopyComplete diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.txt b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.txt new file mode 100644 index 0000000..513d180 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.txt @@ -0,0 +1,49 @@ +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.pdb +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.xml +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.exe +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.pdb +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe.config +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Query.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe.config +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.pdb +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.xml +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Query.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.exe +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.pdb +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1337-2013_Conflict.txt b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1337-2013_Conflict.txt new file mode 100644 index 0000000..32fff14 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1337-2013_Conflict.txt @@ -0,0 +1,2 @@ +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1337-2013_Conflict_1.txt b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1337-2013_Conflict_1.txt new file mode 100644 index 0000000..32fff14 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1337-2013_Conflict_1.txt @@ -0,0 +1,2 @@ +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1338-2013_Conflict.txt b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1338-2013_Conflict.txt new file mode 100644 index 0000000..32fff14 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-05-1338-2013_Conflict.txt @@ -0,0 +1,2 @@ +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.txt b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.txt new file mode 100644 index 0000000..d04d7bf --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.FileListAbsolute_6D5E0F86378C4FD_十二月-10-1934-2013_Conflict.txt @@ -0,0 +1,53 @@ +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe.config +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.exe +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.pdb +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\WT-DMS.xml +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\MySql.Data.dll +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\ResolveAssemblyReference.cache +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.AboutBox1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_AddSupplier.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.dlg_StoreSelect.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Material.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_PartNumber.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Product.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_Query.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_QuerySim.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_QueryStorage.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_StoreLocManage.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_SupplierManage.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Form_SysLog.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.form_UserManage.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.LoginForm1.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT_DMS.Resources.resources +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.read.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\GenerateResource.write.1.tlog +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.exe +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.xml +E:\Working\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\WT-DMS.pdb +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.exe.config +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.exe +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.pdb +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\bin\Debug\W&T-DMS.xml +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.exe +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.xml +H:\IH_Tony\INHAOS Project\WT-DMS\SW\WT-DMS\WT-DMS\obj\x86\Debug\W&T-DMS.pdb diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.GenerateResource.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.GenerateResource.cache new file mode 100644 index 0000000..e2f6099 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.GenerateResource.cache differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.ResolveComReference.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.ResolveComReference.cache new file mode 100644 index 0000000..cebcb75 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.ResolveComReference.cache differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.SuggestedBindingRedirects.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.SuggestedBindingRedirects.cache new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.Up2Date b/WT-DMS/obj/x86/Debug/WT-DMS.vbproj.Up2Date new file mode 100644 index 0000000..e69de29 diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbprojAssemblyReference.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbprojAssemblyReference.cache new file mode 100644 index 0000000..23db6c3 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.vbprojAssemblyReference.cache differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbprojResolveAssemblyReference-冲突-TONY.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbprojResolveAssemblyReference-冲突-TONY.cache new file mode 100644 index 0000000..12c6494 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.vbprojResolveAssemblyReference-冲突-TONY.cache differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.vbprojResolveAssemblyReference.cache b/WT-DMS/obj/x86/Debug/WT-DMS.vbprojResolveAssemblyReference.cache new file mode 100644 index 0000000..6589013 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS.vbprojResolveAssemblyReference.cache differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS.xml b/WT-DMS/obj/x86/Debug/WT-DMS.xml new file mode 100644 index 0000000..8286efe --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT-DMS.xml @@ -0,0 +1,30 @@ + + + + +WT-DMS + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + 登录检测 + + + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.exe new file mode 100644 index 0000000..c624d81 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.pdb new file mode 100644 index 0000000..a333e05 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.exe new file mode 100644 index 0000000..3882b23 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.pdb new file mode 100644 index 0000000..3e407fe Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1022-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1022-2013_Conflict.exe new file mode 100644 index 0000000..bd78935 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1022-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1022-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1022-2013_Conflict.pdb new file mode 100644 index 0000000..d3b24fc Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1022-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.exe new file mode 100644 index 0000000..c673a19 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.pdb new file mode 100644 index 0000000..cf08a66 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict_1.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict_1.pdb new file mode 100644 index 0000000..d91a0de Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict_1.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.exe new file mode 100644 index 0000000..82dba2c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.pdb new file mode 100644 index 0000000..1cdc8a5 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.exe new file mode 100644 index 0000000..2550cb9 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.pdb new file mode 100644 index 0000000..74511f8 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.exe new file mode 100644 index 0000000..779a32c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.pdb new file mode 100644 index 0000000..6bc6815 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.exe new file mode 100644 index 0000000..26030dc Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.pdb new file mode 100644 index 0000000..c4e5bf6 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.exe new file mode 100644 index 0000000..752e307 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.pdb new file mode 100644 index 0000000..2336db1 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.exe new file mode 100644 index 0000000..faedb0b Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.pdb new file mode 100644 index 0000000..73ef004 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.exe new file mode 100644 index 0000000..38faed9 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.pdb new file mode 100644 index 0000000..b3a25b1 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1115-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1115-2013_Conflict.exe new file mode 100644 index 0000000..1333a08 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1115-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1115-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1115-2013_Conflict.pdb new file mode 100644 index 0000000..8740126 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1115-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1116-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1116-2013_Conflict.exe new file mode 100644 index 0000000..6a6b7a5 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1116-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1116-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1116-2013_Conflict.pdb new file mode 100644 index 0000000..c9411d6 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1116-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1118-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1118-2013_Conflict.exe new file mode 100644 index 0000000..6fe5232 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1118-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1118-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1118-2013_Conflict.pdb new file mode 100644 index 0000000..d1897bb Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1118-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1121-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1121-2013_Conflict.exe new file mode 100644 index 0000000..14fcb6f Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1121-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1121-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1121-2013_Conflict.pdb new file mode 100644 index 0000000..9ff01c0 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1121-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1123-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1123-2013_Conflict.exe new file mode 100644 index 0000000..974cb94 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1123-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1123-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1123-2013_Conflict.pdb new file mode 100644 index 0000000..46e4712 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1123-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1124-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1124-2013_Conflict.exe new file mode 100644 index 0000000..432b05e Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1124-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1124-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1124-2013_Conflict.pdb new file mode 100644 index 0000000..23cf7fa Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1124-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1126-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1126-2013_Conflict.exe new file mode 100644 index 0000000..79f33a8 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1126-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1126-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1126-2013_Conflict.pdb new file mode 100644 index 0000000..b5bb75c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1126-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1127-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1127-2013_Conflict.pdb new file mode 100644 index 0000000..27b7d52 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1127-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1128-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1128-2013_Conflict.exe new file mode 100644 index 0000000..5cf1ee7 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1128-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1249-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1249-2013_Conflict.pdb new file mode 100644 index 0000000..bf53004 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-05-1249-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1835-2013_Conflict.exe b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1835-2013_Conflict.exe new file mode 100644 index 0000000..73ebf9a Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1835-2013_Conflict.exe differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1835-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1835-2013_Conflict.pdb new file mode 100644 index 0000000..af0d604 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1835-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1836-2013_Conflict.pdb b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1836-2013_Conflict.pdb new file mode 100644 index 0000000..9e6697a Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT-DMS_6D5E0F86378C4FD_十二月-06-1836-2013_Conflict.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.AboutBox1.resources b/WT-DMS/obj/x86/Debug/WT_DMS.AboutBox1.resources new file mode 100644 index 0000000..c8fd80d Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.AboutBox1.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form1.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form1.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form1.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialQuery_Development.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialQuery_Development.resources new file mode 100644 index 0000000..7a355db Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialQuery_Development.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialQuery_Sales.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialQuery_Sales.resources new file mode 100644 index 0000000..7a355db Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialQuery_Sales.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialRecords_Development.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialRecords_Development.resources new file mode 100644 index 0000000..44ba1a1 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialRecords_Development.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialRecords_Sales.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialRecords_Sales.resources new file mode 100644 index 0000000..44ba1a1 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_FinancialRecords_Sales.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_QueryStorage.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_QueryStorage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_QueryStorage.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_QueryStorageRecord.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_QueryStorageRecord.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_QueryStorageRecord.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog_6D5E0F86378C4FD_十二月-10-1933-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog_6D5E0F86378C4FD_十二月-10-1933-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_SysLog_6D5E0F86378C4FD_十二月-10-1933-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_合并备料查询.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_合并备料查询.resources new file mode 100644 index 0000000..b01f71d Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_合并备料查询.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Form_备份管理.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Form_备份管理.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Form_备份管理.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.LoginForm1.resources b/WT-DMS/obj/x86/Debug/WT_DMS.LoginForm1.resources new file mode 100644 index 0000000..329ad5c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.LoginForm1.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.LoginForm1_6D5E0F86378C4FD_十二月-10-1933-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.LoginForm1_6D5E0F86378C4FD_十二月-10-1933-2013_Conflict.resources new file mode 100644 index 0000000..587f0b2 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.LoginForm1_6D5E0F86378C4FD_十二月-10-1933-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.Resources.resources b/WT-DMS/obj/x86/Debug/WT_DMS.Resources.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.Resources.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.TrustInfo.xml b/WT-DMS/obj/x86/Debug/WT_DMS.TrustInfo.xml new file mode 100644 index 0000000..7d06743 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT_DMS.TrustInfo.xml @@ -0,0 +1,12 @@ + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.application b/WT-DMS/obj/x86/Debug/WT_DMS.application new file mode 100644 index 0000000..ec61536 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + 26iVi0suA+71FMkEtSD10Q+LHD8= + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.dlgImage.resources b/WT-DMS/obj/x86/Debug/WT_DMS.dlgImage.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.dlgImage.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier.resources b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier_6D5E0F86378C4FD_十二月-10-1932-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier_6D5E0F86378C4FD_十二月-10-1932-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_AddSupplier_6D5E0F86378C4FD_十二月-10-1932-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.dlg_Input.resources b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_Input.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_Input.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.dlg_StoreSelect.resources b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_StoreSelect.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.dlg_StoreSelect.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.exe.manifest b/WT-DMS/obj/x86/Debug/WT_DMS.exe.manifest new file mode 100644 index 0000000..78a71a3 --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + qrhJU8h/4RIjZnoUItSqa4CjFG0= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + haxPLythKDn5HeRrwk9ZIchTRYA= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_BomManage.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_BomManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_BomManage.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_Material.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_Material.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_Material.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_PartNumber.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_PartNumber.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_PartNumber.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_Product.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_Product.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_Product.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_Query.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_Query.resources new file mode 100644 index 0000000..fa3f049 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_Query.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1016-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1020-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1021-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1021-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1021-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict_1.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict_1.resources new file mode 100644 index 0000000..b294193 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1023-2013_Conflict_1.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.resources new file mode 100644 index 0000000..b294193 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1050-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.resources new file mode 100644 index 0000000..b294193 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1053-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.resources new file mode 100644 index 0000000..4cca64c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1055-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1101-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1105-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1107-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.resources new file mode 100644 index 0000000..443b345 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict_1.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict_1.resources new file mode 100644 index 0000000..97aae87 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_QuerySim_6D5E0F86378C4FD_十二月-05-1109-2013_Conflict_1.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_Query_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_Query_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources new file mode 100644 index 0000000..e72616b Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_Query_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-06-1346-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-06-1346-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-06-1346-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-10-1926-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-10-1926-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_StoreLocManage_6D5E0F86378C4FD_十二月-10-1926-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-06-1347-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-06-1347-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-06-1347-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-10-1005-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-10-1005-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_SupplierManage_6D5E0F86378C4FD_十二月-10-1005-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage_6D5E0F86378C4FD_十二月-05-1248-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage_6D5E0F86378C4FD_十二月-09-1412-2013_Conflict.resources b/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage_6D5E0F86378C4FD_十二月-09-1412-2013_Conflict.resources new file mode 100644 index 0000000..fb3a271 Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.form_UserManage_6D5E0F86378C4FD_十二月-09-1412-2013_Conflict.resources differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.pdb b/WT-DMS/obj/x86/Debug/WT_DMS.pdb new file mode 100644 index 0000000..76b3a9a Binary files /dev/null and b/WT-DMS/obj/x86/Debug/WT_DMS.pdb differ diff --git a/WT-DMS/obj/x86/Debug/WT_DMS.xml b/WT-DMS/obj/x86/Debug/WT_DMS.xml new file mode 100644 index 0000000..1201bec --- /dev/null +++ b/WT-DMS/obj/x86/Debug/WT_DMS.xml @@ -0,0 +1,33 @@ + + + + +WT_DMS + + + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + + Returns the cached ResourceManager instance used by this class. + + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + + 登录检测 + + + + + + diff --git a/WT-DMS/obj/x86/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb b/WT-DMS/obj/x86/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb new file mode 100644 index 0000000..e7dcac5 --- /dev/null +++ b/WT-DMS/obj/x86/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb @@ -0,0 +1,7 @@ +' + Option Strict Off + Option Explicit On + + Imports System + Imports System.Reflection + diff --git a/WT-DMS/obj/x86/Release/DesignTimeResolveAssemblyReferences.cache b/WT-DMS/obj/x86/Release/DesignTimeResolveAssemblyReferences.cache new file mode 100644 index 0000000..6d6a2f2 Binary files /dev/null and b/WT-DMS/obj/x86/Release/DesignTimeResolveAssemblyReferences.cache differ diff --git a/WT-DMS/obj/x86/Release/DesignTimeResolveAssemblyReferencesInput.cache b/WT-DMS/obj/x86/Release/DesignTimeResolveAssemblyReferencesInput.cache new file mode 100644 index 0000000..54aea3a Binary files /dev/null and b/WT-DMS/obj/x86/Release/DesignTimeResolveAssemblyReferencesInput.cache differ diff --git a/WT-DMS/obj/x86/Release/GenerateResource.read.1.tlog b/WT-DMS/obj/x86/Release/GenerateResource.read.1.tlog new file mode 100644 index 0000000..dc0d451 Binary files /dev/null and b/WT-DMS/obj/x86/Release/GenerateResource.read.1.tlog differ diff --git a/WT-DMS/obj/x86/Release/GenerateResource.write.1.tlog b/WT-DMS/obj/x86/Release/GenerateResource.write.1.tlog new file mode 100644 index 0000000..f0a052b Binary files /dev/null and b/WT-DMS/obj/x86/Release/GenerateResource.write.1.tlog differ diff --git a/WT-DMS/obj/x86/Release/TempPE/My Project.Resources.Designer.vb.dll b/WT-DMS/obj/x86/Release/TempPE/My Project.Resources.Designer.vb.dll new file mode 100644 index 0000000..4ea038a Binary files /dev/null and b/WT-DMS/obj/x86/Release/TempPE/My Project.Resources.Designer.vb.dll differ diff --git a/WT-DMS/obj/x86/Release/WT-DMS.vbproj.AssemblyReference.cache b/WT-DMS/obj/x86/Release/WT-DMS.vbproj.AssemblyReference.cache new file mode 100644 index 0000000..f571c06 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT-DMS.vbproj.AssemblyReference.cache differ diff --git a/WT-DMS/obj/x86/Release/WT-DMS.vbproj.FileListAbsolute.txt b/WT-DMS/obj/x86/Release/WT-DMS.vbproj.FileListAbsolute.txt new file mode 100644 index 0000000..0fa3e12 --- /dev/null +++ b/WT-DMS/obj/x86/Release/WT-DMS.vbproj.FileListAbsolute.txt @@ -0,0 +1,143 @@ +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\W&T-DMS.exe.config +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\W&T-DMS.pdb +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\MySql.Data.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\Interop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\bin\Release\AxInterop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\ResolveAssemblyReference.cache +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\Interop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\AxInterop.VIDEOCAPXLib.dll +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT-DMS.vbproj.ResolveComReference.cache +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.AboutBox1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.dlg_AddSupplier.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.dlg_StoreSelect.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.Form1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_Material.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_PartNumber.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_Product.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_QuerySim.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.Form_QueryStorage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_StoreLocManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_SupplierManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.Form_SysLog.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.form_UserManage.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.LoginForm1.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\WT_DMS.Resources.resources +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\GenerateResource.read.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\GenerateResource.write.1.tlog +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\W&T-DMS.exe +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\W&T-DMS.xml +I:\Working\WT-DMS\SW\WT-DMS V1.2\WT-DMS\obj\x86\Release\W&T-DMS.pdb +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.exe.config +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\Interop.VIDEOCAPXLib.dll +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\AxInterop.VIDEOCAPXLib.dll +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT-DMS.vbproj.ResolveComReference.cache +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\W&T-DMS.exe +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\W&T-DMS.xml +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\W&T-DMS.pdb +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.exe +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.pdb +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.xml +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\Interop.VIDEOCAPXLib.dll +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\AxInterop.VIDEOCAPXLib.dll +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.AboutBox1.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.dlg_AddSupplier.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.dlg_StoreSelect.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Form1.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_Material.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_PartNumber.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_Product.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_QuerySim.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Form_QueryStorage.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_StoreLocManage.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_SupplierManage.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Form_SysLog.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_UserManage.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.LoginForm1.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Resources.resources +J:\Running_Tony\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\W&T-DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\W&T-DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\W&T-DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\W&T-DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT-DMS.vbprojResolveAssemblyReference.cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\obj\x86\Release\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.3 beta\WT-DMS\bin\Release\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\W&T-DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\W&T-DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\W&T-DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\W&T-DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\W&T-DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\W&T-DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\W&T-DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\bin\Release\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.4\WT-DMS\obj\x86\Release\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\CamSnapShot.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\DirectShowLib-2005.dll +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\CamSnapShot.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.AboutBox1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.dlg_AddSupplier.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.dlg_StoreSelect.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.Form1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_Material.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_PartNumber.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_Product.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_QuerySim.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.Form_QueryStorage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_StoreLocManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_SupplierManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.Form_SysLog.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.form_UserManage.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.LoginForm1.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.Resources.resources +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT-DMS.vbproj.GenerateResource.Cache +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\WT_DMS.exe.config +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\WT_DMS.pdb +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\bin\Release\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.TrustInfo.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.exe.manifest +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.application +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.exe +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.xml +J:\jianguoyun\Sync_Tony_New\WT-DMS\SW\WT-DMS V1.5\WT-DMS\obj\x86\Release\WT_DMS.pdb diff --git a/WT-DMS/obj/x86/Release/WT-DMS.vbproj.GenerateResource.Cache b/WT-DMS/obj/x86/Release/WT-DMS.vbproj.GenerateResource.Cache new file mode 100644 index 0000000..60245fa Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT-DMS.vbproj.GenerateResource.Cache differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.AboutBox1.resources b/WT-DMS/obj/x86/Release/WT_DMS.AboutBox1.resources new file mode 100644 index 0000000..c8fd80d Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.AboutBox1.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.Form1.resources b/WT-DMS/obj/x86/Release/WT_DMS.Form1.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.Form1.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.Form_QueryStorage.resources b/WT-DMS/obj/x86/Release/WT_DMS.Form_QueryStorage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.Form_QueryStorage.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.Form_SysLog.resources b/WT-DMS/obj/x86/Release/WT_DMS.Form_SysLog.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.Form_SysLog.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.LoginForm1.resources b/WT-DMS/obj/x86/Release/WT_DMS.LoginForm1.resources new file mode 100644 index 0000000..329ad5c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.LoginForm1.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.Resources.resources b/WT-DMS/obj/x86/Release/WT_DMS.Resources.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.Resources.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.TrustInfo.xml b/WT-DMS/obj/x86/Release/WT_DMS.TrustInfo.xml new file mode 100644 index 0000000..7d06743 --- /dev/null +++ b/WT-DMS/obj/x86/Release/WT_DMS.TrustInfo.xml @@ -0,0 +1,12 @@ + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Release/WT_DMS.application b/WT-DMS/obj/x86/Release/WT_DMS.application new file mode 100644 index 0000000..0b0c643 --- /dev/null +++ b/WT-DMS/obj/x86/Release/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + ltrJ+zqbGPziG6eXfK1YaC476xE= + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Release/WT_DMS.dlg_AddSupplier.resources b/WT-DMS/obj/x86/Release/WT_DMS.dlg_AddSupplier.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.dlg_AddSupplier.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.dlg_StoreSelect.resources b/WT-DMS/obj/x86/Release/WT_DMS.dlg_StoreSelect.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.dlg_StoreSelect.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.exe b/WT-DMS/obj/x86/Release/WT_DMS.exe new file mode 100644 index 0000000..1036806 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.exe differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.exe.manifest b/WT-DMS/obj/x86/Release/WT_DMS.exe.manifest new file mode 100644 index 0000000..6028084 --- /dev/null +++ b/WT-DMS/obj/x86/Release/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + z2vKREUufgYW4xAUzIs7r1lZ7g8= + + + + + + + + + + aCDdLz+4wyE/AMKQBlSUYNzXYNk= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_Material.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_Material.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_Material.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_PartNumber.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_PartNumber.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_PartNumber.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_Product.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_Product.resources new file mode 100644 index 0000000..6c05a97 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_Product.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_QuerySim.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_QuerySim.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_QuerySim.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_StoreLocManage.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_StoreLocManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_StoreLocManage.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_SupplierManage.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_SupplierManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_SupplierManage.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.form_UserManage.resources b/WT-DMS/obj/x86/Release/WT_DMS.form_UserManage.resources new file mode 100644 index 0000000..15d2b3c Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.form_UserManage.resources differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.pdb b/WT-DMS/obj/x86/Release/WT_DMS.pdb new file mode 100644 index 0000000..bb37df1 Binary files /dev/null and b/WT-DMS/obj/x86/Release/WT_DMS.pdb differ diff --git a/WT-DMS/obj/x86/Release/WT_DMS.xml b/WT-DMS/obj/x86/Release/WT_DMS.xml new file mode 100644 index 0000000..6e8760e --- /dev/null +++ b/WT-DMS/obj/x86/Release/WT_DMS.xml @@ -0,0 +1,30 @@ + + + + +WT_DMS + + + + + + Returns the cached ResourceManager instance used by this class. + + + + Overrides the current thread's CurrentUICulture property for all + resource lookups using this strongly typed resource class. + + + + A strongly-typed resource class, for looking up localized strings, etc. + + + + 登录检测 + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.application new file mode 100644 index 0000000..f66af58 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + oawS6zI6U89eDljZQU/fvl6w57A= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..4fd9b0c --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.config.deploy @@ -0,0 +1,223 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.deploy new file mode 100644 index 0000000..5ada9cb Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.manifest new file mode 100644 index 0000000..b0ef300 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_13/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + XfuYC/n4ylch2QFLyQFq65GB1dg= + + + + + + + + + + 5HRjLx2CElMa9C7Evzd2Zkx83Nc= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.application new file mode 100644 index 0000000..c28a023 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + 6EE9nmBPQJXs0Wgae/UgrqQWzrs= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..4fd9b0c --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.config.deploy @@ -0,0 +1,223 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.deploy new file mode 100644 index 0000000..6706e88 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.manifest new file mode 100644 index 0000000..50e20b5 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_14/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + +x8sgxAjuUsWcsdVAb2/35TODRI= + + + + + + + + + + 5HRjLx2CElMa9C7Evzd2Zkx83Nc= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.application new file mode 100644 index 0000000..53157da --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + wnF4J2GkNAknV/MRB5aQ/sHcVc4= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.deploy new file mode 100644 index 0000000..0bc49c6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.manifest new file mode 100644 index 0000000..aa6e076 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_15/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + Sm4zdFARklsd5WgN14ZmDUJLajM= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.application new file mode 100644 index 0000000..759fa4e --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + s75rjTyf2tTODkCHg1rwio26/1I= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.deploy new file mode 100644 index 0000000..4bf5f05 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.manifest new file mode 100644 index 0000000..9a38339 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_16/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + rL+LjlXFQ1T7RrMdhVuOKsj4ZI4= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.application new file mode 100644 index 0000000..6926063 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + RtHKqqH7Vp43airPJ9mr1XWRm/I= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.deploy new file mode 100644 index 0000000..168fce2 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.manifest new file mode 100644 index 0000000..7f0e715 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_1_5_0_17/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + r0Z4bu0NvdHl1Q5nEnv4csbQO9A= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/FlexCell.dll.deploy new file mode 100644 index 0000000..24b4740 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.application new file mode 100644 index 0000000..3a8995a --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + jPA49HNLz7si+5nYC3j8Tq1sWnE= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.deploy new file mode 100644 index 0000000..d822476 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.manifest new file mode 100644 index 0000000..8ee0103 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_18/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + Rh4BD5skIu0G9BG7yz5eUoSZx2U= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + hW3Gv81TScjscRtP7vjrSfJdjOo= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/FlexCell.dll.deploy new file mode 100644 index 0000000..24b4740 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.application new file mode 100644 index 0000000..3416a4c --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + 3Sf8Vc7xsWMB/xfdA7q+0ytzZmc= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.deploy new file mode 100644 index 0000000..099634f Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.manifest new file mode 100644 index 0000000..0fe7b27 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_4_0_19/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + Rh4BD5skIu0G9BG7yz5eUoSZx2U= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + TJ1mawuo+KgwdSYEC6zb/moCw3A= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/FlexCell.dll.deploy new file mode 100644 index 0000000..24b4740 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.application new file mode 100644 index 0000000..35530c6 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + itXO9MllG4InXxX/+GZMrwShbs0= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.deploy new file mode 100644 index 0000000..a42b225 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.manifest new file mode 100644 index 0000000..2865dc7 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_5_0_0/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + Rh4BD5skIu0G9BG7yz5eUoSZx2U= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + eoC1mUYfNy0ZtVn2TQs0kNaFMT8= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/FlexCell.dll.deploy new file mode 100644 index 0000000..24b4740 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.application new file mode 100644 index 0000000..1eba70e --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + p2Mmd/yyGH6IAzmFxrtJxUjV5CQ= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.deploy new file mode 100644 index 0000000..1790e38 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.manifest new file mode 100644 index 0000000..bb3f070 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_6_0_1/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + Rh4BD5skIu0G9BG7yz5eUoSZx2U= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + 4/lJxTd3j+np/bdo9sqh8biknvI= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.application new file mode 100644 index 0000000..5a2bbd6 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + q2tp9rqiUffZlmzHqxDZSfwF8UI= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.deploy new file mode 100644 index 0000000..f78061f Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.manifest new file mode 100644 index 0000000..e2e671b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_2/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + 8GKLAVT9DoDrQ1e3gSG1ntttZdU= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.application new file mode 100644 index 0000000..e0be46b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + 1+Bt5TLIfoHRk8yZLApV8tz0YvA= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.deploy new file mode 100644 index 0000000..a1a9584 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.manifest new file mode 100644 index 0000000..18d71b0 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_8_0_3/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + Ap2htqrPFZUqg3Xi7638aXhaACE= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/FlexCell.dll.deploy new file mode 100644 index 0000000..edebac2 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.application new file mode 100644 index 0000000..e639926 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + BMIXooxnyeBHIR6VAnaemM/XZiw= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.deploy new file mode 100644 index 0000000..5b16fe0 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.manifest new file mode 100644 index 0000000..d269e09 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_2_9_0_4/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + qrhJU8h/4RIjZnoUItSqa4CjFG0= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + inPbs+JRJNXFwm5bsrU+UbHAcB4= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/CamSnapShot.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/CamSnapShot.dll.deploy new file mode 100644 index 0000000..82a8636 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/CamSnapShot.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/DirectShowLib-2005.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/DirectShowLib-2005.dll.deploy new file mode 100644 index 0000000..ba11a16 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/DirectShowLib-2005.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/FlexCell.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/FlexCell.dll.deploy new file mode 100644 index 0000000..d3dd329 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/FlexCell.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/MySql.Data.dll.deploy b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/MySql.Data.dll.deploy new file mode 100644 index 0000000..87aabe6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/MySql.Data.dll.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.application b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.application new file mode 100644 index 0000000..1eb94fc --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + OXYtPpiqYMEtITCzXbLfrMeVgLs= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.config.deploy b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.config.deploy new file mode 100644 index 0000000..19c3f4b --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.config.deploy @@ -0,0 +1,244 @@ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + False + + + False + + + 358 + + + 499 + + + 444 + + + 444 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 730 + + + 530 + + + 0 + + + 0 + + + False + + + 30 + + + 100 + + + 200 + + + 400 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 400 + + + 800 + + + 400 + + + False + + + False + + + 400 + + + 400 + + + 0 + + + 0 + + + 100 + + + False + + + + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 150 + + + 100 + + + 100 + + + 150 + + + 200 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 100 + + + 800 + + + 400 + + + 100 + + + 50 + + + 100 + + + 100 + + + 100 + + + 50 + + + 800 + + + 400 + + + + diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.deploy b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.deploy new file mode 100644 index 0000000..f84e1e6 Binary files /dev/null and b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.deploy differ diff --git a/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.manifest b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.manifest new file mode 100644 index 0000000..9e91608 --- /dev/null +++ b/WT-DMS/publish/Application Files/WT_DMS_3_1_0_0/WT_DMS.exe.manifest @@ -0,0 +1,120 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xvPBmSHni+ZF7TE8te7ftfNR/s0= + + + + + + + + + + + + 4bKnY91sQkOWVuTlWroPNhD/N4Q= + + + + + + + + + + + + W5/TI/W4ojZ4Ul45OBfxTShhfLc= + + + + + + + + + + + + fQzv7UK7JdyYPYs8iwbmzVS4mZc= + + + + + + + + + + + + gHvd9BX5hFt+risAyYCEXb7iApY= + + + + + + + + + + IL0jO4IDKBYqfAEoRimV/73et5g= + + + + + + + + + + \ No newline at end of file diff --git a/WT-DMS/publish/WT-DMS V2.8.rar b/WT-DMS/publish/WT-DMS V2.8.rar new file mode 100644 index 0000000..05103f0 Binary files /dev/null and b/WT-DMS/publish/WT-DMS V2.8.rar differ diff --git a/WT-DMS/publish/WT_DMS.application b/WT-DMS/publish/WT_DMS.application new file mode 100644 index 0000000..1eb94fc --- /dev/null +++ b/WT-DMS/publish/WT_DMS.application @@ -0,0 +1,22 @@ + + + + + + + + + + + + + + + + + + OXYtPpiqYMEtITCzXbLfrMeVgLs= + + + + \ No newline at end of file diff --git a/WT-DMS/publish/setup.exe b/WT-DMS/publish/setup.exe new file mode 100644 index 0000000..89cbe93 Binary files /dev/null and b/WT-DMS/publish/setup.exe differ diff --git a/WT-DMS/版本说明.txt b/WT-DMS/版本说明.txt new file mode 100644 index 0000000..a18080a --- /dev/null +++ b/WT-DMS/版本说明.txt @@ -0,0 +1,208 @@ +V1.0 + ɻ¼ϺŹϱϵͳ¼ȹ + +V1.1 + ϺŹ¼봰ͷȡͼܣʹϺ¼ʱֱӴͷȡӦϵͼ + Camʵ֣ + ȱ㣺ָ֧ͷ + +V1.2 + 1. VideoCapؼʵͷͼȡ + 2. ųȴ16ֽڸΪ32ֽ + +V1.3 + 1. ݿmyPhpAdminתRDS + 2. VideoCapؼ֧WIN7˽ȥ + +V1.4 + 1. CamSnapShotؼȡͷͼ + +V1.5 + 1. ѯУѡһѯʱʾӦͼ + +V1.6 + 1. Form-2 ϺŲѯҳ棬ѯĽбֶ֧ѡ + 2. Form-2 ϺŲѯҳ棬ѯݶѡ Form-5 Ͽѯճ + 3. Form-5 Ͽѯҳ棬ģѯܣForm-2еIJѯ + +V1.7 + 1. Form-5 Ͽѯҳ棬ӿλ + 2. һҳ棬һϺţϵijʷ͵ǰѯ + +V1.8 + 1. ̬ϱ + 2. ϱ/ɾ/޸/ѯ/PNϢѯ/ͼƬʾ + 3. ϱ㼶 + +V1.9 + 1. Form_QueryStorageҳѯбӡơ + 2. BomManageҳϱĿӡ̡ + +V2.0 + 1. Զ¼ + 2. ӡеġ¼롱ҳ湦 + 3. ıеȫǰ + 4. ӡеġѯҳ湦 + +V2.1 + 1. ܣΪֲۡͬ͡ + ֱӦͬı + Ӧ֧ϸ_ + ۡӦ֧ϸ_ + ¼Ϊ¼루¼루ۣ + ѯΪѯѯۣ + +V2.2 + +V2.3 + 1. BOM˵ӣϲѯ + + +V2.4 + 2017-2-13 Momo + 1. Ӳѯҳ޸Ĺ + 2. ֶΪʹ + 3. BOMʱԶBOMܼ + + ///////////////////////////////////////////////////////////////////////////////////////////////////////// + ݿʺš룺 + https://www.aliyun.com/?utm_medium=text&utm_source=bdbrand&utm_campaign=bdbrand&utm_content=se_32492 + ˺:tony@inhaos.com + :aly_zaqwsx_987012 + + RDSݿ + ˺:manage + :flkjgshwe_56479_87978 + + + + 2013-10-10 + admin ih_manage_123324 + MOMO ih_manage_324543 + TONY ih_manage_546732 + Chen_Shan ih_chenshan_456452 + FangPY ih_fangpy_563234 + Yake ih_yake_783424 + ZhangYin ih_zy_5632345 + WYF ih_wyf_653452 + Production ih_pdt_672343 // ڲ + Production_EX ih_pdtex_789452 // Сռ˺ + LiaoYW ih_lyw_213456 + Weistech ih_weistech_123 + LuoJiaZhen ih_ljz_546656 + LiFan ih_lf_234604 + LuoPinChao ih_lpc_546276 + YeHuier ih_yhe_768342 + LaiXinRen ih_lxr_8972523 + DenBinBin ih_dbb_124578 + WangXinYue ih_wxy_345322 + ZhengCM ih_zcm_258741 + uts_inhaos uts_123456 + + 2018-1-30 Add + JiaRenZhen JRZabcd1234 + LiuJiaoLong LJL1234abcd + + ZhangHong ih_zh_56345 +=========================================================== + UTSݿ⣺ + ݿwt_uts + ʺţwt_uts_manage + 룺A98ya9hu(*HU8hu(*HU(hu + + ݿwt_finance + ʺţwt_finance_manag + 룺w*&ffH&7G*igIT&gOI(*H + + + + ///////////////////////////////////////////////////////////////////////////////////////////////////////// + + V2.5 + 2017-2-14 Momo + 1. BOM޷ + + V2.5 + 2017-2-14 Momo + 1. ۺڡ¼롱ҳ桰ѯܻᱨ + + V2.9 + 2018-3-22 Momo + 1.Ϻŵ빦ܣϺҳ浼׿Ϻ + + V3.0 + 2018-6-23 Momo + 1.ȨδõBug + + V3.1 + 2018-6-30 Dk02Ssq + ԭϿһпλУŵǰֿ⵱ǰλĴ + + 1.ʱһηʿԭϱʱڲֿλʾʧܡ + ӳ¼ʱԭϿһпλУŵǰֿ⵱ǰλĴ + + 2.ѯ¼ʱԭ滻Ϊԭݣʾԭ滻ԭϿеĿλݡ + + 3.ѯϿʱλʾǿжϣλΪ0ʾλ + + V3.2 + 2021-2-23 Momo/QiZengBiao + + V3.3 + 2021-08-10 Momo + 1ԶϺʱѡԶǡԶѾеϺ + 2ԶϺŵIJ + 1ERPϵͳϺŵExcel + 2˳Ϊ1-Ϻ 2-Ʒ 3- 4-λ 5- + 3ExcelݸƵ + 4Զ롱 + + V3.4 + 2021-09-30 Momo + 1°ȨϢWTΪINHAOS + 2BOMҳ棬㽫ADBOMתΪʽBOM + 1ADBOM + 2ȫѡAD BOM + 3ͨƥ䣬гѡ + 4ֱѡ񼴿ɼʽBOM + V3.4.1 + 2021-11-22 Qizengbiao + 1.޸ٲѯδѯݵ쳣 + 2.Boomɾղ + 3.BoomͬϺźϲ + 4.BoomУû޸ĸ + + V3.5 + 2022-02-17 Qizengbiao + 1.ϺעͬʱΪձBOMʱԭ˳޸Ϊִвѯ + 2.ʱBOMʱضⱸһXMLļ + + V3.6 2022-05-28 MomoWen / ChenWei + 1.ԭȫʧǨƵ uts-svr2.qicp.net + ---------------------------------------------------- + ݿ⣺ + ַuts-svr2.qicp.net + ˿ڣ3307 + ݿuts_DMS + ʺţuts_DMS_Manager + 룺A98ya9hu(*HU8hu(*HU(hu + ---------------------------------------------------- + 2.ͨ봴ıṹ + 3. .NetFramwork upgrade to .net 4.8 + + V3.7 2022-12-04 MomoWen + 1.ݿǨƵ uts-data.com + ---------------------------------------------------- + ݿ⣺ + ַuts-data.com + ˿ڣ3307 + ݿinhaos_dms + ʺţinhaos_dms + 룺A98ya9hu(*HU8hu(*HU(hu + ---------------------------------------------------- + * δ޸ģѴǨ + + V3.8 2023-08-22 MomoWen + 1 V3.6, ݿ⣺uts-svr2.qicp.net + 2ݿǨƵuts-svr2 BOMֶҪ + \ No newline at end of file