_ Partial Class 楦頭圖片導入資料庫 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 Form 設計工具的必要項 Private components As System.ComponentModel.IContainer '注意: 以下為 Windows Form 設計工具所需的程序 '可以使用 Windows Form 設計工具進行修改。 '請勿使用程式碼編輯器進行修改。 _ Private Sub InitializeComponent() Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Label6 = New System.Windows.Forms.Label() Me.TextBox3 = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.WebBrowser2 = New System.Windows.Forms.WebBrowser() Me.Button1 = New System.Windows.Forms.Button() Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.Label8 = New System.Windows.Forms.Label() Me.Button11 = New System.Windows.Forms.Button() Me.Label9 = New System.Windows.Forms.Label() Me.TextBox4 = New System.Windows.Forms.TextBox() Me.Button31 = New System.Windows.Forms.Button() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.Label3 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.DataGridView1 = New System.Windows.Forms.DataGridView() Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() Me.Label5 = New System.Windows.Forms.Label() Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog() CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.ForeColor = System.Drawing.Color.Red Me.Label6.Location = New System.Drawing.Point(229, 41) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(424, 16) Me.Label6.TabIndex = 589 Me.Label6.Text = "如檔案無法拖曳至伺服器FTP文件夾,請修改檔案名稱不要帶有中文字或是符號" ' 'TextBox3 ' Me.TextBox3.AllowDrop = True Me.TextBox3.ForeColor = System.Drawing.Color.Black Me.TextBox3.Location = New System.Drawing.Point(1259, 38) Me.TextBox3.Multiline = True Me.TextBox3.Name = "TextBox3" Me.TextBox3.Size = New System.Drawing.Size(142, 23) Me.TextBox3.TabIndex = 588 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label4.Location = New System.Drawing.Point(12, 548) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(156, 24) Me.Label4.TabIndex = 586 Me.Label4.Text = "伺服器FTP文件夾" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label1.Location = New System.Drawing.Point(12, 37) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(86, 24) Me.Label1.TabIndex = 585 Me.Label1.Text = "我的電腦" ' 'WebBrowser2 ' Me.WebBrowser2.Location = New System.Drawing.Point(12, 67) Me.WebBrowser2.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser2.Name = "WebBrowser2" Me.WebBrowser2.Size = New System.Drawing.Size(1627, 449) Me.WebBrowser2.TabIndex = 571 Me.WebBrowser2.Url = New System.Uri("", System.UriKind.Relative) ' 'Button1 ' Me.Button1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button1.ForeColor = System.Drawing.Color.Blue Me.Button1.Location = New System.Drawing.Point(104, 37) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(119, 24) Me.Button1.TabIndex = 584 Me.Button1.Text = "讀取料夾路徑" Me.Button1.UseVisualStyleBackColor = True ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.Location = New System.Drawing.Point(1259, 12) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(75, 20) Me.CheckBox1.TabIndex = 583 Me.CheckBox1.Text = "特殊模式" Me.CheckBox1.UseVisualStyleBackColor = True ' 'Label8 ' Me.Label8.AutoSize = True Me.Label8.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label8.ForeColor = System.Drawing.Color.Red Me.Label8.Location = New System.Drawing.Point(886, 9) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(367, 51) Me.Label8.TabIndex = 582 Me.Label8.Text = "1、將我的電腦內的資料拖曳到伺服器FTP文件夾。" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "2、在我的電腦檔案顯示處將要上傳的檔案拖曳到檔案名稱處。" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "3、確認楦頭編號資料、檔案名稱資料無誤後方可按確認" & "存檔。" ' 'Button11 ' Me.Button11.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button11.ForeColor = System.Drawing.Color.Blue Me.Button11.Location = New System.Drawing.Point(773, 9) Me.Button11.Name = "Button11" Me.Button11.Size = New System.Drawing.Size(107, 52) Me.Button11.TabIndex = 581 Me.Button11.Text = "確認儲存" Me.Button11.UseVisualStyleBackColor = True ' 'Label9 ' Me.Label9.AutoSize = True Me.Label9.Location = New System.Drawing.Point(12, 525) Me.Label9.Name = "Label9" Me.Label9.Size = New System.Drawing.Size(56, 16) Me.Label9.TabIndex = 580 Me.Label9.Text = "檔案名稱" ' 'TextBox4 ' Me.TextBox4.AllowDrop = True Me.TextBox4.ForeColor = System.Drawing.Color.Black Me.TextBox4.Location = New System.Drawing.Point(74, 522) Me.TextBox4.Multiline = True Me.TextBox4.Name = "TextBox4" Me.TextBox4.Size = New System.Drawing.Size(1509, 23) Me.TextBox4.TabIndex = 579 ' 'Button31 ' Me.Button31.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button31.ForeColor = System.Drawing.Color.Black Me.Button31.Location = New System.Drawing.Point(1492, 9) Me.Button31.Name = "Button31" Me.Button31.Size = New System.Drawing.Size(159, 52) Me.Button31.TabIndex = 578 Me.Button31.Text = "查詢" Me.Button31.UseVisualStyleBackColor = True ' 'TextBox2 ' Me.TextBox2.ForeColor = System.Drawing.Color.Black Me.TextBox2.Location = New System.Drawing.Point(485, 9) Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(282, 23) Me.TextBox2.TabIndex = 577 ' 'TextBox1 ' Me.TextBox1.ForeColor = System.Drawing.Color.Black Me.TextBox1.Location = New System.Drawing.Point(98, 9) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(282, 23) Me.TextBox1.TabIndex = 576 ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Location = New System.Drawing.Point(399, 12) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(80, 16) Me.Label3.TabIndex = 575 Me.Label3.Text = "楦頭圖片編號" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(12, 12) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(56, 16) Me.Label2.TabIndex = 574 Me.Label2.Text = "楦頭編號" ' 'DataGridView1 ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DataGridView1.Location = New System.Drawing.Point(1657, 9) Me.DataGridView1.Name = "DataGridView1" Me.DataGridView1.RowHeadersWidth = 5 Me.DataGridView1.RowTemplate.Height = 24 Me.DataGridView1.Size = New System.Drawing.Size(245, 955) Me.DataGridView1.TabIndex = 573 ' 'WebBrowser1 ' Me.WebBrowser1.Location = New System.Drawing.Point(12, 573) Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser1.Name = "WebBrowser1" Me.WebBrowser1.Size = New System.Drawing.Size(1627, 391) Me.WebBrowser1.TabIndex = 572 Me.WebBrowser1.Url = New System.Uri("", System.UriKind.Relative) ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Font = New System.Drawing.Font("微軟正黑體", 36.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label5.ForeColor = System.Drawing.Color.Red Me.Label5.Location = New System.Drawing.Point(1577, 513) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(75, 61) Me.Label5.TabIndex = 587 Me.Label5.Text = "↓" ' '楦頭圖片導入資料庫 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1914, 971) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.TextBox3) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.Label8) Me.Controls.Add(Me.Button11) Me.Controls.Add(Me.Label9) Me.Controls.Add(Me.TextBox4) Me.Controls.Add(Me.Button31) Me.Controls.Add(Me.TextBox2) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.DataGridView1) Me.Controls.Add(Me.WebBrowser1) Me.Controls.Add(Me.WebBrowser2) Me.Controls.Add(Me.Label5) Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.Name = "楦頭圖片導入資料庫" Me.Text = "楦頭圖片導入資料庫" CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label6 As Label Friend WithEvents TextBox3 As TextBox Friend WithEvents Label4 As Label Friend WithEvents Label1 As Label Friend WithEvents WebBrowser2 As WebBrowser Friend WithEvents Button1 As Button Friend WithEvents CheckBox1 As CheckBox Friend WithEvents Label8 As Label Friend WithEvents Button11 As Button Friend WithEvents Label9 As Label Friend WithEvents TextBox4 As TextBox Friend WithEvents Button31 As Button Friend WithEvents TextBox2 As TextBox Friend WithEvents TextBox1 As TextBox Friend WithEvents Label3 As Label Friend WithEvents Label2 As Label Friend WithEvents DataGridView1 As DataGridView Friend WithEvents WebBrowser1 As WebBrowser Friend WithEvents Label5 As Label Friend WithEvents FolderBrowserDialog1 As FolderBrowserDialog End Class