savecon.asp

顶级影视站ＡＳＰ源代码系统。很全面很强大。数据库用access

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="HMconnection.asp"-->
<!--#include file="webconfig.asp"-->
<%dim username
username=request.form("username")
if username="" or session("username")="" then
  response.Write("<script language='javascript'>alert('对不起，您没有登陆或网络超时！');"&_
  "history.go(-1);</script>")
else
   dim savecRS
   set savecRS=server.createobject("adodb.recordset")
   savecRS.open "select * from xufei",conn,1,3
   savecRS.addnew
   savecRS("userName")=request.form("username")
   savecRS("moneyCount")=request.form("money")
   savecRS("payway")=request.form("moneyfs")
   savecRS("userEmail")=request.form("email")
   savecRS("conWay")=request.form("qq")
   savecRS("payday")=request.form("payTime")
   savecRS.update
   savecRS.close
   set savecRS=nothing
   set conn=nothing
   response.Write("<script language='javascript'>alert('谢谢，您的续费信息已提交！\n管理员会在二十四小时作出确认，\n把续费金额加入您的帐号，谢谢支持！');"&_
  "history.go(-2);</script>")
end if
%>