从VBScript连接到Sybase时出错 - 内部客户端库错误

Question

我正在编写一个连接到Sybase数据库的VBScript，从表中读取一些数据并将其存储在变量中，然后连接到MS SQL服务器并将数据插入到包含先前存储的可变数据的表中。 p>

我不确定这是否是相关信息，但由于我只有32位驱动程序用于连接Sybase ODBC，并且由于此VBScript在64位计算机上运行，​​因此我通过命令行运行它但是使用SysWoW64 cmd.exe并像这样运行它：

C:\Windows\SysWOW64>cscript C:\My\Directory\MyVBScript.vbs

我无法连接到Sybase数据库。我最初对连接字符串本身有一些问题，但这似乎已经解决了。

以下是我现在收到的错误消息，但我不知道如何通过这个消息：

  

Microsoft OLE DB Provider for ODBC Drivers：[SYBASE] [ODBC Sybase   驱动程序] [Sybase] ct_connect（）：用户api层：内部客户端库   错误：HAFAILOVER：尝试连接到服务器

---

这里是现在的脚本

Dim connStr, objConn

DataSource = "ICCM_PREVIEW"
ServerIP = "1.2.3.4"
Port = "1234" 
DBuser = "myUser" 
DBpwd = "myPassword" 
DBName = "myDatabase" 
Driver = "SYBASE ASE ODBC Driver"

connStr = ""
connStr = connStr &"Driver="& Driver &";"
connStr = connStr &"Data Source="& DataSource &";"
connStr = connStr &"Srvr="& ServerIP &","& Port &";"
connStr = connStr &"Database="& DBName &";"
connStr = connStr &"uid="& DBuser &";"
connStr = connStr &"pwd="& DBpwd &";"

Wscript.Echo connStr 

'Define object type
Set objConn = CreateObject("ADODB.Connection")

'Open Connection
objConn.open connStr

---

我在这里缺少什么？

Answer 1

参数＆＃34; Srvr＆＃34;不是有效的连接参数和＆＃34;端口＆＃34;键值对是必需的。

之前

connStr = connStr &"Srvr="& ServerIP &","& Port &";"

后

connStr = connStr &"Server="& ServerIP & ";"
connStr = connStr &"Port="& Port &";"

摘录自Microsoft's website

使用连接参数图表

  

以下是除DSN之外的连接参数列表   可以提供给ASE ODBC驱动程序的参数

摘自Adaptive Server Enterprise ODBC Driver by Sybase

的用户指南