26 lines
837 B
VB.net
26 lines
837 B
VB.net
Module Globals
|
|
Public fMehrfachdruck As frmMehrfachdruck
|
|
Public iMerker As Integer = 0
|
|
Public g_bRun As Boolean
|
|
Public _HashThreads As New Hashtable()
|
|
Public _HashDruckanzeige As New Hashtable()
|
|
|
|
Public tgnummer As String = "tg9831"
|
|
Public temppfad As String = "h:\tssettings\edoka\"
|
|
'Public connectionString As String = "Data Source=shu00;Initial Catalog=edoka_host;User ID=sa;Password=*shu29"
|
|
|
|
Public sConnectionString As String
|
|
Public conn As New edokadb.clsConnectionProvider()
|
|
Public ConnectionFileName As String = ""
|
|
Public Spalten As New DataTable()
|
|
|
|
Public Packagegroesse As Integer
|
|
Public DelayTime As Integer
|
|
Public Userdata As New DataSet
|
|
Public Mitarbeiternr As Integer
|
|
|
|
Public Partnernr As String
|
|
Public PartnerKurzbezeichnung As String
|
|
|
|
End Module
|