public nd as adodb.connection
public rs as adodb.recordset
nd.open("mydata")
rs.open "select * from user where riqi=date ()",nd,adopenstatic,adlockoptimistic,adcmdtext
private sub cmd1_click()
rs.delete adaffecall 这句删除整个记录集时出错,提示3219,操作
在该内容中不被允许。
换成rs.delete 删除单个记录时可以。望高手解答。谢!
end sub
"DELETE FROM USER WHERE riqi=" & date() & ""