关于ASP SQL 同时打开2个表 高手进啊

来源:百度知道 编辑:UC知道 时间:2024/05/22 16:57:34
以下是我打开一个表的 代码:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="Conn/Conn.asp"-->
<%
no=Request.Form("no")
barcode=Request.Form("barcode")
layflat=Request.Form("layflat")
time1=Request.Form("time")
item_no=Request.Form("item_no")
width=Request.Form("width")
thichness=Request.Form("thichness")
remark=Request.Form("remark")
dryer_dew_point=Request.Form("dryer_dew_point")
If no<>"" Then
On error Resume Next '设置错误陷阱
Set rs=Server.CreateObject("ADODB.RecordSet")
SQL1="Select * From basic Where no='"&no&"'"
rs.Open SQL1,Conn,1,3
If rs.BOF and rs.Eof Then '判断用户是否存在
SQL="Insert Into

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="Conn/Conn.asp"-->
<%
no=Request.Form("no")
barcode=Request.Form("barcode")
layflat=Request.Form("layflat")
time1=Request.Form("time")
item_no=Request.Form("item_no")
width=Request.Form("width")
thichness=Request.Form("thichness")
remark=Request.Form("remark")
dryer_dew_point=Request.Form("dryer_dew_point")
If no<>"" Then
On error Resume Next '设置错误陷阱
Set rs=Server.CreateObject("ADODB.RecordSet")
SQL1="Select * From basic Where no='"&no&"'"
rs.Open SQL1,Conn,1,3
If rs.BOF and rs.Eof Then '判断用户是否存在
SQL="Insert Into basic (no