Partial Class HX_PGS_UPDATE 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() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(HX_PGS_UPDATE)) Me.ftp清單_dgv = New System.Windows.Forms.DataGridView() Me.伺服器區域_cb = New System.Windows.Forms.ComboBox() Me.ProgressBar1 = New System.Windows.Forms.ProgressBar() Me.主程式更新 = New System.Windows.Forms.Timer(Me.components) Me.刪除在下載 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在1 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在2 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在3 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在4 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在5 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在6 = New System.Windows.Forms.Timer(Me.components) Me.驗證存在7 = New System.Windows.Forms.Timer(Me.components) Me.刪除所有檔案 = New System.Windows.Forms.Timer(Me.components) Me.OK = New System.Windows.Forms.Timer(Me.components) Me.HX_CL = New System.Windows.Forms.Timer(Me.components) Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.CheckBox2 = New System.Windows.Forms.CheckBox() Me.CheckBox3 = New System.Windows.Forms.CheckBox() Me.CheckBox4 = New System.Windows.Forms.CheckBox() Me.CheckBox5 = New System.Windows.Forms.CheckBox() Me.CheckBox6 = New System.Windows.Forms.CheckBox() Me.CheckBox7 = New System.Windows.Forms.CheckBox() Me.CheckBox8 = New System.Windows.Forms.CheckBox() Me.CheckBox9 = New System.Windows.Forms.CheckBox() Me.CheckBox10 = New System.Windows.Forms.CheckBox() Me.CheckBox11 = New System.Windows.Forms.CheckBox() Me.小更新_ch = New System.Windows.Forms.CheckBox() Me.中更新_ch = New System.Windows.Forms.CheckBox() Me.大更新_ch = New System.Windows.Forms.CheckBox() Me.小更新 = New System.Windows.Forms.Timer(Me.components) Me.中更新 = New System.Windows.Forms.Timer(Me.components) Me.大更新 = New System.Windows.Forms.Timer(Me.components) CType(Me.ftp清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'ftp清單_dgv ' Me.ftp清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.ftp清單_dgv.Location = New System.Drawing.Point(302, 82) Me.ftp清單_dgv.Name = "ftp清單_dgv" Me.ftp清單_dgv.RowHeadersWidth = 5 Me.ftp清單_dgv.RowTemplate.Height = 24 Me.ftp清單_dgv.Size = New System.Drawing.Size(126, 72) Me.ftp清單_dgv.TabIndex = 627 Me.ftp清單_dgv.Visible = False ' '伺服器區域_cb ' Me.伺服器區域_cb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.伺服器區域_cb.ForeColor = System.Drawing.Color.Blue Me.伺服器區域_cb.FormattingEnabled = True Me.伺服器區域_cb.Items.AddRange(New Object() {"印尼外網", "測試雲端", "公司雲端"}) Me.伺服器區域_cb.Location = New System.Drawing.Point(425, 71) Me.伺服器區域_cb.Name = "伺服器區域_cb" Me.伺服器區域_cb.Size = New System.Drawing.Size(102, 24) Me.伺服器區域_cb.TabIndex = 631 ' 'ProgressBar1 ' Me.ProgressBar1.Location = New System.Drawing.Point(-1, -1) Me.ProgressBar1.Maximum = 10000 Me.ProgressBar1.Name = "ProgressBar1" Me.ProgressBar1.Size = New System.Drawing.Size(544, 51) Me.ProgressBar1.TabIndex = 637 ' '主程式更新 ' Me.主程式更新.Interval = 300 ' '刪除在下載 ' Me.刪除在下載.Interval = 300 ' '驗證存在1 ' Me.驗證存在1.Interval = 300 ' '驗證存在2 ' Me.驗證存在2.Interval = 300 ' '驗證存在3 ' Me.驗證存在3.Interval = 300 ' '驗證存在4 ' Me.驗證存在4.Interval = 300 ' '驗證存在5 ' Me.驗證存在5.Interval = 300 ' '驗證存在6 ' Me.驗證存在6.Interval = 300 ' '驗證存在7 ' Me.驗證存在7.Interval = 300 ' '刪除所有檔案 ' Me.刪除所有檔案.Interval = 300 ' 'OK ' Me.OK.Interval = 600 ' 'HX_CL ' Me.HX_CL.Interval = 300 ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.Location = New System.Drawing.Point(9, 51) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(40, 20) Me.CheckBox1.TabIndex = 638 Me.CheckBox1.Text = "T1" Me.CheckBox1.UseVisualStyleBackColor = True ' 'CheckBox2 ' Me.CheckBox2.AutoSize = True Me.CheckBox2.Location = New System.Drawing.Point(57, 51) Me.CheckBox2.Name = "CheckBox2" Me.CheckBox2.Size = New System.Drawing.Size(40, 20) Me.CheckBox2.TabIndex = 639 Me.CheckBox2.Text = "T2" Me.CheckBox2.UseVisualStyleBackColor = True Me.CheckBox2.Visible = False ' 'CheckBox3 ' Me.CheckBox3.AutoSize = True Me.CheckBox3.Location = New System.Drawing.Point(105, 51) Me.CheckBox3.Name = "CheckBox3" Me.CheckBox3.Size = New System.Drawing.Size(40, 20) Me.CheckBox3.TabIndex = 640 Me.CheckBox3.Text = "T3" Me.CheckBox3.UseVisualStyleBackColor = True Me.CheckBox3.Visible = False ' 'CheckBox4 ' Me.CheckBox4.AutoSize = True Me.CheckBox4.Location = New System.Drawing.Point(153, 51) Me.CheckBox4.Name = "CheckBox4" Me.CheckBox4.Size = New System.Drawing.Size(40, 20) Me.CheckBox4.TabIndex = 641 Me.CheckBox4.Text = "T4" Me.CheckBox4.UseVisualStyleBackColor = True Me.CheckBox4.Visible = False ' 'CheckBox5 ' Me.CheckBox5.AutoSize = True Me.CheckBox5.Location = New System.Drawing.Point(201, 51) Me.CheckBox5.Name = "CheckBox5" Me.CheckBox5.Size = New System.Drawing.Size(40, 20) Me.CheckBox5.TabIndex = 642 Me.CheckBox5.Text = "T5" Me.CheckBox5.UseVisualStyleBackColor = True Me.CheckBox5.Visible = False ' 'CheckBox6 ' Me.CheckBox6.AutoSize = True Me.CheckBox6.Location = New System.Drawing.Point(249, 51) Me.CheckBox6.Name = "CheckBox6" Me.CheckBox6.Size = New System.Drawing.Size(40, 20) Me.CheckBox6.TabIndex = 643 Me.CheckBox6.Text = "T6" Me.CheckBox6.UseVisualStyleBackColor = True Me.CheckBox6.Visible = False ' 'CheckBox7 ' Me.CheckBox7.AutoSize = True Me.CheckBox7.Location = New System.Drawing.Point(295, 51) Me.CheckBox7.Name = "CheckBox7" Me.CheckBox7.Size = New System.Drawing.Size(40, 20) Me.CheckBox7.TabIndex = 644 Me.CheckBox7.Text = "T7" Me.CheckBox7.UseVisualStyleBackColor = True Me.CheckBox7.Visible = False ' 'CheckBox8 ' Me.CheckBox8.AutoSize = True Me.CheckBox8.Location = New System.Drawing.Point(342, 51) Me.CheckBox8.Name = "CheckBox8" Me.CheckBox8.Size = New System.Drawing.Size(40, 20) Me.CheckBox8.TabIndex = 645 Me.CheckBox8.Text = "T8" Me.CheckBox8.UseVisualStyleBackColor = True Me.CheckBox8.Visible = False ' 'CheckBox9 ' Me.CheckBox9.AutoSize = True Me.CheckBox9.Location = New System.Drawing.Point(390, 51) Me.CheckBox9.Name = "CheckBox9" Me.CheckBox9.Size = New System.Drawing.Size(40, 20) Me.CheckBox9.TabIndex = 646 Me.CheckBox9.Text = "T9" Me.CheckBox9.UseVisualStyleBackColor = True Me.CheckBox9.Visible = False ' 'CheckBox10 ' Me.CheckBox10.AutoSize = True Me.CheckBox10.Location = New System.Drawing.Point(438, 51) Me.CheckBox10.Name = "CheckBox10" Me.CheckBox10.Size = New System.Drawing.Size(47, 20) Me.CheckBox10.TabIndex = 647 Me.CheckBox10.Text = "T10" Me.CheckBox10.UseVisualStyleBackColor = True Me.CheckBox10.Visible = False ' 'CheckBox11 ' Me.CheckBox11.AutoSize = True Me.CheckBox11.Location = New System.Drawing.Point(493, 51) Me.CheckBox11.Name = "CheckBox11" Me.CheckBox11.Size = New System.Drawing.Size(43, 20) Me.CheckBox11.TabIndex = 648 Me.CheckBox11.Text = "OK" Me.CheckBox11.UseVisualStyleBackColor = True ' '小更新_ch ' Me.小更新_ch.AutoSize = True Me.小更新_ch.Location = New System.Drawing.Point(4, 74) Me.小更新_ch.Name = "小更新_ch" Me.小更新_ch.Size = New System.Drawing.Size(62, 20) Me.小更新_ch.TabIndex = 649 Me.小更新_ch.Text = "小更新" Me.小更新_ch.UseVisualStyleBackColor = True ' '中更新_ch ' Me.中更新_ch.AutoSize = True Me.中更新_ch.Location = New System.Drawing.Point(72, 74) Me.中更新_ch.Name = "中更新_ch" Me.中更新_ch.Size = New System.Drawing.Size(62, 20) Me.中更新_ch.TabIndex = 650 Me.中更新_ch.Text = "中更新" Me.中更新_ch.UseVisualStyleBackColor = True ' '大更新_ch ' Me.大更新_ch.AutoSize = True Me.大更新_ch.Location = New System.Drawing.Point(140, 74) Me.大更新_ch.Name = "大更新_ch" Me.大更新_ch.Size = New System.Drawing.Size(62, 20) Me.大更新_ch.TabIndex = 651 Me.大更新_ch.Text = "大更新" Me.大更新_ch.UseVisualStyleBackColor = True ' '小更新 ' Me.小更新.Interval = 300 ' '中更新 ' Me.中更新.Interval = 300 ' '大更新 ' Me.大更新.Interval = 300 ' 'HX_PGS_UPDATE ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(542, 71) Me.ControlBox = False Me.Controls.Add(Me.大更新_ch) Me.Controls.Add(Me.中更新_ch) Me.Controls.Add(Me.小更新_ch) Me.Controls.Add(Me.CheckBox11) Me.Controls.Add(Me.CheckBox10) Me.Controls.Add(Me.CheckBox9) Me.Controls.Add(Me.CheckBox8) Me.Controls.Add(Me.CheckBox7) Me.Controls.Add(Me.CheckBox6) Me.Controls.Add(Me.CheckBox5) Me.Controls.Add(Me.CheckBox4) Me.Controls.Add(Me.CheckBox3) Me.Controls.Add(Me.CheckBox2) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.ProgressBar1) Me.Controls.Add(Me.伺服器區域_cb) Me.Controls.Add(Me.ftp清單_dgv) Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.MaximizeBox = False Me.MinimizeBox = False Me.Name = "HX_PGS_UPDATE" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "WS-ERP-SYS-UPDATE........" CType(Me.ftp清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents ftp清單_dgv As DataGridView Friend WithEvents 伺服器區域_cb As ComboBox Friend WithEvents ProgressBar1 As ProgressBar Friend WithEvents 主程式更新 As Timer Friend WithEvents 刪除在下載 As Timer Friend WithEvents 驗證存在1 As Timer Friend WithEvents 驗證存在2 As Timer Friend WithEvents 驗證存在3 As Timer Friend WithEvents 驗證存在4 As Timer Friend WithEvents 驗證存在5 As Timer Friend WithEvents 驗證存在6 As Timer Friend WithEvents 驗證存在7 As Timer Friend WithEvents 刪除所有檔案 As Timer Friend WithEvents OK As Timer Friend WithEvents HX_CL As Timer Friend WithEvents CheckBox1 As CheckBox Friend WithEvents CheckBox2 As CheckBox Friend WithEvents CheckBox3 As CheckBox Friend WithEvents CheckBox4 As CheckBox Friend WithEvents CheckBox5 As CheckBox Friend WithEvents CheckBox6 As CheckBox Friend WithEvents CheckBox7 As CheckBox Friend WithEvents CheckBox8 As CheckBox Friend WithEvents CheckBox9 As CheckBox Friend WithEvents CheckBox10 As CheckBox Friend WithEvents CheckBox11 As CheckBox Friend WithEvents 小更新_ch As CheckBox Friend WithEvents 中更新_ch As CheckBox Friend WithEvents 大更新_ch As CheckBox Friend WithEvents 小更新 As Timer Friend WithEvents 中更新 As Timer Friend WithEvents 大更新 As Timer End Class