arkadiuszpaluszek hat geschrieben:Nun würde ich die Zeile in welcher das angegeben ist (also die markierte Zeile) gerne mit einem Code ersetzen, welcher der Datenbank einfach das Passwort mitteilt und verbindet, ohne dass ich es jedes mal manuell machen muss. Wie kann man sowas machen?
Vermutlich so, wie es im
StarOffice 8 Programming Guide for BASIC - Chapter 10 Database Access im Abschnitt
Data Sources steht:
Code: Alles auswählen
Dim DatabaseContext As Object
Dim DataSource As Object
Dim Connection As Object
Dim InteractionHandler as Object
DatabaseContext = createUnoService("com.sun.star.sdb.DatabaseContext")
DataSource = DatabaseContext.getByName("Customers")
If Not DataSource.IsPasswordRequired Then
Connection = DataSource.GetConnection("","")
Else
InteractionHandler = createUnoService("com.sun.star.sdb.InteractionHandler")
Connection = DataSource.ConnectWithCompletion(InteractionHandler)
End If
Für dich ist hier eigentlich nur die Zeile
Connection = DataSource.GetConnection("","") interessant, denn du willst ja gerade keine interaktive Abfrage bei deiner Passwort geschützten MySQL-Datenbank.
StarOffice 8 Programming Guide for BASIC hat geschrieben:... it creates the database connection required using the GetConnection call. The two empty strings in the command line stand for the user name and password.
Vermutlich kann man die leeren Zeichenketten in
DataSource.GetConnection("","") auch mit Username und Passwort befüllen und sich so ohne Interaktion an der Datenbank anmelden:
DataSource.GetConnection("MY_USER_NAME","MY_PASSWORD")
So steht es zumindest auch in der
IDL reference.
