<form name="form1" method="post" action="">
<p>
姓名<input type="text" name="name">
</p>
<p>
地址<input type="text" name="address">
</p>
<p>
e-mail<input type="text" name="email">
</p>
<p>
<input type="submit" name="Submit" value="提交">
</p>
</form>
<%
if request("submit")="提交" then
if request.form("name")=""or request.form("address")=""or request.form("email")="" then
response.Write"<script>alert('资料填写不完整,请重新输入!');history.back();</script>"
response.end
else
set conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver(*.mdb)};dbq="&server.mappath("数据库.mdb")
name=request.form("name")
address=request.form("address")
email=request.form("email")
exec="insert into 表(name,address,email)values('"+name+"','"+address+"','"+email+"')"
conn.execute exec
conn.close
set conn=nothing
response.Write"<script>alert('信息添加成功');history.back();</script>"'history.back();表示刷新
response.end
end if
end if
%>

 

 

 posted on 2010-05-26 11:47  xiyyang  阅读(811)  评论(0编辑  收藏  举报