ASP中表单直接提交到数据库的代码怎么写
本人ASP中要有一个注册信息,要求直接提交后数据库中就会有提交的内容(access数据库)数据库也弄好了;提交页面搞了半天还是不行;请求高人把提交数据库的代码给我。表单主...
本人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" />
接下来该怎么写;鄙人 经常问问题;所以已经没分了;希望高手不介意 展开
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" />
接下来该怎么写;鄙人 经常问问题;所以已经没分了;希望高手不介意 展开
展开全部
首先是连接到数据库
其次是对数据的操作
最后是关闭数据库
具体例子网上很多这里我就转一个别人的:
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
其次是对数据的操作
最后是关闭数据库
具体例子网上很多这里我就转一个别人的:
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
推荐于2018-03-07
展开全部
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
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
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
建立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
<%
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
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
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
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
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用insert语句
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |