ODBC 連SQLITE
func connDBsqlite($oS)
$ado = ObjCreate("ADODB.Connection") ;'建立一個連線
$ado.open ( "DRIVER={SQLite3 ODBC Driver};Database="&$oS)
WinSetTitle("[CLASS:AutoIt v3 GUI;Title:SQL查詢]", "", "SQL查詢 " & $oS)
EndFunc
原來就這樣就好了
ODBC 連ORACLE
Func connDB($oS, $UR, $PD) ; 連結db的東西
$ado = ObjCreate("ADODB.Connection") ; Create a COM ADODB Object with the Beta version
$ado.ConnectionString = ("Provider=MSDAORA.1;Data Source='" & $oS & "';User Id= '" & $UR & "'; Password='" & $PD & "';")
$ado.Open
WinSetTitle("[CLASS:AutoIt v3 GUI;Title:SQL查詢]", "", "SQL查詢 " & $oS)
EndFunc ;==>connDB
沒有留言:
張貼留言