Kein Load nach Openconnection möglich

04/03/2008 - 11:31 von Dana Emanniek | Report spam
Hallo Experten,

ich habe mit Hilfe des Forums eine Möglichkeit gefunden die Verbindung
meines adp-Projekts zu einer SQL2005-DB zur Laufzeit zu àndern.

Private Sub cmd_Wechsel_Click()

Verbindung "Servername", "DB-Name"

End Sub

Private Sub Verbindung(Server, Datenbank)

Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection

With cnn
.Provider = "SQLOLEDB.1"
.Properties("Data Source") = Server
.Properties("Initial Catalog") = Datenbank
.Properties("Integrated Security") = "SSPI"
End With

On Error Resume Next
CurrentProject.OpenConnection cnn.ConnectionString
Set cnn = Nothing

End Sub

Das Formular auf dem der Button ist, mit dem der Verbindungswechsel
initiiert werden kann, wird leider bei diesem Vorgang geschlossen und kann
mit Load me oder Load Name nicht wieder geladen werden. Fehlermeldung: Objekt
kann nicht ge- oder entladen werden.

Wie kann ich das Formular aber weiterhin anzeigen lassen?

Gruß Dana
 

Lesen sie die antworten

#1 Ulf Knochenhauer
04/03/2008 - 11:49 | Warnen spam
Hallo Dana,
Das Formular auf dem der Button ist, mit dem der Verbindungswechsel
initiiert werden kann, wird leider bei diesem Vorgang geschlossen und kann
mit Load me oder Load Name nicht wieder geladen werden. Fehlermeldung: Objekt
kann nicht ge- oder entladen werden.

Wie kann ich das Formular aber weiterhin anzeigen lassen?



ist das Formular ungebunden?
Grüße
Ulf

Ähnliche fragen