412 lines
16 KiB
VB.net
412 lines
16 KiB
VB.net
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
|
Partial Class frmNewsletter
|
|
Inherits System.Windows.Forms.Form
|
|
|
|
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
|
<System.Diagnostics.DebuggerNonUserCode()> _
|
|
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
|
|
|
|
'Wird vom Windows Form-Designer benötigt.
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
|
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
|
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
|
<System.Diagnostics.DebuggerStepThrough()> _
|
|
Private Sub InitializeComponent()
|
|
Me.components = New System.ComponentModel.Container()
|
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmNewsletter))
|
|
Me.RichTextBox1 = New System.Windows.Forms.RichTextBox()
|
|
Me.Label1 = New System.Windows.Forms.Label()
|
|
Me.Label2 = New System.Windows.Forms.Label()
|
|
Me.Label3 = New System.Windows.Forms.Label()
|
|
Me.Label4 = New System.Windows.Forms.Label()
|
|
Me.Button1 = New System.Windows.Forms.Button()
|
|
Me.Button2 = New System.Windows.Forms.Button()
|
|
Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()
|
|
Me.Label5 = New System.Windows.Forms.Label()
|
|
Me.Button3 = New System.Windows.Forms.Button()
|
|
Me.Button4 = New System.Windows.Forms.Button()
|
|
Me.Button5 = New System.Windows.Forms.Button()
|
|
Me.Label6 = New System.Windows.Forms.Label()
|
|
Me.Button6 = New System.Windows.Forms.Button()
|
|
Me.Button7 = New System.Windows.Forms.Button()
|
|
Me.cbxNewsletter = New System.Windows.Forms.CheckBox()
|
|
Me.Label7 = New System.Windows.Forms.Label()
|
|
Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
|
Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
|
Me.cboKundenstamm = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
|
Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
|
Me.MyDatagridview1 = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
|
Me.Email = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.EmailCC = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.EmailBCC = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.EmpfängerTitel = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.EmpfängerName = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
|
Me.ListBox1 = New System.Windows.Forms.ListBox()
|
|
Me.Label8 = New System.Windows.Forms.Label()
|
|
CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
Me.SuspendLayout()
|
|
'
|
|
'RichTextBox1
|
|
'
|
|
Me.RichTextBox1.Location = New System.Drawing.Point(13, 178)
|
|
Me.RichTextBox1.Name = "RichTextBox1"
|
|
Me.RichTextBox1.Size = New System.Drawing.Size(873, 439)
|
|
Me.RichTextBox1.TabIndex = 1
|
|
Me.RichTextBox1.Text = ""
|
|
'
|
|
'Label1
|
|
'
|
|
Me.Label1.AutoSize = True
|
|
Me.Label1.Location = New System.Drawing.Point(13, 159)
|
|
Me.Label1.Name = "Label1"
|
|
Me.Label1.Size = New System.Drawing.Size(119, 13)
|
|
Me.Label1.TabIndex = 2
|
|
Me.Label1.Text = "Mail-Text (auch HTML):"
|
|
'
|
|
'Label2
|
|
'
|
|
Me.Label2.AutoSize = True
|
|
Me.Label2.Location = New System.Drawing.Point(13, 102)
|
|
Me.Label2.Name = "Label2"
|
|
Me.Label2.Size = New System.Drawing.Size(41, 13)
|
|
Me.Label2.TabIndex = 3
|
|
Me.Label2.Text = "Betreff:"
|
|
'
|
|
'Label3
|
|
'
|
|
Me.Label3.AutoSize = True
|
|
Me.Label3.Location = New System.Drawing.Point(889, 102)
|
|
Me.Label3.Name = "Label3"
|
|
Me.Label3.Size = New System.Drawing.Size(65, 13)
|
|
Me.Label3.TabIndex = 5
|
|
Me.Label3.Text = "Kontaktliste:"
|
|
'
|
|
'Label4
|
|
'
|
|
Me.Label4.AutoSize = True
|
|
Me.Label4.Location = New System.Drawing.Point(889, 14)
|
|
Me.Label4.Name = "Label4"
|
|
Me.Label4.Size = New System.Drawing.Size(172, 13)
|
|
Me.Label4.TabIndex = 6
|
|
Me.Label4.Text = "Kontakte laden aus Kundenstamm:"
|
|
'
|
|
'Button1
|
|
'
|
|
Me.Button1.Location = New System.Drawing.Point(891, 36)
|
|
Me.Button1.Name = "Button1"
|
|
Me.Button1.Size = New System.Drawing.Size(212, 23)
|
|
Me.Button1.TabIndex = 7
|
|
Me.Button1.Text = "Alle Zoll-Abrechnungs-Kunden"
|
|
Me.Button1.UseVisualStyleBackColor = True
|
|
'
|
|
'Button2
|
|
'
|
|
Me.Button2.Location = New System.Drawing.Point(1341, 90)
|
|
Me.Button2.Name = "Button2"
|
|
Me.Button2.Size = New System.Drawing.Size(88, 23)
|
|
Me.Button2.TabIndex = 10
|
|
Me.Button2.Text = "Alle löschen"
|
|
Me.Button2.UseVisualStyleBackColor = True
|
|
'
|
|
'ProgressBar1
|
|
'
|
|
Me.ProgressBar1.Location = New System.Drawing.Point(892, 685)
|
|
Me.ProgressBar1.Name = "ProgressBar1"
|
|
Me.ProgressBar1.Size = New System.Drawing.Size(537, 23)
|
|
Me.ProgressBar1.TabIndex = 11
|
|
'
|
|
'Label5
|
|
'
|
|
Me.Label5.AutoSize = True
|
|
Me.Label5.Location = New System.Drawing.Point(889, 669)
|
|
Me.Label5.Name = "Label5"
|
|
Me.Label5.Size = New System.Drawing.Size(18, 13)
|
|
Me.Label5.TabIndex = 12
|
|
Me.Label5.Text = "-/-"
|
|
'
|
|
'Button3
|
|
'
|
|
Me.Button3.BackColor = System.Drawing.Color.PapayaWhip
|
|
Me.Button3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
|
Me.Button3.Location = New System.Drawing.Point(1217, 627)
|
|
Me.Button3.Name = "Button3"
|
|
Me.Button3.Size = New System.Drawing.Size(212, 47)
|
|
Me.Button3.TabIndex = 13
|
|
Me.Button3.Text = "Senden"
|
|
Me.Button3.UseVisualStyleBackColor = False
|
|
'
|
|
'Button4
|
|
'
|
|
Me.Button4.Location = New System.Drawing.Point(892, 623)
|
|
Me.Button4.Name = "Button4"
|
|
Me.Button4.Size = New System.Drawing.Size(88, 23)
|
|
Me.Button4.TabIndex = 14
|
|
Me.Button4.Text = "Alle auswählen"
|
|
Me.Button4.UseVisualStyleBackColor = True
|
|
'
|
|
'Button5
|
|
'
|
|
Me.Button5.Location = New System.Drawing.Point(986, 623)
|
|
Me.Button5.Name = "Button5"
|
|
Me.Button5.Size = New System.Drawing.Size(117, 23)
|
|
Me.Button5.TabIndex = 15
|
|
Me.Button5.Text = "Auswahl löschen"
|
|
Me.Button5.UseVisualStyleBackColor = True
|
|
'
|
|
'Label6
|
|
'
|
|
Me.Label6.AutoSize = True
|
|
Me.Label6.Location = New System.Drawing.Point(13, 71)
|
|
Me.Label6.Name = "Label6"
|
|
Me.Label6.Size = New System.Drawing.Size(58, 13)
|
|
Me.Label6.TabIndex = 16
|
|
Me.Label6.Text = "Absender: "
|
|
'
|
|
'Button6
|
|
'
|
|
Me.Button6.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
|
Me.Button6.Location = New System.Drawing.Point(12, 635)
|
|
Me.Button6.Name = "Button6"
|
|
Me.Button6.Size = New System.Drawing.Size(212, 31)
|
|
Me.Button6.TabIndex = 18
|
|
Me.Button6.Text = "Testmail öffnen..."
|
|
Me.Button6.UseVisualStyleBackColor = True
|
|
'
|
|
'Button7
|
|
'
|
|
Me.Button7.AllowDrop = True
|
|
Me.Button7.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
|
|
Me.Button7.Location = New System.Drawing.Point(230, 635)
|
|
Me.Button7.Name = "Button7"
|
|
Me.Button7.Size = New System.Drawing.Size(212, 31)
|
|
Me.Button7.TabIndex = 19
|
|
Me.Button7.Text = "Testmail senden ..."
|
|
Me.Button7.UseVisualStyleBackColor = True
|
|
'
|
|
'cbxNewsletter
|
|
'
|
|
Me.cbxNewsletter.AutoSize = True
|
|
Me.cbxNewsletter.Checked = True
|
|
Me.cbxNewsletter.CheckState = System.Windows.Forms.CheckState.Checked
|
|
Me.cbxNewsletter.Location = New System.Drawing.Point(375, 155)
|
|
Me.cbxNewsletter.Name = "cbxNewsletter"
|
|
Me.cbxNewsletter.Size = New System.Drawing.Size(167, 17)
|
|
Me.cbxNewsletter.TabIndex = 20
|
|
Me.cbxNewsletter.Text = "Newsletter Layout verwenden"
|
|
Me.cbxNewsletter.UseVisualStyleBackColor = True
|
|
'
|
|
'Label7
|
|
'
|
|
Me.Label7.AutoSize = True
|
|
Me.Label7.Location = New System.Drawing.Point(548, 156)
|
|
Me.Label7.Name = "Label7"
|
|
Me.Label7.Size = New System.Drawing.Size(30, 13)
|
|
Me.Label7.TabIndex = 21
|
|
Me.Label7.Text = "Titel:"
|
|
'
|
|
'MyTextBox2
|
|
'
|
|
Me.MyTextBox2._DateTimeOnly = False
|
|
Me.MyTextBox2._numbersOnly = False
|
|
Me.MyTextBox2._numbersOnlyKommastellen = ""
|
|
Me.MyTextBox2._numbersOnlyTrennzeichen = True
|
|
Me.MyTextBox2._Prozent = False
|
|
Me.MyTextBox2._ShortDateNew = False
|
|
Me.MyTextBox2._ShortDateOnly = False
|
|
Me.MyTextBox2._TimeOnly = False
|
|
Me.MyTextBox2._TimeOnly_Seconds = False
|
|
Me.MyTextBox2._value = ""
|
|
Me.MyTextBox2._Waehrung = False
|
|
Me.MyTextBox2._WaehrungZeichen = True
|
|
Me.MyTextBox2.ForeColor = System.Drawing.Color.Black
|
|
Me.MyTextBox2.Location = New System.Drawing.Point(584, 153)
|
|
Me.MyTextBox2.MaxLineLength = -1
|
|
Me.MyTextBox2.MaxLines_Warning = ""
|
|
Me.MyTextBox2.MaxLines_Warning_Label = Nothing
|
|
Me.MyTextBox2.Name = "MyTextBox2"
|
|
Me.MyTextBox2.Size = New System.Drawing.Size(302, 20)
|
|
Me.MyTextBox2.TabIndex = 22
|
|
'
|
|
'MyComboBox1
|
|
'
|
|
Me.MyComboBox1._allowedValuesFreiText = Nothing
|
|
Me.MyComboBox1._allowFreiText = False
|
|
Me.MyComboBox1._value = ""
|
|
Me.MyComboBox1.FormattingEnabled = True
|
|
Me.MyComboBox1.Items.AddRange(New Object() {"cbam@verag.ag", "cbam@imex-group.com", "support@verag.ag"})
|
|
Me.MyComboBox1.Location = New System.Drawing.Point(77, 68)
|
|
Me.MyComboBox1.Name = "MyComboBox1"
|
|
Me.MyComboBox1.Size = New System.Drawing.Size(126, 21)
|
|
Me.MyComboBox1.TabIndex = 17
|
|
'
|
|
'cboKundenstamm
|
|
'
|
|
Me.cboKundenstamm._allowedValuesFreiText = Nothing
|
|
Me.cboKundenstamm._allowFreiText = False
|
|
Me.cboKundenstamm._value = ""
|
|
Me.cboKundenstamm.FormattingEnabled = True
|
|
Me.cboKundenstamm.Location = New System.Drawing.Point(1067, 9)
|
|
Me.cboKundenstamm.Name = "cboKundenstamm"
|
|
Me.cboKundenstamm.Size = New System.Drawing.Size(126, 21)
|
|
Me.cboKundenstamm.TabIndex = 9
|
|
'
|
|
'MyTextBox1
|
|
'
|
|
Me.MyTextBox1._DateTimeOnly = False
|
|
Me.MyTextBox1._numbersOnly = False
|
|
Me.MyTextBox1._numbersOnlyKommastellen = ""
|
|
Me.MyTextBox1._numbersOnlyTrennzeichen = True
|
|
Me.MyTextBox1._Prozent = False
|
|
Me.MyTextBox1._ShortDateNew = False
|
|
Me.MyTextBox1._ShortDateOnly = False
|
|
Me.MyTextBox1._TimeOnly = False
|
|
Me.MyTextBox1._TimeOnly_Seconds = False
|
|
Me.MyTextBox1._value = ""
|
|
Me.MyTextBox1._Waehrung = False
|
|
Me.MyTextBox1._WaehrungZeichen = True
|
|
Me.MyTextBox1.ForeColor = System.Drawing.Color.Black
|
|
Me.MyTextBox1.Location = New System.Drawing.Point(16, 119)
|
|
Me.MyTextBox1.MaxLineLength = -1
|
|
Me.MyTextBox1.MaxLines_Warning = ""
|
|
Me.MyTextBox1.MaxLines_Warning_Label = Nothing
|
|
Me.MyTextBox1.Name = "MyTextBox1"
|
|
Me.MyTextBox1.Size = New System.Drawing.Size(870, 20)
|
|
Me.MyTextBox1.TabIndex = 4
|
|
'
|
|
'MyDatagridview1
|
|
'
|
|
Me.MyDatagridview1.AKTUALISIERUNGS_INTERVALL = -1
|
|
Me.MyDatagridview1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
|
Me.MyDatagridview1.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Email, Me.EmailCC, Me.EmailBCC, Me.EmpfängerTitel, Me.EmpfängerName})
|
|
Me.MyDatagridview1.Location = New System.Drawing.Point(892, 119)
|
|
Me.MyDatagridview1.Name = "MyDatagridview1"
|
|
Me.MyDatagridview1.Size = New System.Drawing.Size(537, 498)
|
|
Me.MyDatagridview1.TabIndex = 0
|
|
'
|
|
'Email
|
|
'
|
|
Me.Email.HeaderText = "Email"
|
|
Me.Email.Name = "Email"
|
|
'
|
|
'EmailCC
|
|
'
|
|
Me.EmailCC.HeaderText = "EmailCC"
|
|
Me.EmailCC.Name = "EmailCC"
|
|
'
|
|
'EmailBCC
|
|
'
|
|
Me.EmailBCC.HeaderText = "EmailBCC"
|
|
Me.EmailBCC.Name = "EmailBCC"
|
|
'
|
|
'EmpfängerTitel
|
|
'
|
|
Me.EmpfängerTitel.HeaderText = "EmpfängerTitel"
|
|
Me.EmpfängerTitel.Name = "EmpfängerTitel"
|
|
'
|
|
'EmpfängerName
|
|
'
|
|
Me.EmpfängerName.HeaderText = "EmpfängerName"
|
|
Me.EmpfängerName.Name = "EmpfängerName"
|
|
'
|
|
'ListBox1
|
|
'
|
|
Me.ListBox1.AllowDrop = True
|
|
Me.ListBox1.FormattingEnabled = True
|
|
Me.ListBox1.Location = New System.Drawing.Point(448, 635)
|
|
Me.ListBox1.Name = "ListBox1"
|
|
Me.ListBox1.ScrollAlwaysVisible = True
|
|
Me.ListBox1.SelectionMode = System.Windows.Forms.SelectionMode.MultiExtended
|
|
Me.ListBox1.Size = New System.Drawing.Size(417, 82)
|
|
Me.ListBox1.TabIndex = 23
|
|
'
|
|
'Label8
|
|
'
|
|
Me.Label8.AutoSize = True
|
|
Me.Label8.Location = New System.Drawing.Point(445, 620)
|
|
Me.Label8.Name = "Label8"
|
|
Me.Label8.Size = New System.Drawing.Size(53, 13)
|
|
Me.Label8.TabIndex = 24
|
|
Me.Label8.Text = "Anhänge:"
|
|
'
|
|
'frmNewsletter
|
|
'
|
|
Me.AllowDrop = True
|
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
|
Me.BackColor = System.Drawing.Color.White
|
|
Me.ClientSize = New System.Drawing.Size(1441, 720)
|
|
Me.Controls.Add(Me.Label8)
|
|
Me.Controls.Add(Me.ListBox1)
|
|
Me.Controls.Add(Me.MyTextBox2)
|
|
Me.Controls.Add(Me.Label7)
|
|
Me.Controls.Add(Me.cbxNewsletter)
|
|
Me.Controls.Add(Me.Button7)
|
|
Me.Controls.Add(Me.Button6)
|
|
Me.Controls.Add(Me.MyComboBox1)
|
|
Me.Controls.Add(Me.Label6)
|
|
Me.Controls.Add(Me.Button5)
|
|
Me.Controls.Add(Me.Button4)
|
|
Me.Controls.Add(Me.Button3)
|
|
Me.Controls.Add(Me.Label5)
|
|
Me.Controls.Add(Me.ProgressBar1)
|
|
Me.Controls.Add(Me.Button2)
|
|
Me.Controls.Add(Me.cboKundenstamm)
|
|
Me.Controls.Add(Me.Button1)
|
|
Me.Controls.Add(Me.Label4)
|
|
Me.Controls.Add(Me.Label3)
|
|
Me.Controls.Add(Me.MyTextBox1)
|
|
Me.Controls.Add(Me.Label2)
|
|
Me.Controls.Add(Me.Label1)
|
|
Me.Controls.Add(Me.RichTextBox1)
|
|
Me.Controls.Add(Me.MyDatagridview1)
|
|
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
|
Me.Name = "frmNewsletter"
|
|
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
|
Me.Text = "Newsletter"
|
|
CType(Me.MyDatagridview1, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.ResumeLayout(False)
|
|
Me.PerformLayout()
|
|
|
|
End Sub
|
|
|
|
Friend WithEvents MyDatagridview1 As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
|
Friend WithEvents RichTextBox1 As RichTextBox
|
|
Friend WithEvents Label1 As Label
|
|
Friend WithEvents Label2 As Label
|
|
Friend WithEvents MyTextBox1 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
|
Friend WithEvents Label3 As Label
|
|
Friend WithEvents Label4 As Label
|
|
Friend WithEvents Button1 As Button
|
|
Friend WithEvents cboKundenstamm As VERAG_PROG_ALLGEMEIN.MyComboBox
|
|
Friend WithEvents Button2 As Button
|
|
Friend WithEvents ProgressBar1 As ProgressBar
|
|
Friend WithEvents Label5 As Label
|
|
Friend WithEvents Button3 As Button
|
|
Friend WithEvents Button4 As Button
|
|
Friend WithEvents Button5 As Button
|
|
Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox
|
|
Friend WithEvents Label6 As Label
|
|
Friend WithEvents Button6 As Button
|
|
Friend WithEvents Button7 As Button
|
|
Friend WithEvents cbxNewsletter As CheckBox
|
|
Friend WithEvents Label7 As Label
|
|
Friend WithEvents MyTextBox2 As VERAG_PROG_ALLGEMEIN.MyTextBox
|
|
Friend WithEvents Email As DataGridViewTextBoxColumn
|
|
Friend WithEvents EmailCC As DataGridViewTextBoxColumn
|
|
Friend WithEvents EmailBCC As DataGridViewTextBoxColumn
|
|
Friend WithEvents EmpfängerTitel As DataGridViewTextBoxColumn
|
|
Friend WithEvents EmpfängerName As DataGridViewTextBoxColumn
|
|
Friend WithEvents ListBox1 As ListBox
|
|
Friend WithEvents Label8 As Label
|
|
End Class
|