Question

ASP中表单直接提交到数据库的代码怎么写

本人ASP中要有一个注册信息，要求直接提交后数据库中就会有提交的内容（access数据库）数据库也弄好了；提交页面搞了半天还是不行；请求高人把提交数据库的代码给我。表单主要代码如下
form id="form1" name="form1" method="post" action="execute.asp">
<table width="610" height="206" border="0" align="center">
<tr>
<td height="60" colspan="2" bgcolor="#FFFFFF"><div align="center" class="STYLE1">注册信息必填</div></td>
</tr>
<tr>
<td width="106" bgcolor="#FFFFCC">学号</td>
<td width="494" bgcolor="#FFFFCC"><label for="textfield"></label>
<input type="text" name="textfield" id="textfield" /></td>
</tr>
<tr>
<td>性别</td>
<td><input type="radio" name="radiobutton" value="radiobutton" id="radiobutton" />
<label for="radiobutton">男
<input type="radio" name="radiobutton" value="radiobutton" id="radio" />
女</label></td>
</tr>
<tr>
<td bgcolor="#FFFFCC">姓名</td>
<td bgcolor="#FFFFCC"><label for="label"></label>
<input type="text" name="textfield2" id="label" /></td>
</tr>
<tr>
<td>班级</td>
<td><label for="label2"></label>
<input type="text" name="textfield3" id="label2" /></td>
</tr>
</table>
<p align="center">
<label for="Submit"></label>
<input type="submit" name="Submit" value="提交" id="Submit" />
<input type="reset" name="reset" value="取消" id="Submit" />
接下来该怎么写；鄙人 经常问问题；所以已经没分了；希望高手不介意

Answer 1

首先是连接到数据库
其次是对数据的操作
最后是关闭数据库

具体例子网上很多这里我就转一个别人的：

sqlstr="select * from message" ---- >(message为数据库中的一个数据表，即你要显示的
数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---- >(表示打开数据库的方式) rs.addnew 新增加一条记录
rs("name")="xx" 将xx的值传给name字段 rs.update 刷新数据库
------------------------------------------------------ rs.close
conn.close 这几句是用来关闭数据库 set rs=nothing set conn=nothing
------------------------------------------------------- % >
.<4 >删除一条记录
删除数据库记录主要用到rs.delete,rs.update
< !--#include file=conn.asp-- > (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据 库) < %
dim name name="xx"
set rs=server.CreateObject("adodb.recordset") (建立recordset对象)
sqlstr="select * from message" ---- >(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---- >(表示打开数据库的方式) ------------------------------------------------------- while not rs.eof
if rs.("name")=name then rs.delete
rs.update 查询数据表中的name字段的值是否等于变量name的值"xx"，如果符合就执行删 除，
else 否则继续查询,直到指针到末尾为止 rs.movenext emd if wend
------------------------------------------------------ ------------------------------------------------------ rs.close
conn.close 这几句是用来关闭数据库 set rs=nothing set conn=nothing
------------------------------------------------------- % >

http://wenku.baidu.com/link?url=vya_shXfg3kgqbPvq-SfsIoAV7qZaf9XY2RsOQOCpwrt1Pr1yHMFKtQYnCgu8ExK0H-9LsgXWUpQ7FmEuN_a95gWD0cChMqPneQFyaHVgMK

Answer 2

Set conn = server.CreateObject("ADODB.Connection")
connstr = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("你的数据库")
conn.open connstr
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from 表格"
rs.open sql,Conn,1,3
rs.addnew
rs("radiobutton")=Request.Form("radiobutton")
rs("textfield2")=Request.Form("textfield2")
rs("textfield3")=Request.Form("textfield3")
rs.Update
rs.Close
Set rs = Nothing

Answer 3

建立execute.asp页面，内容如下
<%
Set conn = server.CreateObject("ADODB.Connection")
connstr = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("数据库名")
conn.open connstr
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from 表格"
rs.open sql,Conn,1,3
rs.addnew
rs("radiobutton")=Request.Form("radiobutton")
...
...
...
rs.Update
rs.Close
response.write"ok"
Set rs = Nothing

Answer 4

Set rs = Server.CreateObject("ADODB.RecordSet")
rs.open "select * from name",conn,1,3
rs.addnew
rs("name")=name
rs("age")=age
rs.update '加个更新
set rs=nothing
conn.close
set rs=nothing
%>
好像没有 rs.update

Answer 5

用insert语句