[VB] ADODB.Connection ueber TCP/IP?
WebViper
- sonstiges
Hi,
ich weiss, dass dieses Thema nicht wirklich hingehoert, aber ich kenne kein Forum in dem ich bisher so kompetente Antworten bekommen hab.
Ich hab da folgendes Problem:
Ich baue in einem VB-Script eine DB-Verbindung auf. Standardmaessig kommuniziert mein Script dann ja ueber namedpipes.
Mir waer aber TCP/IP aus diversen Gruenden lieber!
Wie kann ich das umstellen? Ich weiss, dass es geht, aber nicht wie.
Danke fuer die Hilfe!!!
--------------------------------------------------------------------
Function ConnectToDB() As Boolean
On Error GoTo ErrHandler
Set Connection = CreateObject("ADODB.Connection")
With Connection
.ConnectionString = _
"Provider=" & sProvider & _
";Server=" & sHostName & _
";Database=" & sDbName & _
";UID=" & sUserName & _
";PWD=" & sPassWord & ";"
.Open
End With
ConnectToDB = True
Exit Function
ErrHandler:
MsgBox Err.Description, vbCritical, "Sub_ConnectToDb"
ConnectToDB = False
End Function
--------------------------------------------------------------------
mfg
-WebViper-