[DBNETLIB][ConnectionOpen CreateFile (PreLoginHandshake()).]Allgemeiner Netzwerkfehler - Verbindung zu SQL-Datenbank in VB-script

Ich habe ein VB-Skript, welches eine Verbindung zu einer lokalen SQL-Datenbank zum abrufen eines Werts. Die exakt gleiche script läuft auf über 100 Server, aber ein paar von den Servern, die diesen Fehler verursachen:

[DBNETLIB][ConnectionOpen CreateFile (PreLoginHandshake()).]Allgemeiner Netzwerkfehler. Überprüfen Sie Ihre Netzwerk-Dokumentation

Hier ist der code, der ausgeführt wird:

Function GetPrimaryServerID
On Error Resume Next
Set objConnection = CreateObject("ADODB.Connection")
Set objRecordSet = CreateObject("ADODB.Recordset")
objConnection.Open "Provider=SQLOLEDB;Data Source=127.0.0.1;Initial Catalog=xxx;User ID=xxx;Password=xxx"
sqlquery = "SELECT ServerID FROM tblSettings"
objRecordSet.Open sqlquery,objConnection
objRecordSet.MoveFirst
GetPrimaryServerID = objRecordSet("ServerID")
objRecordSet.Close
objConnection.Close 
End Function

Tritt der Fehler in der 5. Zeile beim öffnen des connection string. Ich bin verwirrt, warum das Skript funktioniert auf fast allen Servern und nicht, nur eine Handvoll. Die Datenbank, die Sie herstellen, identisch ist, auf jedem server in Bezug auf Struktur, nur die Daten, die sich ändern.

InformationsquelleAutor VBscripter | 2009-12-07

Schreibe einen Kommentar