你最好不要用控件的方法,应该声明变量 dim conn as new adodb.connection dim rs as new adodb.recordset conn.open "打开数据库" rs.open "表名",conn,3,1 rs.execute "DELETE FROM ts WHERE (idyh IN (SELECT idyh From yhzlb WHERE idyh = yhzlb" 这样就应该差不多了!
你不要使用控件,可以用ADO对象 dim cnn as new adodb.cnnection dim cmd as new adodb.command cnn.op "连接数据库" cmd.actingcnnection=cnn cmd.commandtext="DELETE FROM ts WHERE (idyh IN (SELECT idyh From yhzlb WHERE idyh = yhzlb" cmd.execute
dim conn as new adodb.connection
dim rs as new adodb.recordset
conn.open "打开数据库"
rs.open "表名",conn,3,1
rs.execute "DELETE FROM ts WHERE (idyh IN (SELECT idyh From yhzlb WHERE idyh = yhzlb"
这样就应该差不多了!
dim cnn as new adodb.cnnection
dim cmd as new adodb.command
cnn.op "连接数据库"
cmd.actingcnnection=cnn
cmd.commandtext="DELETE FROM ts WHERE (idyh IN (SELECT idyh From yhzlb WHERE idyh = yhzlb"
cmd.execute
在这里应该写什么?
是数据库的路径吗?
你可以将adodc控件中的“使用连接字符串”里的内容粘到这里就可以了