目前想要使用wincc远程读取ORACLE数据库中的数据,在桌面上运行VB脚本可以远程访问到数据库,移植到wincc中就连接不上。运行到con.open那一行就不在运行了。连接代码如下,在wincc上可以显示准备连接,无法显示con状态。分别用两台虚拟机测试安装32位和64位的ORACLE都同样连接不上,请各位专家指点
Dim con
Dim strcon
Dim rs
Dim sql
Set con=CreateObject("ADODB.connection")
strcon="Driver={Oracle in OraDb10g_home1};DBQ=Y1;UID=HX;PWD=Hxjg_20230111"
con.connectionstring=strcon
con.CursorLocation=3
MsgBox "准备连接"
con.open strcon
MsgBox con.STATE