Passwort-Abfrage abstellen/umgehen

[M.Z]

So, ich habe eine Lösung gefunden!!!

Code: Alles auswählen

' Passwortabfrage umgehen
sub VerbindungDatenbank
Dim DatabaseContext As Object
Dim DataSource As Object
Dim Connection As Object
DatabaseContext = createUnoService("com.sun.star.sdb.DatabaseContext")
DataSource = DatabaseContext.getByName("DBname")
DataSource.Password = "password"
If Not DataSource.IsPasswordRequired Then
Connection = DataSource.GetConnection("","")
Else
Connection = DataSource.GetConnection("user","password")
End If
end sub

Die entscheidende Zeile ist: DataSource.Password = "password"
Das ganze habe ich jetzt bei "Ansicht wurde erzeugt" eingefügt und schon kommt keine Abfrage mehr.

Danke an alle die mir geholfen haben!!!

p.s.: DIe Lösung habe ich hier gefunden: http://user.services.openoffice.org/en/ ... 20&t=10566

[MHage]

Hi,

funktioniert das nur bei ODBC oder auch bei JDBC ?


Gruß
Matze

[MHage]

Ich Antworte mir mal selbst. Leicht abgewandelt funktioniert das auch per JDBC.


Gruß
Matze

[bkleine]

hi,

schade, dass du deine leichten abwandlungen nicht gepostet hast. ich könnte das gut brauchen.

Bernhard