asp判断后怎么把表单的值插到另外一个数据库

来源:百度知道 编辑:UC知道 时间:2024/06/30 17:47:56
<%
rget=request.Form("name")
str=("北京,武汉,重庆")
key=split(str,",")
inum=ubound(key)
for i=0 to inum
if i<=inum then
if Instr(rget, key(i))>0 then
插到数据库B 是SQL数据库 怎么实现?具体点
end if
end if
next
else
插到数据库A

1.如果A,B是同个数据库的表,那么连接数据库只要写一个就行,如下:
<%
dim conn
set conn=server.createobject("ADODB.connection")
conn.open "driver={sql server};database=数据库名;uid=用户名;pwd=密码;server=127.0.0.1;"
执行插入B的时候如下:
sql="insert into B(字段) values (所要插入得值)
conn.execute(sql)
同理,插进A的时候:
sql="insert into A(字段) values (所要插入得值)
conn.execute(sql)
2.如果A,B是两个不同的数据库,那么需要连接两次,也就是要分别连接A,B数据库.只要把上面连接数据库的代码中数据库名分别改成A,B即可.插入时候代码跟上面一样,不过插入的分别是A,B数据库的表.

是同一数据库的两个表的话:
你可以用
“插到数据库B 是SQL数据库 怎么实现?具体点”
这个地方用
sql = "Select * from B数据表 where 。。。。"

“插到数据库A”
这个地方用
sql = "Select * from A数据表 where 。。。。"

再在后面加上
Set rs = Server.CreateObject ("ADODB.Recordset")
rs.Open sql,conn,1,3
代码打开表

如果是两个数据库,你就行在加上数据库的连接代码