以下是我寫的刪除SQL2005數(shù)據(jù)庫數(shù)據(jù)的一點VBS腳本，想請教一下怎么我腳本執(zhí)行到Set objRst=CreateObject("ADODB.Recordset")這句后面，objRst.Open strSql,objCon這句就執(zhí)行不了，我看不出來到底哪出錯？請幫幫我看看到底腳本是哪出錯？
Sub OnClick(Byval Item)                                                                
Dim objcon
Dim strCon,strSql
Dim b
Dim objRst
Set objCon=CreateObject("ADODB.Connection")
strCon="DRIVER={SQL Server};SERVER=.Wincc;DATABASE=Test"
objCon.ConnectionString=strCon
objCon.Open
strSql="Select*Form yy order by 編號desc "
Set objRst=CreateObject("ADODB.Recordset")
objRst.Open strSql,objCon
objRst.CursorLocation = adUseClient
        objRst.MoveFirst
        Dim temp1,temp2 
        temp1= objRst(0)
        objRst.MoveLast
        temp2 = objRst(0)
        temp1 = temp1- 20
        If temp1 <>temp2 Then
        Dim temps
        temps = "delete * from yy where 編號<" &temp1
       Set objRst = objCon.Execute(temps)
        End If
        Set objRst=Nothing
        Set objCon=Nothing
End Sub

佳答案

1，在SQL中，建立、修改和刪除數(shù)據(jù)庫中基本表結(jié)構(gòu)的命令分別為
UPDATE --更新數(shù)據(jù)庫表中的數(shù)據(jù)(修改) 
DELETE --從數(shù)據(jù)庫表中刪除數(shù)據(jù)行 
CREATE TABLE --創(chuàng)建一個數(shù)據(jù)庫表 
ALTER TABLE --修改數(shù)據(jù)庫表結(jié)構(gòu) 
DROP TABLE --從數(shù)據(jù)庫中刪除表
--插入數(shù)據(jù) 
insert   [MDB]...[A] 
select   3, ""C "" 

--刪除數(shù)據(jù) 
delete   from   [MDB]...[A] 
2，轉(zhuǎn)載一個寫數(shù)據(jù)的例子，參考：
在WINCC中用VBS腳本向SQL數(shù)據(jù)庫循環(huán)寫數(shù)據(jù)
按鈕腳本如下
Dim DM
Dim SDZL,SJZL
Dim database,server,uid,pwd
Dim stren,cn,is_sql
database=PL
server=PCWINCC
uid=sa
pwd=123
stren=provider = SQLOLEDB.1;DRIVER = SQL SERVER;SERVER=&SERVER&_
;DATABASE=&DATABASE&;UID=&uid&;pwd=&pwd
Set cn = CreateObject(adodb.connection)
cn.connectionstring = stren
cn.open
Dim i
For i=0 To 12
Dim field1,field2,field3
field1=T1_ & i
field2=T2_ & i
field3=T3_ & i
Set DM=HMIRuntime.Tags (field1)
DM.READ
Set SDZL=HMIRuntime.Tags (field2)
SDZL.READ
Set SJZL=HMIRuntime.Tags (field3)
SJZL.READ
is_sql=insert into ONE(DM,SDZL,SJZL) values(&DM.value&,&SDZL.value&,&SJZL.value&)
cn.execute(is_sql)
Next
cn.close