基本信息

---

下载

   友情提示：（无需注册或充值，赞助后即可获取资源下载链接）

---

     嘿，亲！知识可是无价之宝呢，但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下，绝对物超所值哦！如有下载和支付问题，请联系我们QQ(微信同号)：813200300

本次赞助数额为： 8 元　

支付宝支付

微信支付

   源码介绍

---

  简单好用的移动端ASP报名系统，有成功提示，重复手机号不保存

  专业级UI，非常漂亮！

 

<%@ Codepage=65001%>  
<%Response.CodePage=65001%>  
<%Response.Charset="UTF-8"%>

<!-- #include file="connexpo.asp" -->

<%
if Request("reg_phone") = "" then 
response.write"<script language=JavaScript>" & chr(13) & "alert('Wrong Infomation！');" & "top.location.href = 'RegTo.asp'"&" </script>"
response.end
end if
%>

<%
reg_name=Request("reg_name")
reg_phone=Request("reg_phone")
reg_type=Request("reg_type")
addtime=Now()

set rsst=server.createobject("adodb.recordset")
sqlst="select * from oscshop_zexpo_reg where reg_phone='"&reg_phone&"'"
rsst.cursorlocation=3
rsst.Open sqlst,conn,1,3
if rsst.EOF or rsst.bof then
rsst.AddNew
  rsst("reg_name")=reg_name
  rsst("reg_phone")=reg_phone
  rsst("reg_type")=reg_type
  rsst("reg_time")=toUnixTime(addtime, 8)
rsst.Update
    Session("reg_name")=Request("reg_name")
    Session("reg_phone")=Request("reg_phone")
    response.write "<script language=JavaScript>" & chr(13) & "alert('Thanks for Registering!');" & "window.location.href = 'Register.asp'" & "</script>"
response.End
Else
    response.write "<script language=JavaScript>" & chr(13) & "window.location.href = 'Register.asp'" & "</script>"
End If
rsst.Close
set connst=Nothing
%>