UC知道在ASP中怎么对查询到的数据进行修改
来源：百度知道 编辑：UC知道 时间：2024/06/09 13:40:09
我做了一个查询的页面
现在怎么样才可以对查询到的数据进行修改并且保存
<%
OrderNum=Request.form("vip_Id")
IF Session("UserName")="" Then
response.redirect "server.asp"
Else
set Rs =Server.CreateObject("Adodb.RecordSet")
sql="select khmc,dh,hyljjfz,viph,csrq from khda where viph='01"&OrderNum&"'"
Rs.Open SQL,Conn,1,1,&H0001
IF rs.RecordCount >=1 then
%>
<body>
<br> <div align="center">
<center>
<table width="560" border="0" cellpadding="2" cellspacing="1" bgcolor="ECF5FF" class="table_southidc">
<TR align=center class='title'>
<TD class="back_southidc" height=25 colSpan=2><b>修改注册用户信息</b></TD>
</TR>
<TR class="tdbg" >
<TD width="120&
现在怎么样才可以对查询到的数据进行修改并且保存
<%
OrderNum=Request.form("vip_Id")
IF Session("UserName")="" Then
response.redirect "server.asp"
Else
set Rs =Server.CreateObject("Adodb.RecordSet")
sql="select khmc,dh,hyljjfz,viph,csrq from khda where viph='01"&OrderNum&"'"
Rs.Open SQL,Conn,1,1,&H0001
IF rs.RecordCount >=1 then
%>
<body>
<br> <div align="center">
<center>
<table width="560" border="0" cellpadding="2" cellspacing="1" bgcolor="ECF5FF" class="table_southidc">
<TR align=center class='title'>
<TD class="back_southidc" height=25 colSpan=2><b>修改注册用户信息</b></TD>
</TR>
<TR class="tdbg" >
<TD width="120&
sql="select * from khda where viph='01"&OrderNum&"'"
数据连接页
conn.asp
<%
dim conn,mdbfile
mdbfile=server.mappath("db1.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&mdbfile
%>
添加数据页
Add.asp
<form name="form1" method="post" action="Save.asp">
<p>
<input name="xingming" type="text" id="xingming">
</p>
<p>
<input name="xingbie" type="text" id="xingbie">
</p><input name="" type="submit" value="提交">
<input type="reset" name="Submit" value="重置">
</form>
保存数据页
Save.asp
<!--#include file="Conn.asp&q