Merge branch 'master' of https://verag.visualstudio.com/AVISO/_git/AVISO
This commit is contained in:
589
Aviso/frmHauptfenster.Designer.vb
generated
589
Aviso/frmHauptfenster.Designer.vb
generated
@@ -24,15 +24,15 @@ Partial Class frmHauptfenster
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmHauptfenster))
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
|
||||
Me.mnuInfo = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.conÜbernehmen = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.conMenuAviso = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
@@ -141,6 +141,7 @@ Partial Class frmHauptfenster
|
||||
Me.WarenorteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DatevBuchungsexportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.APIToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FIBUSachkontenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.StatistikToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.LKWBerichtToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.StatistikADMINToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
@@ -238,6 +239,7 @@ Partial Class frmHauptfenster
|
||||
Me.lblFimaAviso = New System.Windows.Forms.Label()
|
||||
Me.Button11 = New System.Windows.Forms.Button()
|
||||
Me.btnMAVerzeichnis = New System.Windows.Forms.Button()
|
||||
Me.btnMitarbeiterKonto = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.Button9 = New System.Windows.Forms.Button()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
@@ -285,16 +287,20 @@ Partial Class frmHauptfenster
|
||||
Me.cntxtAtilla = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ToolStripMenuItem17 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.SplitContainer3 = New System.Windows.Forms.SplitContainer()
|
||||
Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.Panel6 = New System.Windows.Forms.Panel()
|
||||
Me.cbx_My_Brexit = New System.Windows.Forms.CheckBox()
|
||||
Me.btnColor = New System.Windows.Forms.Button()
|
||||
Me.lblMeineAviso = New System.Windows.Forms.Label()
|
||||
Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.lblMySnd_Grenzstelle = New System.Windows.Forms.Label()
|
||||
Me.cbx_My_LKW = New System.Windows.Forms.CheckBox()
|
||||
Me.cboMy_QS = New System.Windows.Forms.CheckBox()
|
||||
Me.cboMy_VB = New System.Windows.Forms.CheckBox()
|
||||
Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.lblMySND_Anzeige = New System.Windows.Forms.Label()
|
||||
Me.lblAkte = New System.Windows.Forms.Label()
|
||||
Me.btnClose = New System.Windows.Forms.Button()
|
||||
@@ -315,16 +321,22 @@ Partial Class frmHauptfenster
|
||||
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
|
||||
Me.pnlDetailsLinks = New System.Windows.Forms.Panel()
|
||||
Me.splitMain = New System.Windows.Forms.SplitContainer()
|
||||
Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.txtBestimmungszollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.cboImEx = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label21 = New System.Windows.Forms.Label()
|
||||
Me.cbxCluster = New System.Windows.Forms.CheckBox()
|
||||
Me.cboTeams = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.lblErweitereSuche = New System.Windows.Forms.LinkLabel()
|
||||
Me.Label16 = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.lblEintraege = New System.Windows.Forms.Label()
|
||||
Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.pnlTime = New System.Windows.Forms.Panel()
|
||||
Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.pnlSearch = New System.Windows.Forms.Panel()
|
||||
Me.lblAbsender = New System.Windows.Forms.Label()
|
||||
Me.txtAbsender = New System.Windows.Forms.TextBox()
|
||||
@@ -345,6 +357,7 @@ Partial Class frmHauptfenster
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.lblErwEmpfänger = New System.Windows.Forms.Label()
|
||||
Me.txtEmpfänger = New System.Windows.Forms.TextBox()
|
||||
Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.txtAbfertigungsnummer = New System.Windows.Forms.TextBox()
|
||||
Me.lblErwFilialePos = New System.Windows.Forms.Label()
|
||||
Me.lblErwAuftraggeber = New System.Windows.Forms.Label()
|
||||
@@ -381,20 +394,9 @@ Partial Class frmHauptfenster
|
||||
Me.cntVerag = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.ZertifikateToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.HomepageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FIBUSachkontenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem()
|
||||
Me.gridAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.txtBestimmungszollstelle = New VERAG_PROG_ALLGEMEIN.MySearchBox()
|
||||
Me.cboImEx = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.cboTeams = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen()
|
||||
Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.cboMy_Grenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.cboMyAvisoAnzeige = New VERAG_PROG_ALLGEMEIN.MyComboBox()
|
||||
Me.btnMitarbeiterKonto = New VERAG_PROG_ALLGEMEIN.FlatButton()
|
||||
Me.EMAILToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.FTPToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.conMenuAviso.SuspendLayout()
|
||||
Me.MenuStrip1.SuspendLayout()
|
||||
Me.pnlDetailsRechts.SuspendLayout()
|
||||
@@ -414,6 +416,7 @@ Partial Class frmHauptfenster
|
||||
Me.SplitContainer3.Panel2.SuspendLayout()
|
||||
Me.SplitContainer3.SuspendLayout()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel6.SuspendLayout()
|
||||
Me.tbcntrAviso.SuspendLayout()
|
||||
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@@ -425,6 +428,7 @@ Partial Class frmHauptfenster
|
||||
Me.splitMain.Panel1.SuspendLayout()
|
||||
Me.splitMain.Panel2.SuspendLayout()
|
||||
Me.splitMain.SuspendLayout()
|
||||
CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.Panel1.SuspendLayout()
|
||||
Me.pnlTime.SuspendLayout()
|
||||
Me.pnlSearch.SuspendLayout()
|
||||
@@ -434,8 +438,6 @@ Partial Class frmHauptfenster
|
||||
Me.Panel3.SuspendLayout()
|
||||
Me.Panel4.SuspendLayout()
|
||||
Me.cntVerag.SuspendLayout()
|
||||
CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'mnuInfo
|
||||
@@ -1106,6 +1108,7 @@ Partial Class frmHauptfenster
|
||||
'
|
||||
'DatevBuchungsexportToolStripMenuItem
|
||||
'
|
||||
Me.DatevBuchungsexportToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EMAILToolStripMenuItem, Me.FTPToolStripMenuItem})
|
||||
Me.DatevBuchungsexportToolStripMenuItem.Name = "DatevBuchungsexportToolStripMenuItem"
|
||||
Me.DatevBuchungsexportToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
|
||||
Me.DatevBuchungsexportToolStripMenuItem.Text = "Datev Buchungsexport"
|
||||
@@ -1117,6 +1120,12 @@ Partial Class frmHauptfenster
|
||||
Me.APIToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
|
||||
Me.APIToolStripMenuItem.Text = "API"
|
||||
'
|
||||
'FIBUSachkontenToolStripMenuItem
|
||||
'
|
||||
Me.FIBUSachkontenToolStripMenuItem.Name = "FIBUSachkontenToolStripMenuItem"
|
||||
Me.FIBUSachkontenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
|
||||
Me.FIBUSachkontenToolStripMenuItem.Text = "FIBU Sachkonten"
|
||||
'
|
||||
'StatistikToolStripMenuItem
|
||||
'
|
||||
Me.StatistikToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LKWBerichtToolStripMenuItem, Me.StatistikADMINToolStripMenuItem, Me.ToolStripSeparator8, Me.BürgschafrtsbuchungenFremdToolStripMenuItem, Me.LKWEingetroffenNachToolStripMenuItem, Me.ToolStripSeparator7, Me.SDLAuswertungenToolStripMenuItem, Me.SDLAuswertungenToolStripMenuItem1})
|
||||
@@ -1815,6 +1824,24 @@ Partial Class frmHauptfenster
|
||||
Me.btnMAVerzeichnis.UseVisualStyleBackColor = True
|
||||
Me.btnMAVerzeichnis.Visible = False
|
||||
'
|
||||
'btnMitarbeiterKonto
|
||||
'
|
||||
Me.btnMitarbeiterKonto.allowBorder = False
|
||||
Me.btnMitarbeiterKonto.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnMitarbeiterKonto.BackColor = System.Drawing.Color.White
|
||||
Me.btnMitarbeiterKonto.FlatAppearance.BorderSize = 0
|
||||
Me.btnMitarbeiterKonto.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnMitarbeiterKonto.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnMitarbeiterKonto.Image = Global.AVISO.My.Resources.Resources.mitarbeiter_s
|
||||
Me.btnMitarbeiterKonto.ImageAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.btnMitarbeiterKonto.Location = New System.Drawing.Point(1109, -6)
|
||||
Me.btnMitarbeiterKonto.Name = "btnMitarbeiterKonto"
|
||||
Me.btnMitarbeiterKonto.Size = New System.Drawing.Size(137, 61)
|
||||
Me.btnMitarbeiterKonto.TabIndex = 86
|
||||
Me.btnMitarbeiterKonto.Text = "Andreas Luxbauer"
|
||||
Me.btnMitarbeiterKonto.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
Me.btnMitarbeiterKonto.UseVisualStyleBackColor = False
|
||||
'
|
||||
'Button9
|
||||
'
|
||||
Me.Button9.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -2440,6 +2467,15 @@ Partial Class frmHauptfenster
|
||||
Me.SplitContainer3.SplitterDistance = 158
|
||||
Me.SplitContainer3.TabIndex = 3
|
||||
'
|
||||
'UsrCntlBenachrichtigungen1
|
||||
'
|
||||
Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrCntlBenachrichtigungen1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1"
|
||||
Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(158, 300)
|
||||
Me.UsrCntlBenachrichtigungen1.TabIndex = 0
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.Controls.Add(Me.Button10)
|
||||
@@ -2465,6 +2501,50 @@ Partial Class frmHauptfenster
|
||||
Me.Button10.Text = "<"
|
||||
Me.Button10.UseVisualStyleBackColor = False
|
||||
'
|
||||
'gridMyAviso
|
||||
'
|
||||
Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.gridMyAviso.AllowUserToAddRows = False
|
||||
Me.gridMyAviso.AllowUserToDeleteRows = False
|
||||
Me.gridMyAviso.AllowUserToOrderColumns = True
|
||||
Me.gridMyAviso.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
|
||||
Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
|
||||
Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
|
||||
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
|
||||
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridMyAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
|
||||
Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridMyAviso.DefaultCellStyle = DataGridViewCellStyle3
|
||||
Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridMyAviso.Location = New System.Drawing.Point(0, 21)
|
||||
Me.gridMyAviso.Name = "gridMyAviso"
|
||||
Me.gridMyAviso.ReadOnly = True
|
||||
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridMyAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
|
||||
Me.gridMyAviso.RowHeadersVisible = False
|
||||
Me.gridMyAviso.RowHeadersWidth = 62
|
||||
Me.gridMyAviso.Size = New System.Drawing.Size(488, 279)
|
||||
Me.gridMyAviso.TabIndex = 0
|
||||
'
|
||||
'Panel6
|
||||
'
|
||||
Me.Panel6.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
@@ -2520,6 +2600,23 @@ Partial Class frmHauptfenster
|
||||
Me.lblMeineAviso.TabIndex = 0
|
||||
Me.lblMeineAviso.Text = "Meine Sendungen:"
|
||||
'
|
||||
'cboMy_Grenzstelle
|
||||
'
|
||||
Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
|
||||
Me.cboMy_Grenzstelle._allowFreiText = False
|
||||
Me.cboMy_Grenzstelle._value = ""
|
||||
Me.cboMy_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMy_Grenzstelle.DropDownWidth = 120
|
||||
Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.cboMy_Grenzstelle.FormattingEnabled = True
|
||||
Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(113, 1)
|
||||
Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
|
||||
Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
|
||||
Me.cboMy_Grenzstelle.TabIndex = 26
|
||||
'
|
||||
'lblMySnd_Grenzstelle
|
||||
'
|
||||
Me.lblMySnd_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -2571,6 +2668,22 @@ Partial Class frmHauptfenster
|
||||
Me.cboMy_VB.ThreeState = True
|
||||
Me.cboMy_VB.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cboMyAvisoAnzeige
|
||||
'
|
||||
Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing
|
||||
Me.cboMyAvisoAnzeige._allowFreiText = False
|
||||
Me.cboMyAvisoAnzeige._value = ""
|
||||
Me.cboMyAvisoAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.cboMyAvisoAnzeige.FormattingEnabled = True
|
||||
Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(232, 1)
|
||||
Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
|
||||
Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21)
|
||||
Me.cboMyAvisoAnzeige.TabIndex = 21
|
||||
'
|
||||
'lblMySND_Anzeige
|
||||
'
|
||||
Me.lblMySND_Anzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
@@ -2833,6 +2946,60 @@ Partial Class frmHauptfenster
|
||||
Me.splitMain.SplitterDistance = 287
|
||||
Me.splitMain.TabIndex = 0
|
||||
'
|
||||
'gridAviso
|
||||
'
|
||||
Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.gridAviso.AllowUserToAddRows = False
|
||||
Me.gridAviso.AllowUserToDeleteRows = False
|
||||
Me.gridAviso.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle5.BackColor = System.Drawing.Color.Azure
|
||||
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
|
||||
Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
|
||||
Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
|
||||
DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle6.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle6.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle6
|
||||
Me.gridAviso.ColumnHeadersHeight = 25
|
||||
Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
|
||||
DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle7
|
||||
Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridAviso.Location = New System.Drawing.Point(0, 248)
|
||||
Me.gridAviso.MultiSelect = False
|
||||
Me.gridAviso.Name = "gridAviso"
|
||||
Me.gridAviso.ReadOnly = True
|
||||
DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle8
|
||||
Me.gridAviso.RowHeadersVisible = False
|
||||
Me.gridAviso.RowHeadersWidth = 62
|
||||
Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle9
|
||||
Me.gridAviso.RowTemplate.ReadOnly = True
|
||||
Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.gridAviso.Size = New System.Drawing.Size(815, 39)
|
||||
Me.gridAviso.TabIndex = 1
|
||||
Me.gridAviso.TabStop = False
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
@@ -2866,6 +3033,32 @@ Partial Class frmHauptfenster
|
||||
Me.Panel1.Size = New System.Drawing.Size(815, 248)
|
||||
Me.Panel1.TabIndex = 2
|
||||
'
|
||||
'txtBestimmungszollstelle
|
||||
'
|
||||
Me.txtBestimmungszollstelle._allowFreitext = False
|
||||
Me.txtBestimmungszollstelle._AllowSetValue = False
|
||||
Me.txtBestimmungszollstelle._allowSpaceAsSplitter = False
|
||||
Me.txtBestimmungszollstelle._autoSizeGross = False
|
||||
Me.txtBestimmungszollstelle._hideIfListEmpty = True
|
||||
Me.txtBestimmungszollstelle._value = Nothing
|
||||
Me.txtBestimmungszollstelle.conn_art = "FMZOLL"
|
||||
Me.txtBestimmungszollstelle.dgvpos = "LEFT"
|
||||
Me.txtBestimmungszollstelle.DISPLAY_PARAM = Nothing
|
||||
Me.txtBestimmungszollstelle.INVISIBLE_COLUMNS = Nothing
|
||||
Me.txtBestimmungszollstelle.key_visible = False
|
||||
Me.txtBestimmungszollstelle.KEYPARAM = Nothing
|
||||
Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(379, 55)
|
||||
Me.txtBestimmungszollstelle.MaxLength = 50
|
||||
Me.txtBestimmungszollstelle.Name = "txtBestimmungszollstelle"
|
||||
Me.txtBestimmungszollstelle.searchActive = True
|
||||
Me.txtBestimmungszollstelle.Size = New System.Drawing.Size(211, 20)
|
||||
Me.txtBestimmungszollstelle.SQL_ORDER_BY = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_SELECT = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_WHERE = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_WhereParamList = Nothing
|
||||
Me.txtBestimmungszollstelle.TabIndex = 25
|
||||
Me.txtBestimmungszollstelle.usrcntl = Nothing
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
@@ -2876,6 +3069,22 @@ Partial Class frmHauptfenster
|
||||
Me.Label10.TabIndex = 26
|
||||
Me.Label10.Text = "Zollamt:"
|
||||
'
|
||||
'cboImEx
|
||||
'
|
||||
Me.cboImEx._allowedValuesFreiText = Nothing
|
||||
Me.cboImEx._allowFreiText = False
|
||||
Me.cboImEx._value = ""
|
||||
Me.cboImEx.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboImEx.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboImEx.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboImEx.FormattingEnabled = True
|
||||
Me.cboImEx.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"})
|
||||
Me.cboImEx.Location = New System.Drawing.Point(828, 3)
|
||||
Me.cboImEx.Name = "cboImEx"
|
||||
Me.cboImEx.Size = New System.Drawing.Size(78, 24)
|
||||
Me.cboImEx.TabIndex = 24
|
||||
'
|
||||
'Label21
|
||||
'
|
||||
Me.Label21.AutoSize = True
|
||||
@@ -2899,6 +3108,22 @@ Partial Class frmHauptfenster
|
||||
Me.cbxCluster.Text = "Firmenverbund"
|
||||
Me.cbxCluster.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cboTeams
|
||||
'
|
||||
Me.cboTeams._allowedValuesFreiText = Nothing
|
||||
Me.cboTeams._allowFreiText = False
|
||||
Me.cboTeams._value = ""
|
||||
Me.cboTeams.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboTeams.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboTeams.DropDownWidth = 200
|
||||
Me.cboTeams.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboTeams.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboTeams.FormattingEnabled = True
|
||||
Me.cboTeams.Location = New System.Drawing.Point(379, 3)
|
||||
Me.cboTeams.Name = "cboTeams"
|
||||
Me.cboTeams.Size = New System.Drawing.Size(107, 24)
|
||||
Me.cboTeams.TabIndex = 19
|
||||
'
|
||||
'lblErweitereSuche
|
||||
'
|
||||
Me.lblErweitereSuche.AutoSize = True
|
||||
@@ -2944,6 +3169,23 @@ Partial Class frmHauptfenster
|
||||
Me.lblEintraege.Text = "0 Einträge"
|
||||
Me.lblEintraege.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'cboGrenzstelle
|
||||
'
|
||||
Me.cboGrenzstelle._allowedValuesFreiText = Nothing
|
||||
Me.cboGrenzstelle._allowFreiText = False
|
||||
Me.cboGrenzstelle._value = ""
|
||||
Me.cboGrenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboGrenzstelle.DropDownWidth = 200
|
||||
Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboGrenzstelle.FormattingEnabled = True
|
||||
Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU", "AMB", "???"})
|
||||
Me.cboGrenzstelle.Location = New System.Drawing.Point(379, 30)
|
||||
Me.cboGrenzstelle.Name = "cboGrenzstelle"
|
||||
Me.cboGrenzstelle.Size = New System.Drawing.Size(107, 24)
|
||||
Me.cboGrenzstelle.TabIndex = 13
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
@@ -2971,6 +3213,22 @@ Partial Class frmHauptfenster
|
||||
Me.pnlTime.Size = New System.Drawing.Size(437, 57)
|
||||
Me.pnlTime.TabIndex = 12
|
||||
'
|
||||
'MyComboBox1
|
||||
'
|
||||
Me.MyComboBox1._allowedValuesFreiText = Nothing
|
||||
Me.MyComboBox1._allowFreiText = False
|
||||
Me.MyComboBox1._value = ""
|
||||
Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.MyComboBox1.ForeColor = System.Drawing.Color.White
|
||||
Me.MyComboBox1.FormattingEnabled = True
|
||||
Me.MyComboBox1.Location = New System.Drawing.Point(46, 1)
|
||||
Me.MyComboBox1.MaxLength = 4
|
||||
Me.MyComboBox1.Name = "MyComboBox1"
|
||||
Me.MyComboBox1.Size = New System.Drawing.Size(98, 21)
|
||||
Me.MyComboBox1.TabIndex = 7
|
||||
'
|
||||
'pnlSearch
|
||||
'
|
||||
Me.pnlSearch.Controls.Add(Me.lblAbsender)
|
||||
@@ -3199,6 +3457,20 @@ Partial Class frmHauptfenster
|
||||
Me.txtEmpfänger.Size = New System.Drawing.Size(236, 23)
|
||||
Me.txtEmpfänger.TabIndex = 3
|
||||
'
|
||||
'cboFiliale
|
||||
'
|
||||
Me.cboFiliale._allowedValuesFreiText = Nothing
|
||||
Me.cboFiliale._allowFreiText = False
|
||||
Me.cboFiliale._value = ""
|
||||
Me.cboFiliale.DropDownWidth = 300
|
||||
Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboFiliale.FormattingEnabled = True
|
||||
Me.cboFiliale.Location = New System.Drawing.Point(389, 13)
|
||||
Me.cboFiliale.MaxLength = 4
|
||||
Me.cboFiliale.Name = "cboFiliale"
|
||||
Me.cboFiliale.Size = New System.Drawing.Size(70, 24)
|
||||
Me.cboFiliale.TabIndex = 3
|
||||
'
|
||||
'txtAbfertigungsnummer
|
||||
'
|
||||
Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
@@ -3483,12 +3755,6 @@ Partial Class frmHauptfenster
|
||||
Me.HomepageToolStripMenuItem.Size = New System.Drawing.Size(133, 22)
|
||||
Me.HomepageToolStripMenuItem.Text = "Homepage"
|
||||
'
|
||||
'FIBUSachkontenToolStripMenuItem
|
||||
'
|
||||
Me.FIBUSachkontenToolStripMenuItem.Name = "FIBUSachkontenToolStripMenuItem"
|
||||
Me.FIBUSachkontenToolStripMenuItem.Size = New System.Drawing.Size(391, 30)
|
||||
Me.FIBUSachkontenToolStripMenuItem.Text = "FIBU Sachkonten"
|
||||
'
|
||||
'UsrCntlTestsystem1
|
||||
'
|
||||
Me.UsrCntlTestsystem1.BackColor = System.Drawing.Color.White
|
||||
@@ -3500,268 +3766,17 @@ Partial Class frmHauptfenster
|
||||
Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28)
|
||||
Me.UsrCntlTestsystem1.TabIndex = 8
|
||||
'
|
||||
'gridAviso
|
||||
'EMAILToolStripMenuItem
|
||||
'
|
||||
Me.gridAviso.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.gridAviso.AllowUserToAddRows = False
|
||||
Me.gridAviso.AllowUserToDeleteRows = False
|
||||
Me.gridAviso.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle5.BackColor = System.Drawing.Color.Azure
|
||||
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle5
|
||||
Me.gridAviso.BackgroundColor = System.Drawing.Color.DarkGray
|
||||
Me.gridAviso.ClipboardCopyMode = System.Windows.Forms.DataGridViewClipboardCopyMode.Disable
|
||||
DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle6.BackColor = System.Drawing.Color.LightBlue
|
||||
DataGridViewCellStyle6.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle6
|
||||
Me.gridAviso.ColumnHeadersHeight = 25
|
||||
Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing
|
||||
DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.DefaultCellStyle = DataGridViewCellStyle7
|
||||
Me.gridAviso.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridAviso.Location = New System.Drawing.Point(0, 248)
|
||||
Me.gridAviso.MultiSelect = False
|
||||
Me.gridAviso.Name = "gridAviso"
|
||||
Me.gridAviso.ReadOnly = True
|
||||
DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle8
|
||||
Me.gridAviso.RowHeadersVisible = False
|
||||
Me.gridAviso.RowHeadersWidth = 62
|
||||
Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing
|
||||
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle9
|
||||
Me.gridAviso.RowTemplate.ReadOnly = True
|
||||
Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
|
||||
Me.gridAviso.Size = New System.Drawing.Size(815, 39)
|
||||
Me.gridAviso.TabIndex = 1
|
||||
Me.gridAviso.TabStop = False
|
||||
Me.EMAILToolStripMenuItem.Name = "EMAILToolStripMenuItem"
|
||||
Me.EMAILToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.EMAILToolStripMenuItem.Text = "E-MAIL"
|
||||
'
|
||||
'txtBestimmungszollstelle
|
||||
'FTPToolStripMenuItem
|
||||
'
|
||||
Me.txtBestimmungszollstelle._allowFreitext = False
|
||||
Me.txtBestimmungszollstelle._AllowSetValue = False
|
||||
Me.txtBestimmungszollstelle._allowSpaceAsSplitter = False
|
||||
Me.txtBestimmungszollstelle._autoSizeGross = False
|
||||
Me.txtBestimmungszollstelle._hideIfListEmpty = True
|
||||
Me.txtBestimmungszollstelle._value = Nothing
|
||||
Me.txtBestimmungszollstelle.conn_art = "FMZOLL"
|
||||
Me.txtBestimmungszollstelle.dgvpos = "LEFT"
|
||||
Me.txtBestimmungszollstelle.DISPLAY_PARAM = Nothing
|
||||
Me.txtBestimmungszollstelle.INVISIBLE_COLUMNS = Nothing
|
||||
Me.txtBestimmungszollstelle.key_visible = False
|
||||
Me.txtBestimmungszollstelle.KEYPARAM = Nothing
|
||||
Me.txtBestimmungszollstelle.Location = New System.Drawing.Point(379, 55)
|
||||
Me.txtBestimmungszollstelle.MaxLength = 50
|
||||
Me.txtBestimmungszollstelle.Name = "txtBestimmungszollstelle"
|
||||
Me.txtBestimmungszollstelle.searchActive = True
|
||||
Me.txtBestimmungszollstelle.Size = New System.Drawing.Size(211, 20)
|
||||
Me.txtBestimmungszollstelle.SQL_ORDER_BY = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_SELECT = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_WHERE = Nothing
|
||||
Me.txtBestimmungszollstelle.SQL_WhereParamList = Nothing
|
||||
Me.txtBestimmungszollstelle.TabIndex = 25
|
||||
Me.txtBestimmungszollstelle.usrcntl = Nothing
|
||||
'
|
||||
'cboImEx
|
||||
'
|
||||
Me.cboImEx._allowedValuesFreiText = Nothing
|
||||
Me.cboImEx._allowFreiText = False
|
||||
Me.cboImEx._value = ""
|
||||
Me.cboImEx.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboImEx.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboImEx.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboImEx.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboImEx.FormattingEnabled = True
|
||||
Me.cboImEx.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD"})
|
||||
Me.cboImEx.Location = New System.Drawing.Point(828, 3)
|
||||
Me.cboImEx.Name = "cboImEx"
|
||||
Me.cboImEx.Size = New System.Drawing.Size(78, 24)
|
||||
Me.cboImEx.TabIndex = 24
|
||||
'
|
||||
'cboTeams
|
||||
'
|
||||
Me.cboTeams._allowedValuesFreiText = Nothing
|
||||
Me.cboTeams._allowFreiText = False
|
||||
Me.cboTeams._value = ""
|
||||
Me.cboTeams.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboTeams.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboTeams.DropDownWidth = 200
|
||||
Me.cboTeams.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboTeams.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboTeams.FormattingEnabled = True
|
||||
Me.cboTeams.Location = New System.Drawing.Point(379, 3)
|
||||
Me.cboTeams.Name = "cboTeams"
|
||||
Me.cboTeams.Size = New System.Drawing.Size(107, 24)
|
||||
Me.cboTeams.TabIndex = 19
|
||||
'
|
||||
'cboGrenzstelle
|
||||
'
|
||||
Me.cboGrenzstelle._allowedValuesFreiText = Nothing
|
||||
Me.cboGrenzstelle._allowFreiText = False
|
||||
Me.cboGrenzstelle._value = ""
|
||||
Me.cboGrenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboGrenzstelle.DropDownWidth = 200
|
||||
Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboGrenzstelle.FormattingEnabled = True
|
||||
Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU", "AMB", "???"})
|
||||
Me.cboGrenzstelle.Location = New System.Drawing.Point(379, 30)
|
||||
Me.cboGrenzstelle.Name = "cboGrenzstelle"
|
||||
Me.cboGrenzstelle.Size = New System.Drawing.Size(107, 24)
|
||||
Me.cboGrenzstelle.TabIndex = 13
|
||||
'
|
||||
'MyComboBox1
|
||||
'
|
||||
Me.MyComboBox1._allowedValuesFreiText = Nothing
|
||||
Me.MyComboBox1._allowFreiText = False
|
||||
Me.MyComboBox1._value = ""
|
||||
Me.MyComboBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.MyComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.MyComboBox1.ForeColor = System.Drawing.Color.White
|
||||
Me.MyComboBox1.FormattingEnabled = True
|
||||
Me.MyComboBox1.Location = New System.Drawing.Point(46, 1)
|
||||
Me.MyComboBox1.MaxLength = 4
|
||||
Me.MyComboBox1.Name = "MyComboBox1"
|
||||
Me.MyComboBox1.Size = New System.Drawing.Size(98, 21)
|
||||
Me.MyComboBox1.TabIndex = 7
|
||||
'
|
||||
'cboFiliale
|
||||
'
|
||||
Me.cboFiliale._allowedValuesFreiText = Nothing
|
||||
Me.cboFiliale._allowFreiText = False
|
||||
Me.cboFiliale._value = ""
|
||||
Me.cboFiliale.DropDownWidth = 300
|
||||
Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cboFiliale.FormattingEnabled = True
|
||||
Me.cboFiliale.Location = New System.Drawing.Point(389, 13)
|
||||
Me.cboFiliale.MaxLength = 4
|
||||
Me.cboFiliale.Name = "cboFiliale"
|
||||
Me.cboFiliale.Size = New System.Drawing.Size(70, 24)
|
||||
Me.cboFiliale.TabIndex = 3
|
||||
'
|
||||
'UsrCntlBenachrichtigungen1
|
||||
'
|
||||
Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.UsrCntlBenachrichtigungen1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1"
|
||||
Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(158, 300)
|
||||
Me.UsrCntlBenachrichtigungen1.TabIndex = 0
|
||||
'
|
||||
'gridMyAviso
|
||||
'
|
||||
Me.gridMyAviso.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.gridMyAviso.AllowUserToAddRows = False
|
||||
Me.gridMyAviso.AllowUserToDeleteRows = False
|
||||
Me.gridMyAviso.AllowUserToOrderColumns = True
|
||||
Me.gridMyAviso.AllowUserToResizeRows = False
|
||||
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Azure
|
||||
Me.gridMyAviso.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
|
||||
Me.gridMyAviso.BackgroundColor = System.Drawing.Color.White
|
||||
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
|
||||
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridMyAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2
|
||||
Me.gridMyAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window
|
||||
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.ControlText
|
||||
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
|
||||
Me.gridMyAviso.DefaultCellStyle = DataGridViewCellStyle3
|
||||
Me.gridMyAviso.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.gridMyAviso.Location = New System.Drawing.Point(0, 21)
|
||||
Me.gridMyAviso.Name = "gridMyAviso"
|
||||
Me.gridMyAviso.ReadOnly = True
|
||||
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
|
||||
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
|
||||
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 5.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
|
||||
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
|
||||
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
|
||||
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
|
||||
Me.gridMyAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle4
|
||||
Me.gridMyAviso.RowHeadersVisible = False
|
||||
Me.gridMyAviso.RowHeadersWidth = 62
|
||||
Me.gridMyAviso.Size = New System.Drawing.Size(488, 279)
|
||||
Me.gridMyAviso.TabIndex = 0
|
||||
'
|
||||
'cboMy_Grenzstelle
|
||||
'
|
||||
Me.cboMy_Grenzstelle._allowedValuesFreiText = Nothing
|
||||
Me.cboMy_Grenzstelle._allowFreiText = False
|
||||
Me.cboMy_Grenzstelle._value = ""
|
||||
Me.cboMy_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMy_Grenzstelle.DropDownWidth = 120
|
||||
Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.cboMy_Grenzstelle.FormattingEnabled = True
|
||||
Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(113, 1)
|
||||
Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle"
|
||||
Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21)
|
||||
Me.cboMy_Grenzstelle.TabIndex = 26
|
||||
'
|
||||
'cboMyAvisoAnzeige
|
||||
'
|
||||
Me.cboMyAvisoAnzeige._allowedValuesFreiText = Nothing
|
||||
Me.cboMyAvisoAnzeige._allowFreiText = False
|
||||
Me.cboMyAvisoAnzeige._value = ""
|
||||
Me.cboMyAvisoAnzeige.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.cboMyAvisoAnzeige.BackColor = System.Drawing.Color.WhiteSmoke
|
||||
Me.cboMyAvisoAnzeige.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
|
||||
Me.cboMyAvisoAnzeige.FormattingEnabled = True
|
||||
Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(232, 1)
|
||||
Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige"
|
||||
Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21)
|
||||
Me.cboMyAvisoAnzeige.TabIndex = 21
|
||||
'
|
||||
'btnMitarbeiterKonto
|
||||
'
|
||||
Me.btnMitarbeiterKonto.allowBorder = False
|
||||
Me.btnMitarbeiterKonto.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnMitarbeiterKonto.BackColor = System.Drawing.Color.White
|
||||
Me.btnMitarbeiterKonto.FlatAppearance.BorderSize = 0
|
||||
Me.btnMitarbeiterKonto.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnMitarbeiterKonto.ForeColor = System.Drawing.Color.Black
|
||||
Me.btnMitarbeiterKonto.Image = Global.AVISO.My.Resources.Resources.mitarbeiter_s
|
||||
Me.btnMitarbeiterKonto.ImageAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.btnMitarbeiterKonto.Location = New System.Drawing.Point(1109, -6)
|
||||
Me.btnMitarbeiterKonto.Name = "btnMitarbeiterKonto"
|
||||
Me.btnMitarbeiterKonto.Size = New System.Drawing.Size(137, 61)
|
||||
Me.btnMitarbeiterKonto.TabIndex = 86
|
||||
Me.btnMitarbeiterKonto.Text = "Andreas Luxbauer"
|
||||
Me.btnMitarbeiterKonto.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
Me.btnMitarbeiterKonto.UseVisualStyleBackColor = False
|
||||
Me.FTPToolStripMenuItem.Name = "FTPToolStripMenuItem"
|
||||
Me.FTPToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.FTPToolStripMenuItem.Text = "FTP"
|
||||
'
|
||||
'frmHauptfenster
|
||||
'
|
||||
@@ -3803,6 +3818,7 @@ Partial Class frmHauptfenster
|
||||
CType(Me.SplitContainer3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.SplitContainer3.ResumeLayout(False)
|
||||
Me.pnl.ResumeLayout(False)
|
||||
CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel6.ResumeLayout(False)
|
||||
Me.Panel6.PerformLayout()
|
||||
Me.tbcntrAviso.ResumeLayout(False)
|
||||
@@ -3817,6 +3833,7 @@ Partial Class frmHauptfenster
|
||||
Me.splitMain.Panel2.ResumeLayout(False)
|
||||
CType(Me.splitMain, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.splitMain.ResumeLayout(False)
|
||||
CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
Me.pnlTime.ResumeLayout(False)
|
||||
@@ -3830,8 +3847,6 @@ Partial Class frmHauptfenster
|
||||
Me.Panel3.PerformLayout()
|
||||
Me.Panel4.ResumeLayout(False)
|
||||
Me.cntVerag.ResumeLayout(False)
|
||||
CType(Me.gridAviso, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.gridMyAviso, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@@ -4198,4 +4213,6 @@ Partial Class frmHauptfenster
|
||||
Friend WithEvents AnhangsartenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents MailvorlagenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents FIBUSachkontenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents EMAILToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents FTPToolStripMenuItem As ToolStripMenuItem
|
||||
End Class
|
||||
|
||||
@@ -4583,43 +4583,58 @@ Public Class frmHauptfenster
|
||||
Me.Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Private Sub DatevBuchungsexportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DatevBuchungsexportToolStripMenuItem.Click
|
||||
Private Sub DatevBuchungsexportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EMAILToolStripMenuItem.Click, FTPToolStripMenuItem.Click
|
||||
|
||||
Try
|
||||
|
||||
Dim Pathlist As New List(Of String)
|
||||
|
||||
If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist, False) Then
|
||||
MsgBox("Buchungen wurden erfolgreich exportiert!")
|
||||
Else
|
||||
MsgBox("Es wurden keine Buchungen exportiert!")
|
||||
Exit Sub
|
||||
End If
|
||||
Select Case sender.name
|
||||
Case "EMAILToolStripMenuItem"
|
||||
|
||||
Dim outl As New Outlook.Application
|
||||
Dim Mail As Microsoft.Office.Interop.Outlook.MailItem
|
||||
Mail = outl.CreateItem(0)
|
||||
If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist, False) Then
|
||||
MsgBox("Buchungen wurden erfolgreich exportiert!")
|
||||
Else
|
||||
MsgBox("Es wurden keine Buchungen exportiert!")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Mail.To = "T.Wesolowski@hkt-tax.de"
|
||||
Mail.CC = "C.Tuendermann@hkt-tax.de;D.Horneber@hkt-tax.de;IO@ambarlog.de"
|
||||
Dim outl As New Outlook.Application
|
||||
Dim Mail As Microsoft.Office.Interop.Outlook.MailItem
|
||||
Mail = outl.CreateItem(0)
|
||||
|
||||
Dim TextHTML = ""
|
||||
TextHTML &= "Sehr geehrte Damen und Herren, <br> im Anhang befinden sich die Exportdaten für die Buchhaltung!"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= "Mit freundlichen Grüßen<br>"
|
||||
TextHTML &= VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "<br>"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= cFakturierung.getSignature("DE", 24, True, True)
|
||||
Mail.To = "T.Wesolowski@hkt-tax.de"
|
||||
Mail.CC = "C.Tuendermann@hkt-tax.de;D.Horneber@hkt-tax.de;IO@ambarlog.de"
|
||||
|
||||
Mail.HTMLBody = "<div style=""font-family:Calibri, Arial"">" & TextHTML & "</div>"
|
||||
Dim TextHTML = ""
|
||||
TextHTML &= "Sehr geehrte Damen und Herren, <br> im Anhang befinden sich die Exportdaten für die Buchhaltung!"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= "Mit freundlichen Grüßen<br>"
|
||||
TextHTML &= VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME & "<br>"
|
||||
TextHTML &= "<br>"
|
||||
TextHTML &= cFakturierung.getSignature("DE", 24, True, True)
|
||||
|
||||
Mail.Subject = "DATEV-Buchungsdaten AMBAR " & Now.Date.ToShortDateString
|
||||
Mail.HTMLBody = "<div style=""font-family:Calibri, Arial"">" & TextHTML & "</div>"
|
||||
|
||||
For Each path In Pathlist
|
||||
Mail.Attachments.Add(path, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue)
|
||||
Next
|
||||
Mail.Subject = "DATEV-Buchungsdaten AMBAR " & Now.Date.ToShortDateString
|
||||
|
||||
Mail.Display()
|
||||
For Each path In Pathlist
|
||||
Mail.Attachments.Add(path, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue)
|
||||
Next
|
||||
|
||||
Mail.Display()
|
||||
|
||||
Case "FTPToolStripMenuItem"
|
||||
|
||||
If VERAG_PROG_ALLGEMEIN.cDatev_Interface.genDatensatzCSV_ALL(VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, False, True, True,, Pathlist, False, "ftp") Then
|
||||
MsgBox("Buchungen wurden erfolgreich exportiert!")
|
||||
Else
|
||||
MsgBox("Es wurden keine Buchungen exportiert!")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
End Select
|
||||
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
@@ -4677,6 +4692,7 @@ Public Class frmHauptfenster
|
||||
Dim f As New SDL.frmLeistundenFIBUKonten(VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMIN", "SDL") Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Leistungen_FIBU", "SDL"))
|
||||
f.ShowDialog(Me)
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
|
||||
Public Class AvisoStatusFunctions
|
||||
|
||||
Reference in New Issue
Block a user