Kundenblatt
This commit is contained in:
@@ -2867,10 +2867,6 @@ Public Class frmKundenblatt
|
||||
|
||||
Next
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
'CSV erzeugen:
|
||||
Dim SQL_String As String = "Select Top(1) 'S' As [Transaction Type], ''As Company1, ' ' As Company2, ' ' As CompanyStreet, ' ' As CompanyNumber, ' ' As CompanyCode, ' ' As CompanyCity, ' ' As CompanyCountry, ' ' As CompanyCountryAbbr, ' ' As CompanyTelephone, ' ' As CompanyTelefax, ' ' As Salutation, ' ' As Title, ' ' As FirstName, ' ' As LastName, ' ' As Email, ' ' As PersonLanguage, ' ' As [License plate], ' ' As [License plate Nationality], ' ' As VehicleType, ' ' As Axles, ' ' As [Stammnummer For Tripon Orders only], ' ' As CardNum, ' ' As CardValidMonth, ' ' As CardValidYear FROM [tblGOBOXBestellungen]
|
||||
UNION ALL
|
||||
@@ -3058,7 +3054,7 @@ Public Class frmKundenblatt
|
||||
KUNDE.SAVE()
|
||||
End If
|
||||
Else
|
||||
MsgBox("Feld Gesprächstbericht darf nicht leer sein")
|
||||
MsgBox("Feld Gesprächsbericht darf nicht leer sein")
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user