（新手求助）ASP中比较二服务器表1和表2中的数据差异，删除表1中多于表2的数 ...

[复制链接]

黑侠

电梯直达

1^#

发表于 2010-1-11 01:44:36 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

<%set conn1=server.createobject("adodb.connection")
strConn1 = "Provider=Sqloledb;User ID=sa;Password=123;Initial Catalog=web;Data Source=(local)"
Conn1.open strConn1
set rs1=server.createobject("adodb.recordset")
rs1.open "Select * From 表1",Conn,0,1

t1=rs1("name")
do while not rs1.eof
%> <%
set conn2=server.createobject("adodb.connection")
strConn2 = "Provider=Sqloledb;User ID=sa;Password=123;Initial Catalog=web;Data Source=192.168.0.1"
Conn2.open strConn2
set rs2=server.createobject("adodb.recordset")
rs2.Open "Select * from 表2 where name='"&t1&"'",conn2,1,1

if rs2.eof then
   conn1.Execute("delete 表1 where name='"&t1&"'")
   end if
   ors.MoveNext
loop

rs1.close
set rs1=nothing


%>
大概就是这样：我想本机数据库中的，表1中name字断依依在另台服务器上表2中查询是否有此数据，如果没有那就删除表1中的数据！！！！
我上面的代码无报错，但无效果，请高手指点下

收藏0

使用道具举报

√死胖子

2^#

发表于 2010-1-11 01:44:39 | 只看该作者

<%
set conn1=server.createobject("adodb.connection")
strConn1 = "Provider=Sqloledb;User ID=sa;Password=123;Initial Catalog=web;Data Source=(local)"
Conn1.open strConn1
set conn2=server.createobject("adodb.connection")
strConn2 = "Provider=Sqloledb;User ID=sa;Password=123;Initial Catalog=web;Data Source=192.168.0.1"
Conn2.open strConn2
set rs1=server.createobject("adodb.recordset")
rs1.open "Select * From 表1",Conn1,0,1
do while not rs1.eof
t1=rs1("name")
set rs2=server.createobject("adodb.recordset")
rs2.Open "Select * from 表2 where name='"&t1&"'",Conn2,1,1
if Not rs2.eof then
   conn1.Execute("delete 表1 where name='"&t1&"'")
end if
rs1.MoveNext
loop

rs1.close
set rs1=nothing
%>

回复支持反对

使用道具举报

返回列表

		自动登录	找回密码
密码			注册

（新手求助）ASP中比较二服务器表1和表2中的数据差异，删除表1中多于表2的数 ...

浏览过的版块