<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from tb"
rs.open sql,conn,1,3
rs.addnew
'上面是打开数据表tb,并新建一个插入记录
'我只以前几项数据来说明,其它数据一样用法
,下面用Request.form方法接收上面所说的表单提交过来的数据 name 为 "name" (两个name不要搞混了。)把接收到的数据赋值给t_name
t_name=Request.form("name")
t_pasw1=Request.form("pasw1")
t_pasw2=Request.form("pasw2")
t_email=Request.form("t_email")
……
'依此类推,格式完全一样。这里要对两个密码进行比较,如果不一样得返回提交表单,这个就不细说了。如果两次输入密码一样,则任意保存一个为密码即可。
然后将t_name赋值给新数据集里的t_name项。
rs.t_name=t_name
rs.t_pasw1=t_pasw1
'其实数据表里只需要一条密码项,在保存的时候对两次密码进行判断后保存一个即可。
rs.t_email=t_email
……
'然后对所有的数据赋集写入数据表,用update
rs.update
rs.close
response.write "保存成功!"
%>
这是最基本最简单的,完善的情况还应该涉及到对数据类型的判断,长度的判断等。
嘿嘿,你基本的 *** 作知识都没有嘛!帮你写下吧,连注释都给你带上。首先,请修改原来的HTML代码,在“<table width="600" border="0" align="center">”下方位置加上“<form method="POST" action="脚本文件.asp?action=send" name=frmAnnounce>”;然后在"</table>"上方加上“</form>”,以下是“脚本文件.asp”的主要代码:
'数据库连接语句,这里略,自己去帖上去吧
Dim Name '申明姓名变量
Name=Reques.Form("wenbenkuang1") '变量赋值,从POST表单中取得
Name=Replace(Name,"'","") '简单的替换
Dim rs,sql,NewsId '申明变量
set rs=server.createobject("adodb.recordset") 'adodb对象
sql="select * from 表名 where Id is null" 'SQL查询更新方式 *** 作语句
rs.open sql,Conn,1,3 '执行SQL
rs.addnew '以“addnew”模式增加新记录,对于初学着是很好的模式
rs("Name")=Name '对应变量
rs.update '更新增加的记录
Id=rs(0) '立刻返回新增记录的ID号
rs.close:set rs=nothing '释放adodb对象
这些值是填到了表单里的,点保存就相当于提交表单的submin那个东西
提交到用于计算和保存的jsp页面之后,那个页面接收表单传过来的值,然后计算得出结果。
剩下的就是jsp的数据库 *** 作部分了。获取数据库连接,创建语句对象,执行sql语句,返回结果。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)