frmmain.vb

VB.NET - NET Framework - How-To Send Mai VB.NET 发送邮件的示例代码

        Me.txtSubject.Text = resources.GetString("txtSubject.Text")
        Me.txtSubject.TextAlign = CType(resources.GetObject("txtSubject.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtSubject.Visible = CType(resources.GetObject("txtSubject.Visible"), Boolean)
        Me.txtSubject.WordWrap = CType(resources.GetObject("txtSubject.WordWrap"), Boolean)
        '
        'txtBody
        '
        Me.txtBody.AccessibleDescription = CType(resources.GetObject("txtBody.AccessibleDescription"), String)
        Me.txtBody.AccessibleName = CType(resources.GetObject("txtBody.AccessibleName"), String)
        Me.txtBody.Anchor = CType(resources.GetObject("txtBody.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.txtBody.AutoSize = CType(resources.GetObject("txtBody.AutoSize"), Boolean)
        Me.txtBody.BackColor = System.Drawing.SystemColors.Window
        Me.txtBody.BackgroundImage = CType(resources.GetObject("txtBody.BackgroundImage"), System.Drawing.Image)
        Me.txtBody.CausesValidation = False
        Me.txtBody.Dock = CType(resources.GetObject("txtBody.Dock"), System.Windows.Forms.DockStyle)
        Me.txtBody.Enabled = CType(resources.GetObject("txtBody.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.txtBody, resources.GetString("txtBody.Error"))
        Me.txtBody.Font = CType(resources.GetObject("txtBody.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.txtBody, CType(resources.GetObject("txtBody.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.txtBody, CType(resources.GetObject("txtBody.IconPadding"), Integer))
        Me.txtBody.ImeMode = CType(resources.GetObject("txtBody.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtBody.Location = CType(resources.GetObject("txtBody.Location"), System.Drawing.Point)
        Me.txtBody.MaxLength = CType(resources.GetObject("txtBody.MaxLength"), Integer)
        Me.txtBody.Multiline = CType(resources.GetObject("txtBody.Multiline"), Boolean)
        Me.txtBody.Name = "txtBody"
        Me.txtBody.PasswordChar = CType(resources.GetObject("txtBody.PasswordChar"), Char)
        Me.txtBody.RightToLeft = CType(resources.GetObject("txtBody.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtBody.ScrollBars = CType(resources.GetObject("txtBody.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtBody.Size = CType(resources.GetObject("txtBody.Size"), System.Drawing.Size)
        Me.txtBody.TabIndex = CType(resources.GetObject("txtBody.TabIndex"), Integer)
        Me.txtBody.Text = resources.GetString("txtBody.Text")
        Me.txtBody.TextAlign = CType(resources.GetObject("txtBody.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtBody.Visible = CType(resources.GetObject("txtBody.Visible"), Boolean)
        Me.txtBody.WordWrap = CType(resources.GetObject("txtBody.WordWrap"), Boolean)
        '
        'txtCC
        '
        Me.txtCC.AccessibleDescription = CType(resources.GetObject("txtCC.AccessibleDescription"), String)
        Me.txtCC.AccessibleName = CType(resources.GetObject("txtCC.AccessibleName"), String)
        Me.txtCC.Anchor = CType(resources.GetObject("txtCC.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.txtCC.AutoSize = CType(resources.GetObject("txtCC.AutoSize"), Boolean)
        Me.txtCC.BackColor = System.Drawing.SystemColors.Window
        Me.txtCC.BackgroundImage = CType(resources.GetObject("txtCC.BackgroundImage"), System.Drawing.Image)
        Me.txtCC.CausesValidation = False
        Me.txtCC.Dock = CType(resources.GetObject("txtCC.Dock"), System.Windows.Forms.DockStyle)
        Me.txtCC.Enabled = CType(resources.GetObject("txtCC.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.txtCC, resources.GetString("txtCC.Error"))
        Me.txtCC.Font = CType(resources.GetObject("txtCC.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.txtCC, CType(resources.GetObject("txtCC.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.txtCC, CType(resources.GetObject("txtCC.IconPadding"), Integer))
        Me.txtCC.ImeMode = CType(resources.GetObject("txtCC.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtCC.Location = CType(resources.GetObject("txtCC.Location"), System.Drawing.Point)
        Me.txtCC.MaxLength = CType(resources.GetObject("txtCC.MaxLength"), Integer)
        Me.txtCC.Multiline = CType(resources.GetObject("txtCC.Multiline"), Boolean)
        Me.txtCC.Name = "txtCC"
        Me.txtCC.PasswordChar = CType(resources.GetObject("txtCC.PasswordChar"), Char)
        Me.txtCC.RightToLeft = CType(resources.GetObject("txtCC.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtCC.ScrollBars = CType(resources.GetObject("txtCC.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtCC.Size = CType(resources.GetObject("txtCC.Size"), System.Drawing.Size)
        Me.txtCC.TabIndex = CType(resources.GetObject("txtCC.TabIndex"), Integer)
        Me.txtCC.Text = resources.GetString("txtCC.Text")
        Me.txtCC.TextAlign = CType(resources.GetObject("txtCC.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtCC.Visible = CType(resources.GetObject("txtCC.Visible"), Boolean)
        Me.txtCC.WordWrap = CType(resources.GetObject("txtCC.WordWrap"), Boolean)
        '
        'lblBCC
        '
        Me.lblBCC.AccessibleDescription = CType(resources.GetObject("lblBCC.AccessibleDescription"), String)
        Me.lblBCC.AccessibleName = CType(resources.GetObject("lblBCC.AccessibleName"), String)
        Me.lblBCC.Anchor = CType(resources.GetObject("lblBCC.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblBCC.AutoSize = CType(resources.GetObject("lblBCC.AutoSize"), Boolean)
        Me.lblBCC.BackColor = System.Drawing.SystemColors.Control
        Me.lblBCC.CausesValidation = False
        Me.lblBCC.Dock = CType(resources.GetObject("lblBCC.Dock"), System.Windows.Forms.DockStyle)
        Me.lblBCC.Enabled = CType(resources.GetObject("lblBCC.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.lblBCC, resources.GetString("lblBCC.Error"))
        Me.lblBCC.Font = CType(resources.GetObject("lblBCC.Font"), System.Drawing.Font)
        Me.lblBCC.ForeColor = System.Drawing.SystemColors.ControlText
        Me.erpEmailAddresses.SetIconAlignment(Me.lblBCC, CType(resources.GetObject("lblBCC.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.lblBCC, CType(resources.GetObject("lblBCC.IconPadding"), Integer))
        Me.lblBCC.Image = CType(resources.GetObject("lblBCC.Image"), System.Drawing.Image)
        Me.lblBCC.ImageAlign = CType(resources.GetObject("lblBCC.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblBCC.ImageIndex = CType(resources.GetObject("lblBCC.ImageIndex"), Integer)
        Me.lblBCC.ImeMode = CType(resources.GetObject("lblBCC.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblBCC.Location = CType(resources.GetObject("lblBCC.Location"), System.Drawing.Point)
        Me.lblBCC.Name = "lblBCC"
        Me.lblBCC.RightToLeft = CType(resources.GetObject("lblBCC.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblBCC.Size = CType(resources.GetObject("lblBCC.Size"), System.Drawing.Size)
        Me.lblBCC.TabIndex = CType(resources.GetObject("lblBCC.TabIndex"), Integer)
        Me.lblBCC.Text = resources.GetString("lblBCC.Text")
        Me.lblBCC.TextAlign = CType(resources.GetObject("lblBCC.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblBCC.Visible = CType(resources.GetObject("lblBCC.Visible"), Boolean)
        '
        'lblCC
        '
        Me.lblCC.AccessibleDescription = CType(resources.GetObject("lblCC.AccessibleDescription"), String)
        Me.lblCC.AccessibleName = CType(resources.GetObject("lblCC.AccessibleName"), String)
        Me.lblCC.Anchor = CType(resources.GetObject("lblCC.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.lblCC.AutoSize = CType(resources.GetObject("lblCC.AutoSize"), Boolean)
        Me.lblCC.BackColor = System.Drawing.SystemColors.Control
        Me.lblCC.CausesValidation = False
        Me.lblCC.Dock = CType(resources.GetObject("lblCC.Dock"), System.Windows.Forms.DockStyle)
        Me.lblCC.Enabled = CType(resources.GetObject("lblCC.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.lblCC, resources.GetString("lblCC.Error"))
        Me.lblCC.Font = CType(resources.GetObject("lblCC.Font"), System.Drawing.Font)
        Me.lblCC.ForeColor = System.Drawing.SystemColors.ControlText
        Me.erpEmailAddresses.SetIconAlignment(Me.lblCC, CType(resources.GetObject("lblCC.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.lblCC, CType(resources.GetObject("lblCC.IconPadding"), Integer))
        Me.lblCC.Image = CType(resources.GetObject("lblCC.Image"), System.Drawing.Image)
        Me.lblCC.ImageAlign = CType(resources.GetObject("lblCC.ImageAlign"), System.Drawing.ContentAlignment)
        Me.lblCC.ImageIndex = CType(resources.GetObject("lblCC.ImageIndex"), Integer)
        Me.lblCC.ImeMode = CType(resources.GetObject("lblCC.ImeMode"), System.Windows.Forms.ImeMode)
        Me.lblCC.Location = CType(resources.GetObject("lblCC.Location"), System.Drawing.Point)
        Me.lblCC.Name = "lblCC"
        Me.lblCC.RightToLeft = CType(resources.GetObject("lblCC.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.lblCC.Size = CType(resources.GetObject("lblCC.Size"), System.Drawing.Size)
        Me.lblCC.TabIndex = CType(resources.GetObject("lblCC.TabIndex"), Integer)
        Me.lblCC.Text = resources.GetString("lblCC.Text")
        Me.lblCC.TextAlign = CType(resources.GetObject("lblCC.TextAlign"), System.Drawing.ContentAlignment)
        Me.lblCC.Visible = CType(resources.GetObject("lblCC.Visible"), Boolean)
        '
        'erpEmailAddresses
        '
        Me.erpEmailAddresses.Icon = CType(resources.GetObject("erpEmailAddresses.Icon"), System.Drawing.Icon)
        '
        'txtBCC
        '
        Me.txtBCC.AccessibleDescription = CType(resources.GetObject("txtBCC.AccessibleDescription"), String)
        Me.txtBCC.AccessibleName = CType(resources.GetObject("txtBCC.AccessibleName"), String)
        Me.txtBCC.Anchor = CType(resources.GetObject("txtBCC.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.txtBCC.AutoSize = CType(resources.GetObject("txtBCC.AutoSize"), Boolean)
        Me.txtBCC.BackColor = System.Drawing.SystemColors.Window
        Me.txtBCC.BackgroundImage = CType(resources.GetObject("txtBCC.BackgroundImage"), System.Drawing.Image)
        Me.txtBCC.CausesValidation = False
        Me.txtBCC.Dock = CType(resources.GetObject("txtBCC.Dock"), System.Windows.Forms.DockStyle)
        Me.txtBCC.Enabled = CType(resources.GetObject("txtBCC.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.txtBCC, resources.GetString("txtBCC.Error"))
        Me.txtBCC.Font = CType(resources.GetObject("txtBCC.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.txtBCC, CType(resources.GetObject("txtBCC.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.txtBCC, CType(resources.GetObject("txtBCC.IconPadding"), Integer))
        Me.txtBCC.ImeMode = CType(resources.GetObject("txtBCC.ImeMode"), System.Windows.Forms.ImeMode)
        Me.txtBCC.Location = CType(resources.GetObject("txtBCC.Location"), System.Drawing.Point)
        Me.txtBCC.MaxLength = CType(resources.GetObject("txtBCC.MaxLength"), Integer)
        Me.txtBCC.Multiline = CType(resources.GetObject("txtBCC.Multiline"), Boolean)
        Me.txtBCC.Name = "txtBCC"
        Me.txtBCC.PasswordChar = CType(resources.GetObject("txtBCC.PasswordChar"), Char)
        Me.txtBCC.RightToLeft = CType(resources.GetObject("txtBCC.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.txtBCC.ScrollBars = CType(resources.GetObject("txtBCC.ScrollBars"), System.Windows.Forms.ScrollBars)
        Me.txtBCC.Size = CType(resources.GetObject("txtBCC.Size"), System.Drawing.Size)
        Me.txtBCC.TabIndex = CType(resources.GetObject("txtBCC.TabIndex"), Integer)
        Me.txtBCC.Text = resources.GetString("txtBCC.Text")
        Me.txtBCC.TextAlign = CType(resources.GetObject("txtBCC.TextAlign"), System.Windows.Forms.HorizontalAlignment)
        Me.txtBCC.Visible = CType(resources.GetObject("txtBCC.Visible"), Boolean)
        Me.txtBCC.WordWrap = CType(resources.GetObject("txtBCC.WordWrap"), Boolean)
        '
        'cboPriority
        '
        Me.cboPriority.AccessibleDescription = CType(resources.GetObject("cboPriority.AccessibleDescription"), String)
        Me.cboPriority.AccessibleName = CType(resources.GetObject("cboPriority.AccessibleName"), String)
        Me.cboPriority.Anchor = CType(resources.GetObject("cboPriority.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.cboPriority.BackgroundImage = CType(resources.GetObject("cboPriority.BackgroundImage"), System.Drawing.Image)
        Me.cboPriority.CausesValidation = False
        Me.cboPriority.Dock = CType(resources.GetObject("cboPriority.Dock"), System.Windows.Forms.DockStyle)
        Me.cboPriority.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboPriority.Enabled = CType(resources.GetObject("cboPriority.Enabled"), Boolean)
        Me.erpEmailAddresses.SetError(Me.cboPriority, resources.GetString("cboPriority.Error"))
        Me.cboPriority.Font = CType(resources.GetObject("cboPriority.Font"), System.Drawing.Font)
        Me.erpEmailAddresses.SetIconAlignment(Me.cboPriority, CType(resources.GetObject("cboPriority.IconAlignment"), System.Windows.Forms.ErrorIconAlignment))
        Me.erpEmailAddresses.SetIconPadding(Me.cboPriority, CType(resources.GetObject("cboPriority.IconPadding"), Integer))
        Me.cboPriority.ImeMode = CType(resources.GetObject("cboPriority.ImeMode"), System.Windows.Forms.ImeMode)
        Me.cboPriority.IntegralHeight = CType(resources.GetObject("cboPriority.IntegralHeight"), Boolean)
        Me.cboPriority.ItemHeight = CType(resources.GetObject("cboPriority.ItemHeight"), Integer)
        Me.cboPriority.Location = CType(resources.GetObject("cboPriority.Location"), System.Drawing.Point)
        Me.cboPriority.MaxDropDownItems = CType(resources.GetObject("cboPriority.MaxDropDownItems"), Integer)
        Me.cboPriority.MaxLength = CType(resources.GetObject("cboPriority.MaxLength"), Integer)
        Me.cboPriority.Name = "cboPriority"
        Me.cboPriority.RightToLeft = CType(resources.GetObject("cboPriority.RightToLeft"), System.Windows.Forms.RightToLeft)
        Me.cboPriority.Size = CType(resources.GetObject("cboPriority.Size"), System.Drawing.Size)
        Me.cboPriority.TabIndex = CType(resources.GetObject("cboPriority.TabIndex"), Integer)
        Me.cboPriority.Text = resources.GetString("cboPriority.Text")
        Me.cboPriority.Visible = CType(resources.GetObject("cboPriority.Visible"), Boolean)
        '
        'btnBrowse
        '
        Me.btnBrowse.AccessibleDescription = CType(resources.GetObject("btnBrowse.AccessibleDescription"), String)
        Me.btnBrowse.AccessibleName = CType(resources.GetObject("btnBrowse.AccessibleName"), String)
        Me.btnBrowse.Anchor = CType(resources.GetObject("btnBrowse.Anchor"), System.Windows.Forms.AnchorStyles)
        Me.btnBrowse.BackgroundImage = CType(resources.GetObject("btnBrowse.BackgroundImage"), System.Drawing.Image)