网页和数据库高级配置(提交网页代码)

<!--#include File="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<%
dim sql,vusname,vpassword,vsex,vnn,vyy,vrr,vdizhi,vtitle,vemail
vusname= Request("usname")
vpassword = Request("password")
vsex = Request("sex")
vnn = Request("nn")
vyy = Request("yy")
vrr = Request("rr")
vdizhi = Request("dizhi")
vtitle = Request("title")
vemail = Request("email")
sql="insert into adduser (usname,password,sex,nn,yy,rr,dizhi,title,email,addtime) values ('"&vusname &" ','"&vpassword&"','"&vsex&"','"&vnn&"','"&vyy&"','"&vrr&"','"&vdizhi&"','"&vtitle&"','"&vemail&"','"&now&"')"
set rs=Conn.execute (sql)
Conn.Close
Set Conn=Nothing
Response.Write("<script>alert('恭喜您发帖成功!');location.href='index.asp'</script>")
%>
</body>
</html>

你可能感兴趣的:(职场,休闲,(*^__^*),嘻嘻……)