微信扫码签到系统asp源码2.0示例

asp写的微信扫码签到系统，代码简单。
不管是工作会议，还是员工活动，每次集会基本都需要签到。传统的纸质签到效率低下，找名字费时，排队费时，更可怕的是好不容易轮到了你，却发现你的名字在隔壁人堆里那张纸上。
此代代码的功能是，集会现场只需贴出一个二维码，成员打开表单扫一扫直接签到。提交的签到数据还可以直接生成报表，后期统计一步到位。

<% if request("action")="" then %>

	

	
<%
'查查在库中有没有
sqlfg="select * from yuyue where openid='"&newopenid&"'"
set rsfg=conn.execute (sqlfg)
if not rsfg.eof then'已经有了
%>

	" style="border-radius:50%" width="60" height="60" border="0">
	
<%=rsfg("hyname")%>
	
签到时间
	
<%=rsfg("qd_date")%>

<% else %>










<%
end if
rsfg.close
set rsfg=nothing
'查有没有结束
%>
	
	

<%
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 %>