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.
|
Module Module1
|
|
|
|
Sub Main()
|
|
Dim db As New clsDBZugriffe
|
|
Globals.sConnectionString_edoka = My.Settings.EDOKA_Connection
|
|
db.Get_doks_to_export()
|
|
For Each r As DataRow In db.Dokdaten.Rows
|
|
db.get_dokumnet_from_db(r.Item(1), r.Item(1) + ".pdf")
|
|
Next
|
|
|
|
End Sub
|
|
|
|
End Module
|