找回密码
 加入
搜索
查看: 1451|回复: 2

[AU3基础] autoit如何调用hsql

[复制链接]
发表于 2013-4-8 11:19:29 | 显示全部楼层 |阅读模式
我想打开一个hsql的数据库得到里面的内容,请问如何打开,对数据库操作一无所知啊
 楼主| 发表于 2013-4-8 11:19:45 | 显示全部楼层
在线等,有人知道吗
发表于 2013-4-8 11:26:41 | 显示全部楼层
回复 2# sbtddh
没用过Hsql
但我想原理应该都差不多:
我贴一下连MYsql的样式等你参考一下:
Func _MySQLConnect($sUsername, $sPassword, $sDatabase, $sServer, $sDriver = "{MySQL ODBC 5.2w Driver}", $iPort=3306)
        Local $v = StringMid($sDriver, 2, StringLen($sDriver) - 2)
        Local $key = "HKLM\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers", $val = RegRead($key, $v)
        If @error or $val = "" Then
                SetError(2)
                TrayTip ("Message","连接失败,没有找到驱动",30)
                Sleep(1000)
                Return 0
        EndIf
        $ObjConn = ObjCreate("ADODB.Connection")
        $Objconn.open ("DRIVER=" & $sDriver & ";SERVER=" & $sServer & ";DATABASE=" & $sDatabase & ";UID=" & $sUsername & ";PWD=" & $sPassword & ";PORT="&$iPort)
        If @error Then
                SetError(1)
                TrayTip ("Message","连接失败",30)
                Sleep(1000)
                Return 0
        Else
                TrayTip ("Message","连接成功",30)
                Sleep(1000)
                Return $ObjConn
        EndIf
EndFunc   ;==>_MySQLConnect
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-6-1 19:10 , Processed in 0.074637 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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