下面是asp表单内容提交数据库的具体代码:
a.asp
<form action="b.asp">
<input name="text" type="text" value="要传的值"/>
<input type="submit" name="Submit" value="提交">
</form>
b.asp
<%
response.Write(request.Form("text"))
%>
<form action="c.asp">
<input name="text1" type="text" value="<% =request.Form("text")%>"/>
<input type="submit" name="Submit" value="提交">
</form>
c.asp
<%
dim conn,dbpath,rs
set conn=server.CreateObject("adodb.connection")
dbpath=server.MapPath("数据库名")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("adodb.recordset")
rs.cursortype=1
rs.locktype=3
rs.open"select* from 表",conn
rs.addnew
rs("字段名")=request.Form("text1")
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
%><%
dim conn,dbpath,rs
set conn=server.CreateObject("adodb.connection")
dbpath=server.MapPath("数据库名")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("adodb.recordset")
rs.cursortype=1
rs.locktype=3
rs.open"select* from 表",conn
rs.addnew
rs("字段名")=request.Form("text1")
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
%>