我想從一個表從刪除所有產品編號為TB48605的記錄.代碼如下:
private sub command1_click()
= adCmdText
Adodc1.RecordSource = "delete tempppp where strproductid='TB48605'"
adodc1.recordset.updata
end sub
程式運行完后.記錄卻沒有被刪除.
但是下面那個sql語句
delete tempppp where strproductid='TB48605 這一句在SQL Query Abaktzer里
可以刪除.
我想問一下在vb中.我想實現上面的效果要怎么寫才對?
請高手指點.

你可以這樣寫啊.

private sub command1_click() Adodc1.CommandType = adCmdText Adodc1.RecordSource = "select * from tempppp where strproductid='TB48605'" adodc1.recordset.delete

end sub

試一下啦~~~

你的SQL语句错了吧，试试这样

Private sub Command1_click() Adodc1.CommandType = adCmdText Adodc1.RecordSource = "delete from tempppp where strproductid='TB48605'" Adodc1.Refresh End Sub