ich hab da wieder eine Frage, ehe ich einen ganzen Tag nach einer simplen Lösung suche:
Code: Alles auswählen
Sub Test_Anruf(scall)
scaller = "0xxx03-123456"
DatabaseContext = createUnoService("com.sun.star.sdb.DatabaseContext")
oDatenquelle = Databasecontext.getByName("LaBella_Datenbank-test2")
oDatVerb = oDatenquelle.getConnection("","")
oStatement = oDatVerb.createStatement()
msgBox scaller
sSQL = "SELECT * FROM ""Kunden_Test"" WHERE ""TELEFON"" = scaller OR ""TELEFON2"" = scaller"
oErgSet = oStatement.executeQuery(sSQL)
oErgSet.Next
msgBox oErgSet.getString(1) &" "& oErgSet.getString(2) &" "& oErgSet.getString(3)
End Sub
Die Variable scaller habe ich probehalber eingeführt, damit ich nicht ständig meine FritzBox anrufen muß, die mir über den Anrufmonitor die Variable scall liefert. Also geht es letztlich um scall als Übergabeparameter.
Das Makro funktioniert, wenn ich bei einer Bedingung bleibe. Doch bei 2 oder mehr Bedingungen konnte ich bisher keine brauchbaren SQL-String erzeugen. Die folgenden Zeile hat einen Fehler:
Code: Alles auswählen
sSQL = "SELECT * FROM ""Kunden_Test"" WHERE ""TELEFON"" = scaller OR ""TELEFON2"" = scaller"
Ich bin über jede Hilfe dankbar.
Gruß
Peter