WSH開啟MDB資料庫


Tek 發表



開資料庫通常都只會在寫Server-Side程式才會看到,但別忘了一般Script也是做的到... 當然,絕對包括WSH•

Windows Script Host 開啟MDB資料庫

檔案、資料庫位置:
C:\dbconn\dbconn.vbs
C:\dbconn\test.mdb

資料庫編輯:
file name: test.mdb
file path: C:\dbconn\test.mdb
table name: data
column:
id - autonumber
name - text

'///////////////////////////
'coded by Tek
'cx@ms74.url.com.tw
'purpose:
'open MDB database
'//////////////////////////
on error resume next
'Declare all the variables
Dim objconn, rs
'open database connection
set objconn = wscript.createobject("adodb.connection")
'open ActiveX Data Object recordset
set rs = wscript.createobject("adodb.recordset")
'declare driver and the database path
objconn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=C:\dbconn\test.mdb"
rs.open "Select *from [data] order by id desc",objconn,1,3
'Detect error numbers
If err.number <> 0 Then
Msgbox err.source & err.description,16,err.source & "發生錯誤"
wscript.quit 'Close the program
End If
'output the first data
wscript.echo rs("name") & ":" & rs("content")
'terminate the objects
rs.close
objconn.close
set rs = Nothing
set objconn = Nothing
'Please make sure your number of seconds setting is at least 30 or more

最後更新日期: 9/5/2002 9:53:13 AM