_ Partial Class EdokaMain Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ 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. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(EdokaMain)) Me.MainMenu1 = New System.Windows.Forms.MainMenu(Me.components) Me.MenuItem1 = New System.Windows.Forms.MenuItem Me.MenuItem2 = New System.Windows.Forms.MenuItem Me.MenuItem22 = New System.Windows.Forms.MenuItem Me.MenuItem23 = New System.Windows.Forms.MenuItem Me.MenuItem24 = New System.Windows.Forms.MenuItem Me.MenuItem25 = New System.Windows.Forms.MenuItem Me.MenuItem26 = New System.Windows.Forms.MenuItem Me.MenuItem27 = New System.Windows.Forms.MenuItem Me.MenuItem28 = New System.Windows.Forms.MenuItem Me.MenuItem29 = New System.Windows.Forms.MenuItem Me.MenuItem30 = New System.Windows.Forms.MenuItem Me.MenuItem31 = New System.Windows.Forms.MenuItem Me.MenuItem45 = New System.Windows.Forms.MenuItem Me.MenuItem43 = New System.Windows.Forms.MenuItem Me.MenuItem56 = New System.Windows.Forms.MenuItem Me.MenuItem57 = New System.Windows.Forms.MenuItem Me.MenuItem46 = New System.Windows.Forms.MenuItem Me.MenuItem47 = New System.Windows.Forms.MenuItem Me.MenuItem48 = New System.Windows.Forms.MenuItem Me.MenuItem49 = New System.Windows.Forms.MenuItem Me.MenuItem50 = New System.Windows.Forms.MenuItem Me.MenuItem51 = New System.Windows.Forms.MenuItem Me.MenuItem52 = New System.Windows.Forms.MenuItem Me.MenuItem53 = New System.Windows.Forms.MenuItem Me.MenuItem54 = New System.Windows.Forms.MenuItem Me.MenuItem55 = New System.Windows.Forms.MenuItem Me.MenuItem62 = New System.Windows.Forms.MenuItem Me.MenuItem63 = New System.Windows.Forms.MenuItem Me.MenuItem64 = New System.Windows.Forms.MenuItem Me.mnudp1 = New System.Windows.Forms.MenuItem Me.mnudp2 = New System.Windows.Forms.MenuItem Me.mnudp3 = New System.Windows.Forms.MenuItem Me.mnudp4 = New System.Windows.Forms.MenuItem Me.mnudp5 = New System.Windows.Forms.MenuItem Me.mnudp6 = New System.Windows.Forms.MenuItem Me.mnudp7 = New System.Windows.Forms.MenuItem Me.mnudp8 = New System.Windows.Forms.MenuItem Me.mnudp9 = New System.Windows.Forms.MenuItem Me.mnudp10 = New System.Windows.Forms.MenuItem Me.MenuItem7 = New System.Windows.Forms.MenuItem Me.MenuItem4 = New System.Windows.Forms.MenuItem Me.MenuItem8 = New System.Windows.Forms.MenuItem Me.MenuItem9 = New System.Windows.Forms.MenuItem Me.MenuItem6 = New System.Windows.Forms.MenuItem Me.MnuNewLogin = New System.Windows.Forms.MenuItem Me.MenuItem17 = New System.Windows.Forms.MenuItem Me.MnuSystemadministration = New System.Windows.Forms.MenuItem Me.MenuItem16 = New System.Windows.Forms.MenuItem Me.MenuItem21 = New System.Windows.Forms.MenuItem Me.MenuItem18 = New System.Windows.Forms.MenuItem Me.MenuItem11 = New System.Windows.Forms.MenuItem Me.MenuItem3 = New System.Windows.Forms.MenuItem Me.MenuItem5 = New System.Windows.Forms.MenuItem Me.MenuItem32 = New System.Windows.Forms.MenuItem Me.MenuItem33 = New System.Windows.Forms.MenuItem Me.MenuItem44 = New System.Windows.Forms.MenuItem Me.MenuItem36 = New System.Windows.Forms.MenuItem Me.MenuItem40 = New System.Windows.Forms.MenuItem Me.MenuItem41 = New System.Windows.Forms.MenuItem Me.MenuItem42 = New System.Windows.Forms.MenuItem Me.MenuItem65 = New System.Windows.Forms.MenuItem Me.mnuauslieferungen = New System.Windows.Forms.MenuItem Me.MenuItem66 = New System.Windows.Forms.MenuItem Me.mnuserienbriefe = New System.Windows.Forms.MenuItem Me.mnuPartnerlisten = New System.Windows.Forms.MenuItem Me.MenuItem67 = New System.Windows.Forms.MenuItem Me.menuSpooler = New System.Windows.Forms.MenuItem Me.MenuItem10 = New System.Windows.Forms.MenuItem Me.MenuItem12 = New System.Windows.Forms.MenuItem Me.MenuItem13 = New System.Windows.Forms.MenuItem Me.MenuItem14 = New System.Windows.Forms.MenuItem Me.MenuItem15 = New System.Windows.Forms.MenuItem Me.MenuItem19 = New System.Windows.Forms.MenuItem Me.MenuItem34 = New System.Windows.Forms.MenuItem Me.MenuItem58 = New System.Windows.Forms.MenuItem Me.MenuItem60 = New System.Windows.Forms.MenuItem Me.MenuItem59 = New System.Windows.Forms.MenuItem Me.MenuItem37 = New System.Windows.Forms.MenuItem Me.MenuItem35 = New System.Windows.Forms.MenuItem Me.MenuItem61 = New System.Windows.Forms.MenuItem Me.MenuItem38 = New System.Windows.Forms.MenuItem Me.MenuItem20 = New System.Windows.Forms.MenuItem Me.MenuItem39 = New System.Windows.Forms.MenuItem Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection Me.DataSet1 = New System.Data.DataSet Me.Timer2 = New System.Timers.Timer Me.Timer3 = New System.Timers.Timer Me.Timer1 = New System.Timers.Timer Me.HelpProvider1 = New System.Windows.Forms.HelpProvider Me.Panel1 = New System.Windows.Forms.Panel Me.Label1 = New System.Windows.Forms.Label Me.StatusBar1 = New System.Windows.Forms.StatusBar Me.SqlConnection2 = New System.Data.SqlClient.SqlConnection Me.DataSet2 = New System.Data.DataSet Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components) CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Timer2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Timer3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Timer1, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() CType(Me.DataSet2, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'MainMenu1 ' Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem17, Me.MnuSystemadministration, Me.MenuItem16, Me.MenuItem21, Me.MenuItem10, Me.MenuItem19, Me.MenuItem39}) ' 'MenuItem1 ' Me.MenuItem1.Index = 0 Me.MenuItem1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem2, Me.MenuItem45, Me.MenuItem62, Me.MenuItem7, Me.MenuItem4, Me.MenuItem8, Me.MenuItem9, Me.MenuItem6, Me.MnuNewLogin}) Me.MenuItem1.Text = "&Datei" ' 'MenuItem2 ' Me.MenuItem2.Index = 0 Me.MenuItem2.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem22, Me.MenuItem23, Me.MenuItem24, Me.MenuItem25, Me.MenuItem26, Me.MenuItem27, Me.MenuItem28, Me.MenuItem29, Me.MenuItem30, Me.MenuItem31}) Me.MenuItem2.Shortcut = System.Windows.Forms.Shortcut.CtrlO Me.MenuItem2.Text = "Trefferliste öffnen" ' 'MenuItem22 ' Me.MenuItem22.Index = 0 Me.MenuItem22.Text = "Struktur der Dokumentvorlagen aktualisieren" ' 'MenuItem23 ' Me.MenuItem23.Index = 1 Me.MenuItem23.Text = "bbb" ' 'MenuItem24 ' Me.MenuItem24.Index = 2 Me.MenuItem24.Text = "TRMenu3" ' 'MenuItem25 ' Me.MenuItem25.Index = 3 Me.MenuItem25.Text = "TRMenu4" ' 'MenuItem26 ' Me.MenuItem26.Index = 4 Me.MenuItem26.Text = "TRMenu5" ' 'MenuItem27 ' Me.MenuItem27.Index = 5 Me.MenuItem27.Text = "TRMenu6" ' 'MenuItem28 ' Me.MenuItem28.Index = 6 Me.MenuItem28.Text = "TRMenu7" ' 'MenuItem29 ' Me.MenuItem29.Index = 7 Me.MenuItem29.Text = "TRMenu8" ' 'MenuItem30 ' Me.MenuItem30.Index = 8 Me.MenuItem30.Text = "TRMenu9" ' 'MenuItem31 ' Me.MenuItem31.Index = 9 Me.MenuItem31.Text = "TRMenu10" ' 'MenuItem45 ' Me.MenuItem45.Index = 1 Me.MenuItem45.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem43, Me.MenuItem56, Me.MenuItem57, Me.MenuItem46, Me.MenuItem47, Me.MenuItem48, Me.MenuItem49, Me.MenuItem50, Me.MenuItem51, Me.MenuItem52, Me.MenuItem53, Me.MenuItem54, Me.MenuItem55}) Me.MenuItem45.Text = "Dokument&suche öffnen" ' 'MenuItem43 ' Me.MenuItem43.Index = 0 Me.MenuItem43.Text = "Neue Dokumentsuche" ' 'MenuItem56 ' Me.MenuItem56.Index = 1 Me.MenuItem56.Text = "Einzelnes Dokument suchen" ' 'MenuItem57 ' Me.MenuItem57.Index = 2 Me.MenuItem57.Text = "-" ' 'MenuItem46 ' Me.MenuItem46.Index = 3 Me.MenuItem46.Text = "1" ' 'MenuItem47 ' Me.MenuItem47.Index = 4 Me.MenuItem47.Text = "2" ' 'MenuItem48 ' Me.MenuItem48.Index = 5 Me.MenuItem48.Text = "3" ' 'MenuItem49 ' Me.MenuItem49.Index = 6 Me.MenuItem49.Text = "4" ' 'MenuItem50 ' Me.MenuItem50.Index = 7 Me.MenuItem50.Text = "5" ' 'MenuItem51 ' Me.MenuItem51.Index = 8 Me.MenuItem51.Text = "6" ' 'MenuItem52 ' Me.MenuItem52.Index = 9 Me.MenuItem52.Text = "7" ' 'MenuItem53 ' Me.MenuItem53.Index = 10 Me.MenuItem53.Text = "8" ' 'MenuItem54 ' Me.MenuItem54.Index = 11 Me.MenuItem54.Text = "9" ' 'MenuItem55 ' Me.MenuItem55.Index = 12 Me.MenuItem55.Text = "10" ' 'MenuItem62 ' Me.MenuItem62.Index = 2 Me.MenuItem62.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem63, Me.MenuItem64, Me.mnudp1, Me.mnudp2, Me.mnudp3, Me.mnudp4, Me.mnudp5, Me.mnudp6, Me.mnudp7, Me.mnudp8, Me.mnudp9, Me.mnudp10}) Me.MenuItem62.Text = "Pendente Dokumentpakete" ' 'MenuItem63 ' Me.MenuItem63.Index = 0 Me.MenuItem63.Text = "Übersicht" ' 'MenuItem64 ' Me.MenuItem64.Index = 1 Me.MenuItem64.Text = "-" ' 'mnudp1 ' Me.mnudp1.Index = 2 Me.mnudp1.Text = "1" ' 'mnudp2 ' Me.mnudp2.Index = 3 Me.mnudp2.Text = "2" ' 'mnudp3 ' Me.mnudp3.Index = 4 Me.mnudp3.Text = "3" ' 'mnudp4 ' Me.mnudp4.Index = 5 Me.mnudp4.Text = "4" ' 'mnudp5 ' Me.mnudp5.Index = 6 Me.mnudp5.Text = "5" ' 'mnudp6 ' Me.mnudp6.Index = 7 Me.mnudp6.Text = "6" ' 'mnudp7 ' Me.mnudp7.Index = 8 Me.mnudp7.Text = "7" ' 'mnudp8 ' Me.mnudp8.Index = 9 Me.mnudp8.Text = "8" ' 'mnudp9 ' Me.mnudp9.Index = 10 Me.mnudp9.Text = "9" ' 'mnudp10 ' Me.mnudp10.Index = 11 Me.mnudp10.Text = "10" ' 'MenuItem7 ' Me.MenuItem7.Index = 3 Me.MenuItem7.Text = "-" ' 'MenuItem4 ' Me.MenuItem4.Index = 4 Me.MenuItem4.Text = "Drucker einrichten" Me.MenuItem4.Visible = False ' 'MenuItem8 ' Me.MenuItem8.Enabled = False Me.MenuItem8.Index = 5 Me.MenuItem8.Text = "Ansicht drucken" Me.MenuItem8.Visible = False ' 'MenuItem9 ' Me.MenuItem9.Index = 6 Me.MenuItem9.Text = "-" Me.MenuItem9.Visible = False ' 'MenuItem6 ' Me.MenuItem6.Index = 7 Me.MenuItem6.Shortcut = System.Windows.Forms.Shortcut.Alt4 Me.MenuItem6.Text = "Beenden" ' 'MnuNewLogin ' Me.MnuNewLogin.Index = 8 Me.MnuNewLogin.Text = "&Neu anmelden" ' 'MenuItem17 ' Me.MenuItem17.Index = 1 Me.MenuItem17.MergeOrder = 96 Me.MenuItem17.Text = "&Auswertungen" Me.MenuItem17.Visible = False ' 'MnuSystemadministration ' Me.MnuSystemadministration.Index = 2 Me.MnuSystemadministration.MergeOrder = 97 Me.MnuSystemadministration.Text = "Systemadministration" ' 'MenuItem16 ' Me.MenuItem16.Index = 3 Me.MenuItem16.Text = "Partner-Host-Struktur" Me.MenuItem16.Visible = False ' 'MenuItem21 ' Me.MenuItem21.Index = 4 Me.MenuItem21.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem18, Me.MenuItem11, Me.MenuItem3, Me.MenuItem5, Me.MenuItem32, Me.MenuItem33, Me.MenuItem44, Me.MenuItem36, Me.MenuItem40, Me.MenuItem41, Me.MenuItem42, Me.MenuItem65, Me.mnuauslieferungen, Me.MenuItem66, Me.mnuserienbriefe, Me.mnuPartnerlisten, Me.MenuItem67, Me.menuSpooler}) Me.MenuItem21.MergeOrder = 98 Me.MenuItem21.Text = "&Extras" ' 'MenuItem18 ' Me.MenuItem18.Index = 0 Me.MenuItem18.Text = "&Mitarbeiter-Einstellungen / Stellvertretungen" ' 'MenuItem11 ' Me.MenuItem11.Index = 1 Me.MenuItem11.Text = "&Barcode-Etiketten drucken" ' 'MenuItem3 ' Me.MenuItem3.Index = 2 Me.MenuItem3.Text = "&EDOKA-Meldungen" ' 'MenuItem5 ' Me.MenuItem5.Index = 3 Me.MenuItem5.Text = "&Revisionsjournal" Me.MenuItem5.Visible = False ' 'MenuItem32 ' Me.MenuItem32.Index = 4 Me.MenuItem32.Text = "-" ' 'MenuItem33 ' Me.MenuItem33.Index = 5 Me.MenuItem33.Text = "einzelnes Dokument suchen" Me.MenuItem33.Visible = False ' 'MenuItem44 ' Me.MenuItem44.Index = 6 Me.MenuItem44.Text = "Dokumentsuche" Me.MenuItem44.Visible = False ' 'MenuItem36 ' Me.MenuItem36.Index = 7 Me.MenuItem36.Text = "Wordfunktionen freigeben" ' 'MenuItem40 ' Me.MenuItem40.Index = 8 Me.MenuItem40.Text = "Excelfunktionen freigeben" ' 'MenuItem41 ' Me.MenuItem41.Index = 9 Me.MenuItem41.Text = "-" ' 'MenuItem42 ' Me.MenuItem42.Index = 10 Me.MenuItem42.Text = "&Partnerdossier zusammenlegen" ' 'MenuItem65 ' Me.MenuItem65.Index = 11 Me.MenuItem65.Text = "-" ' 'mnuauslieferungen ' Me.mnuauslieferungen.Index = 12 Me.mnuauslieferungen.Text = "Banklagernd-Aushändigungen" ' 'MenuItem66 ' Me.MenuItem66.Index = 13 Me.MenuItem66.Text = "-" ' 'mnuserienbriefe ' Me.mnuserienbriefe.Index = 14 Me.mnuserienbriefe.Text = "Serienbriefe" ' 'mnuPartnerlisten ' Me.mnuPartnerlisten.Index = 15 Me.mnuPartnerlisten.Text = "Partnerlisten verwalten" ' 'MenuItem67 ' Me.MenuItem67.Index = 16 Me.MenuItem67.Text = "-" ' 'menuSpooler ' Me.menuSpooler.Index = 17 Me.menuSpooler.Text = "Avaloq Spooler" ' 'MenuItem10 ' Me.MenuItem10.Index = 5 Me.MenuItem10.MdiList = True Me.MenuItem10.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem12, Me.MenuItem13, Me.MenuItem14, Me.MenuItem15}) Me.MenuItem10.MergeOrder = 99 Me.MenuItem10.Text = "&Fenster" ' 'MenuItem12 ' Me.MenuItem12.Index = 0 Me.MenuItem12.Text = "Horizontal teilen" ' 'MenuItem13 ' Me.MenuItem13.Index = 1 Me.MenuItem13.Text = "Vertikal teilen" ' 'MenuItem14 ' Me.MenuItem14.Index = 2 Me.MenuItem14.Text = "Hintereinander" ' 'MenuItem15 ' Me.MenuItem15.Index = 3 Me.MenuItem15.Text = "Alle Fenster schliessen" ' 'MenuItem19 ' Me.MenuItem19.Index = 6 Me.MenuItem19.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem34, Me.MenuItem58, Me.MenuItem60, Me.MenuItem59, Me.MenuItem37, Me.MenuItem35, Me.MenuItem61, Me.MenuItem38, Me.MenuItem20}) Me.MenuItem19.MergeOrder = 100 Me.MenuItem19.Text = "&Hilfe" ' 'MenuItem34 ' Me.MenuItem34.Index = 0 Me.MenuItem34.Text = "Inhalt..." ' 'MenuItem58 ' Me.MenuItem58.Index = 1 Me.MenuItem58.Text = "Index..." ' 'MenuItem60 ' Me.MenuItem60.Index = 2 Me.MenuItem60.Text = "Suchen..." ' 'MenuItem59 ' Me.MenuItem59.Index = 3 Me.MenuItem59.Text = "-" ' 'MenuItem37 ' Me.MenuItem37.Index = 4 Me.MenuItem37.Text = "FAQ" ' 'MenuItem35 ' Me.MenuItem35.Index = 5 Me.MenuItem35.Text = "Release-Informationen" ' 'MenuItem61 ' Me.MenuItem61.Index = 6 Me.MenuItem61.Text = "EDOKA-Ausbildungsvideos" ' 'MenuItem38 ' Me.MenuItem38.Index = 7 Me.MenuItem38.Text = "-" ' 'MenuItem20 ' Me.MenuItem20.Index = 8 Me.MenuItem20.Text = "Über EDOKA" ' 'MenuItem39 ' Me.MenuItem39.Index = 7 Me.MenuItem39.MergeOrder = 101 Me.MenuItem39.OwnerDraw = True Me.MenuItem39.Text = "&Mail" Me.MenuItem39.Visible = False ' 'SqlDataAdapter1 ' Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1 Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1 Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "profil", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("profilnr", "profilnr"), New System.Data.Common.DataColumnMapping("mitarbeiternr", "mitarbeiternr"), New System.Data.Common.DataColumnMapping("bezeichnung", "bezeichnung"), New System.Data.Common.DataColumnMapping("beschreibung", "beschreibung"), New System.Data.Common.DataColumnMapping("standard", "standard"), New System.Data.Common.DataColumnMapping("mandantnr", "mandantnr"), New System.Data.Common.DataColumnMapping("aktiv", "aktiv"), New System.Data.Common.DataColumnMapping("erstellt_am", "erstellt_am"), New System.Data.Common.DataColumnMapping("mutiert_am", "mutiert_am"), New System.Data.Common.DataColumnMapping("mutierer", "mutierer"), New System.Data.Common.DataColumnMapping("color1", "color1"), New System.Data.Common.DataColumnMapping("color2", "color2"), New System.Data.Common.DataColumnMapping("color3", "color3"), New System.Data.Common.DataColumnMapping("color4", "color4"), New System.Data.Common.DataColumnMapping("color5", "color5"), New System.Data.Common.DataColumnMapping("color6", "color6"), New System.Data.Common.DataColumnMapping("color7", "color7"), New System.Data.Common.DataColumnMapping("color8", "color8"), New System.Data.Common.DataColumnMapping("unterschriftlinks", "unterschriftlinks"), New System.Data.Common.DataColumnMapping("unterschriftrechts", "unterschriftrechts"), New System.Data.Common.DataColumnMapping("hw1", "hw1"), New System.Data.Common.DataColumnMapping("hw2", "hw2"), New System.Data.Common.DataColumnMapping("hw3", "hw3"), New System.Data.Common.DataColumnMapping("hw4", "hw4"), New System.Data.Common.DataColumnMapping("hw5", "hw5"), New System.Data.Common.DataColumnMapping("hw6", "hw6"), New System.Data.Common.DataColumnMapping("hw7", "hw7"), New System.Data.Common.DataColumnMapping("hw8", "hw8"), New System.Data.Common.DataColumnMapping("hw9", "hw9"), New System.Data.Common.DataColumnMapping("hw10", "hw10"), New System.Data.Common.DataColumnMapping("hw11", "hw11"), New System.Data.Common.DataColumnMapping("vmb", "vmb"), New System.Data.Common.DataColumnMapping("vnl", "vnl"), New System.Data.Common.DataColumnMapping("vkost", "vkost"), New System.Data.Common.DataColumnMapping("vteam", "vteam"), New System.Data.Common.DataColumnMapping("vma", "vma"), New System.Data.Common.DataColumnMapping("mmb", "mmb"), New System.Data.Common.DataColumnMapping("mnl", "mnl"), New System.Data.Common.DataColumnMapping("mkost", "mkost"), New System.Data.Common.DataColumnMapping("mteam", "mteam"), New System.Data.Common.DataColumnMapping("mma", "mma"), New System.Data.Common.DataColumnMapping("emb", "emb"), New System.Data.Common.DataColumnMapping("enl", "enl"), New System.Data.Common.DataColumnMapping("ekost", "ekost"), New System.Data.Common.DataColumnMapping("eteam", "eteam"), New System.Data.Common.DataColumnMapping("ema", "ema"), New System.Data.Common.DataColumnMapping("dpartner", "dpartner"), New System.Data.Common.DataColumnMapping("ddokart", "ddokart"), New System.Data.Common.DataColumnMapping("ddokstatus", "ddokstatus"), New System.Data.Common.DataColumnMapping("datum1", "datum1"), New System.Data.Common.DataColumnMapping("datum2", "datum2"), New System.Data.Common.DataColumnMapping("datum3", "datum3"), New System.Data.Common.DataColumnMapping("datum4", "datum4"), New System.Data.Common.DataColumnMapping("datum5", "datum5"), New System.Data.Common.DataColumnMapping("datum6", "datum6"), New System.Data.Common.DataColumnMapping("datum7", "datum7"), New System.Data.Common.DataColumnMapping("datum8", "datum8"), New System.Data.Common.DataColumnMapping("erstaelterals", "erstaelterals"), New System.Data.Common.DataColumnMapping("mutaelterasl", "mutaelterasl"), New System.Data.Common.DataColumnMapping("team", "team"), New System.Data.Common.DataColumnMapping("sort", "sort"), New System.Data.Common.DataColumnMapping("aktive", "aktive"), New System.Data.Common.DataColumnMapping("profiltyp", "profiltyp")})}) ' 'SqlInsertCommand1 ' Me.SqlInsertCommand1.CommandText = "[pv_profil_insert]" Me.SqlInsertCommand1.CommandType = System.Data.CommandType.StoredProcedure Me.SqlInsertCommand1.Parameters.AddRange(New System.Data.SqlClient.SqlParameter() {New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing), New System.Data.SqlClient.SqlParameter("@profilnr", System.Data.SqlDbType.Int, 4, "profilnr"), New System.Data.SqlClient.SqlParameter("@mitarbeiternr", System.Data.SqlDbType.Int, 4, "mitarbeiternr"), New System.Data.SqlClient.SqlParameter("@bezeichnung", System.Data.SqlDbType.VarChar, 255, "bezeichnung"), New System.Data.SqlClient.SqlParameter("@beschreibung", System.Data.SqlDbType.VarChar, 255, "beschreibung"), New System.Data.SqlClient.SqlParameter("@standard", System.Data.SqlDbType.Bit, 1, "standard"), New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr"), New System.Data.SqlClient.SqlParameter("@aktiv", System.Data.SqlDbType.Bit, 1, "aktiv"), New System.Data.SqlClient.SqlParameter("@erstellt_am", System.Data.SqlDbType.DateTime, 8, "erstellt_am"), New System.Data.SqlClient.SqlParameter("@mutiert_am", System.Data.SqlDbType.DateTime, 8, "mutiert_am"), New System.Data.SqlClient.SqlParameter("@mutierer", System.Data.SqlDbType.Int, 4, "mutierer"), New System.Data.SqlClient.SqlParameter("@color1", System.Data.SqlDbType.VarChar, 50, "color1"), New System.Data.SqlClient.SqlParameter("@color2", System.Data.SqlDbType.VarChar, 50, "color2"), New System.Data.SqlClient.SqlParameter("@color3", System.Data.SqlDbType.VarChar, 50, "color3"), New System.Data.SqlClient.SqlParameter("@color4", System.Data.SqlDbType.VarChar, 50, "color4"), New System.Data.SqlClient.SqlParameter("@color5", System.Data.SqlDbType.VarChar, 50, "color5"), New System.Data.SqlClient.SqlParameter("@color6", System.Data.SqlDbType.VarChar, 50, "color6"), New System.Data.SqlClient.SqlParameter("@color7", System.Data.SqlDbType.VarChar, 50, "color7"), New System.Data.SqlClient.SqlParameter("@color8", System.Data.SqlDbType.VarChar, 50, "color8"), New System.Data.SqlClient.SqlParameter("@unterschriftlinks", System.Data.SqlDbType.Int, 4, "unterschriftlinks"), New System.Data.SqlClient.SqlParameter("@unterschriftrechts", System.Data.SqlDbType.Int, 4, "unterschriftrechts"), New System.Data.SqlClient.SqlParameter("@hw1", System.Data.SqlDbType.Int, 4, "hw1"), New System.Data.SqlClient.SqlParameter("@hw2", System.Data.SqlDbType.Int, 4, "hw2"), New System.Data.SqlClient.SqlParameter("@hw3", System.Data.SqlDbType.Int, 4, "hw3"), New System.Data.SqlClient.SqlParameter("@hw4", System.Data.SqlDbType.Int, 4, "hw4"), New System.Data.SqlClient.SqlParameter("@hw5", System.Data.SqlDbType.Int, 4, "hw5"), New System.Data.SqlClient.SqlParameter("@hw6", System.Data.SqlDbType.Int, 4, "hw6"), New System.Data.SqlClient.SqlParameter("@hw7", System.Data.SqlDbType.Int, 4, "hw7"), New System.Data.SqlClient.SqlParameter("@hw8", System.Data.SqlDbType.Int, 4, "hw8"), New System.Data.SqlClient.SqlParameter("@hw9", System.Data.SqlDbType.Int, 4, "hw9"), New System.Data.SqlClient.SqlParameter("@hw10", System.Data.SqlDbType.Int, 4, "hw10"), New System.Data.SqlClient.SqlParameter("@hw11", System.Data.SqlDbType.Int, 4, "hw11"), New System.Data.SqlClient.SqlParameter("@vmb", System.Data.SqlDbType.VarChar, 255, "vmb"), New System.Data.SqlClient.SqlParameter("@vnl", System.Data.SqlDbType.VarChar, 255, "vnl"), New System.Data.SqlClient.SqlParameter("@vkost", System.Data.SqlDbType.VarChar, 255, "vkost"), New System.Data.SqlClient.SqlParameter("@vteam", System.Data.SqlDbType.VarChar, 255, "vteam"), New System.Data.SqlClient.SqlParameter("@vma", System.Data.SqlDbType.VarChar, 255, "vma"), New System.Data.SqlClient.SqlParameter("@mmb", System.Data.SqlDbType.VarChar, 255, "mmb"), New System.Data.SqlClient.SqlParameter("@mnl", System.Data.SqlDbType.VarChar, 255, "mnl"), New System.Data.SqlClient.SqlParameter("@mkost", System.Data.SqlDbType.VarChar, 255, "mkost"), New System.Data.SqlClient.SqlParameter("@mteam", System.Data.SqlDbType.VarChar, 255, "mteam"), New System.Data.SqlClient.SqlParameter("@mma", System.Data.SqlDbType.VarChar, 255, "mma"), New System.Data.SqlClient.SqlParameter("@emb", System.Data.SqlDbType.VarChar, 255, "emb"), New System.Data.SqlClient.SqlParameter("@enl", System.Data.SqlDbType.VarChar, 255, "enl"), New System.Data.SqlClient.SqlParameter("@ekost", System.Data.SqlDbType.VarChar, 255, "ekost"), New System.Data.SqlClient.SqlParameter("@eteam", System.Data.SqlDbType.VarChar, 255, "eteam"), New System.Data.SqlClient.SqlParameter("@ema", System.Data.SqlDbType.VarChar, 255, "ema"), New System.Data.SqlClient.SqlParameter("@dpartner", System.Data.SqlDbType.VarChar, 255, "dpartner"), New System.Data.SqlClient.SqlParameter("@ddokart", System.Data.SqlDbType.VarChar, 255, "ddokart"), New System.Data.SqlClient.SqlParameter("@ddokstatus", System.Data.SqlDbType.VarChar, 255, "ddokstatus"), New System.Data.SqlClient.SqlParameter("@datum1", System.Data.SqlDbType.VarChar, 50, "datum1"), New System.Data.SqlClient.SqlParameter("@datum2", System.Data.SqlDbType.VarChar, 50, "datum2"), New System.Data.SqlClient.SqlParameter("@datum3", System.Data.SqlDbType.VarChar, 50, "datum3"), New System.Data.SqlClient.SqlParameter("@datum4", System.Data.SqlDbType.VarChar, 50, "datum4"), New System.Data.SqlClient.SqlParameter("@datum5", System.Data.SqlDbType.VarChar, 50, "datum5"), New System.Data.SqlClient.SqlParameter("@datum6", System.Data.SqlDbType.VarChar, 50, "datum6"), New System.Data.SqlClient.SqlParameter("@datum7", System.Data.SqlDbType.VarChar, 50, "datum7"), New System.Data.SqlClient.SqlParameter("@datum8", System.Data.SqlDbType.VarChar, 50, "datum8"), New System.Data.SqlClient.SqlParameter("@erstaelterals", System.Data.SqlDbType.VarChar, 50, "erstaelterals"), New System.Data.SqlClient.SqlParameter("@mutaelterasl", System.Data.SqlDbType.VarChar, 50, "mutaelterasl"), New System.Data.SqlClient.SqlParameter("@team", System.Data.SqlDbType.Int, 4, "team"), New System.Data.SqlClient.SqlParameter("@sort", System.Data.SqlDbType.VarChar, 1024, "sort"), New System.Data.SqlClient.SqlParameter("@aktive", System.Data.SqlDbType.Bit, 1, "aktive"), New System.Data.SqlClient.SqlParameter("@profiltyp", System.Data.SqlDbType.Int, 4, "profiltyp")}) ' 'SqlSelectCommand1 ' Me.SqlSelectCommand1.CommandText = "[pv_profil_select]" Me.SqlSelectCommand1.CommandType = System.Data.CommandType.StoredProcedure Me.SqlSelectCommand1.Connection = Me.SqlConnection1 Me.SqlSelectCommand1.Parameters.AddRange(New System.Data.SqlClient.SqlParameter() {New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing), New System.Data.SqlClient.SqlParameter("@mitarbeiternr", System.Data.SqlDbType.Int, 4, "mitarbeiternr"), New System.Data.SqlClient.SqlParameter("@mandantnr", System.Data.SqlDbType.Int, 4, "mandantnr")}) ' 'SqlConnection1 ' Me.SqlConnection1.ConnectionString = "data source=shu;initial catalog=edoka;persist security info=False;user id=sa;work" & _ "station id=SHU;packet size=4096" Me.SqlConnection1.FireInfoMessageEventOnUserErrors = False ' 'DataSet1 ' Me.DataSet1.DataSetName = "NewDataSet" Me.DataSet1.Locale = New System.Globalization.CultureInfo("de-CH") ' 'Timer2 ' Me.Timer2.Enabled = True Me.Timer2.Interval = 5000 Me.Timer2.SynchronizingObject = Me ' 'Timer3 ' Me.Timer3.Interval = 750 Me.Timer3.SynchronizingObject = Me ' 'Timer1 ' Me.Timer1.Enabled = True Me.Timer1.Interval = 900000 Me.Timer1.SynchronizingObject = Me ' 'Panel1 ' Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Panel1.Controls.Add(Me.Label1) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top Me.Panel1.Location = New System.Drawing.Point(0, 0) Me.Panel1.Name = "Panel1" Me.HelpProvider1.SetShowHelp(Me.Panel1, False) Me.Panel1.Size = New System.Drawing.Size(959, 16) Me.Panel1.TabIndex = 6 Me.Panel1.Visible = False ' 'Label1 ' Me.Label1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label1.Dock = System.Windows.Forms.DockStyle.Bottom Me.Label1.ForeColor = System.Drawing.Color.Red Me.Label1.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.Label1.Location = New System.Drawing.Point(0, 0) Me.Label1.Name = "Label1" Me.HelpProvider1.SetShowHelp(Me.Label1, False) Me.Label1.Size = New System.Drawing.Size(959, 16) Me.Label1.TabIndex = 0 Me.Label1.Text = "Label1" Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'StatusBar1 ' Me.StatusBar1.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.StatusBar1.Location = New System.Drawing.Point(0, 456) Me.StatusBar1.Name = "StatusBar1" Me.HelpProvider1.SetShowHelp(Me.StatusBar1, False) Me.StatusBar1.Size = New System.Drawing.Size(959, 22) Me.StatusBar1.TabIndex = 7 Me.StatusBar1.Text = "StatusBar1" ' 'SqlConnection2 ' Me.SqlConnection2.ConnectionString = "data source=shu;initial catalog=edoka;persist security info=False;user id=sa;work" & _ "station id=SHU;packet size=4096" Me.SqlConnection2.FireInfoMessageEventOnUserErrors = False ' 'DataSet2 ' Me.DataSet2.DataSetName = "NewDataSet" Me.DataSet2.Locale = New System.Globalization.CultureInfo("de-CH") ' 'ImageList1 ' Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer) Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent Me.ImageList1.Images.SetKeyName(0, "") Me.ImageList1.Images.SetKeyName(1, "") Me.ImageList1.Images.SetKeyName(2, "") Me.ImageList1.Images.SetKeyName(3, "") Me.ImageList1.Images.SetKeyName(4, "") Me.ImageList1.Images.SetKeyName(5, "") Me.ImageList1.Images.SetKeyName(6, "") ' 'EdokaMain ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(959, 478) Me.Controls.Add(Me.StatusBar1) Me.Controls.Add(Me.Panel1) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.IsMdiContainer = True Me.Menu = Me.MainMenu1 Me.Name = "EdokaMain" Me.Text = "EDOKA" CType(Me.DataSet1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Timer2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Timer3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Timer1, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) CType(Me.DataSet2, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu Friend WithEvents MenuItem1 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem2 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem22 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem23 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem24 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem25 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem26 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem27 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem28 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem29 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem30 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem31 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem45 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem43 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem56 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem57 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem46 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem47 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem48 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem49 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem50 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem51 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem52 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem53 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem54 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem55 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem62 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem63 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem64 As System.Windows.Forms.MenuItem Friend WithEvents mnudp1 As System.Windows.Forms.MenuItem Friend WithEvents mnudp2 As System.Windows.Forms.MenuItem Friend WithEvents mnudp3 As System.Windows.Forms.MenuItem Friend WithEvents mnudp4 As System.Windows.Forms.MenuItem Friend WithEvents mnudp5 As System.Windows.Forms.MenuItem Friend WithEvents mnudp6 As System.Windows.Forms.MenuItem Friend WithEvents mnudp7 As System.Windows.Forms.MenuItem Friend WithEvents mnudp8 As System.Windows.Forms.MenuItem Friend WithEvents mnudp9 As System.Windows.Forms.MenuItem Friend WithEvents mnudp10 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem7 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem4 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem8 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem9 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem6 As System.Windows.Forms.MenuItem Friend WithEvents MnuNewLogin As System.Windows.Forms.MenuItem Friend WithEvents MenuItem17 As System.Windows.Forms.MenuItem Friend WithEvents MnuSystemadministration As System.Windows.Forms.MenuItem Friend WithEvents MenuItem16 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem21 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem18 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem11 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem3 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem5 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem32 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem33 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem44 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem36 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem40 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem41 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem42 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem65 As System.Windows.Forms.MenuItem Friend WithEvents mnuauslieferungen As System.Windows.Forms.MenuItem Friend WithEvents MenuItem66 As System.Windows.Forms.MenuItem Friend WithEvents mnuserienbriefe As System.Windows.Forms.MenuItem Friend WithEvents mnuPartnerlisten As System.Windows.Forms.MenuItem Friend WithEvents MenuItem67 As System.Windows.Forms.MenuItem Friend WithEvents menuSpooler As System.Windows.Forms.MenuItem Friend WithEvents MenuItem10 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem12 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem13 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem14 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem15 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem19 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem34 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem58 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem60 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem59 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem37 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem35 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem61 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem38 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem20 As System.Windows.Forms.MenuItem Friend WithEvents MenuItem39 As System.Windows.Forms.MenuItem Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection Friend WithEvents DataSet1 As System.Data.DataSet Friend WithEvents Timer2 As System.Timers.Timer Friend WithEvents HelpProvider1 As System.Windows.Forms.HelpProvider Friend WithEvents Timer3 As System.Timers.Timer Friend WithEvents Timer1 As System.Timers.Timer Friend WithEvents SqlConnection2 As System.Data.SqlClient.SqlConnection Friend WithEvents DataSet2 As System.Data.DataSet Friend WithEvents StatusBar1 As System.Windows.Forms.StatusBar Friend WithEvents Panel1 As System.Windows.Forms.Panel Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents ImageList1 As System.Windows.Forms.ImageList End Class