You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
28 lines
811 B
28 lines
811 B
Imports System.IO
|
|
Imports System.Reflection
|
|
|
|
Module Globals
|
|
Public Params As New ClsParameters()
|
|
Public ofile As System.IO.File
|
|
Public oread As System.IO.StreamReader
|
|
|
|
Public sConnectionString_edoka As String
|
|
Public sConnectionString_journale As String
|
|
Public sConnectionString_ams As String
|
|
|
|
Public args As String() = Environment.GetCommandLineArgs()
|
|
|
|
Public conn_edoka As New edokadb.clsConnectionProvider()
|
|
Public conn_journale As New edokadb.clsConnectionProvider()
|
|
Public conn_ams As New edokadb.clsConnectionProvider()
|
|
|
|
Public Function ApplicationPath() As String
|
|
'Return Path.GetDirectoryName([Assembly].GetExecutingAssembly().Location)
|
|
Return Path.GetDirectoryName([Assembly].GetEntryAssembly().Location) + "\"
|
|
End Function
|
|
|
|
|
|
|
|
End Module
|
|
|