扫码签到系统asp源码2.0⽰例
asp写的扫码签到系统，代码简单。
不管是⼯作会议，还是员⼯活动，每次集会基本都需要签到。传统的纸质签到效率低下，名字费时，排队费时，更可怕的是好不容易轮到了你，却发现你的名字在隔壁⼈堆⾥那张纸上。
此代代码的功能是，集会现场只需贴出⼀个⼆维码，成员打开表单扫⼀扫直接签到。提交的签到数据还可以直接⽣成报表，后期统计⼀步到位。
<% if request("action")="" then %>
<div class="content">
<div class="hy_100">
<!--start-->
<%
'查查在库中有没有
sqlfg="select * from yuyue where openid='"&newopenid&"'"
set ute (sqlfg)
if f then'已经有了
%>
<div class="hytx">
<img src="<%=rsfg("hypic")%>" width="60" height="60" border="0"> <p><%=rsfg("hyname")%></p>
<p><b>签到时间</b></p>
<p><span><%=rsfg("qd_date")%></span></p>
</div>
<% else %>
<div class="qiandao">
<form name="form1" action="?action=save" method="post">
<input name="userID" type="hidden" value="<%=newuserID%>">
<input name="wx_name" type="hidden" value="<%=newname%>">
<input name="hyname" type="hidden" value="<%=newwxname%>">
asp资讯网站源码<input name="hypic" type="hidden" value="<%=newwxpic%>">
<input name="openid" type="hidden" value="<%=newopenid%>">
<input type="submit" name="Submit" value="签到" class="bnt_save"></dl>
</form>
</div>
<%
end if
rsfg.close
set rsfg=nothing
'查有没有结束
%>
<!--end-->
</div>
</div>
<%
conn.close
set conn=nothing
%>
<% elseif request("action")="save" then%>
<%
userID=request.Form("userID")
wx_name=request.Form("wx_name")
hyname=request.Form("hyname")
hypic=request.Form("hypic")
qd_date=now()
openid=request.Form("openid")
Values = Array(userID,wx_name,hyname,hypic,qd_date,openid)
Sql = "Insert Into [yuyue](userID,wx_name,hyname,hypic,qd_date,openid) values(?,?,?,?,?,?)" call SqlHelper(Sql,Values)
conn.close
set conn=nothing
call infoopen("签到成功","index.asp")
%>
<% end if %>

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。