sol13-14.vbs

来自「Apress - Managing Enterprise Systems Wit」· VBS 代码 · 共 8 行

Set objConn = CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\data\Access\Samples\Northwind.mdb"
Set objRst = CreateObject("ADODB.Recordset")
'open the Products table and delete a record
    objRst.Open "Products", objConn, adOpenForwardOnly, adLockOptimistic
objRst.Delete
objRst.Close