找回密码
 加入
搜索
查看: 8090|回复: 4

[系统综合] win7 64 ODBC连接oracle数据库的问题

[复制链接]
发表于 2013-2-14 08:11:54 | 显示全部楼层 |阅读模式
win7 32位没问题可以运行,win7 64位就报错,我查了一下,应该是ODBC的问题
有没有谁有win7 64位下用ODBC连接ORACLE数据库的经验,帮忙分享一下,谢了!

#include <Array.au3>
#include <GUIConstantsEx.au3>
#include <CoProc.au3>

Dim $oMyError = ObjEvent("AutoIt.Error", "ComError")
Dim $RecordNum


Dim $objConnection, $TableContents, $QueryCode
Dim $aResult
Dim $UserName = "operate"
Dim $Password = "operate"
Dim $Database = "DCMDB"
Dim $DBServerName = "SZDPDCM.SUZ.COM"
Dim $Driver = "{Microsoft ODBC for Oracle}"
Dim $Port = 1521

Dim $Table_SICAttr = "dcc.SI_Attr"
Dim $Table_SICCONTROL = "dcc.si_cont"

Dim $DSN = "DRIVER=" & $Driver & "; " & _
                "CONNECTSTRING=(DESCRIPTION=" & _
                "(ADDRESS=(PROTOCOL=TCP)" & _
                "(HOST=" & $DBServerName & ")(PORT=" & $Port & "))" & _
                "(CONNECT_DATA=(SID=" & $Database & "))); uid=" & $UserName & ";pwd=" & $Password & ";"



While 1

        $objConnection = ObjCreate("ADODB.Connection")
        $objConnection.open($DSN)
        $QueryCode = "select count(*) from " & $Table_SICCONTROL
        $TableContents = $objConnection.Execute($QueryCode)
        $aResult = $TableContents.GetRows()
        $RecordNum = $aResult[0][0]
        MsgBox(0,"all","$RecordNum")
        $objConnection.close()
                                       
       
WEnd
 楼主| 发表于 2013-2-14 08:14:22 | 显示全部楼层
关键是autoit在win7 64位下怎么通过odbc连接oracle数据库
发表于 2013-2-15 12:02:19 | 显示全部楼层
本帖最后由 wsfda 于 2013-2-15 12:03 编辑

win7 x64 ODBC连接mysql正在使用,没有问题,ORACLE没有测试
期待楼主出UDF
发表于 2013-2-16 10:50:49 | 显示全部楼层
到目前为止,Oracle数据从来都没有连上过,不管是xp,win7 x86/x64.
哎~~~~~
发表于 2013-2-16 23:17:11 | 显示全部楼层
LZ啊,你那个代码我看的都替数据库难过啊
竟然是死循环里连接数据库啊,你要要连几千万次啊?
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-23 17:12 , Processed in 0.077240 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表