saveadd.asp

一个非常好的旅游网站程序.

<!--#include file="conn.asp"-->
<% if request("webname")="" or request("url")="" or request("name")="" or request("pwd")="" or request("intro")="" then
response.write("<script language=""JavaScript"">alert(""请填写完整信息！"");history.go(-1)</script>")
response.end
end if %>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From data",conn,1,3
rs.addnew
rs("webname")=request("webname")
rs("url")=request("url")
rs("logo")=request("logo")
rs("name")=request("name")
rs("pwd")=request("pwd")
rs("qq")=request("qq")
rs("mail")=request("mail")
rs("tel")=request("tel")
rs("vouch")=request("vouch")
rs("t_id")=request("t_id")
rs("a_id")=request("a_id")
rs("c_id")=request("c_id")
rs("intro")=request("intro")
rs.update
response.redirect "readme.htm"%>