这是一个客户找我定制开发的，该客要开一个展会，需要在入场时吸粉，让想进展会的用户扫码关注公众号，然后点报名，提交姓名电话后，生成入场券，然后管理员审核是否同意入场；

管理员可以扫码审核，也可以在手机端直接审核，不扫码也可以，想高大尚就扫码，想快捷就直接在管理员手机上点同意进场，用户就会收到一条通知，同意他入场的通知。

代码是用的asp编号的，也算是asp微信展会报名签到系统源码中的首份吧，现在免费提供用户下载：

asp实现单行代码更新数据库里的内容某个字段人民币钱充值或扣费计算费用金额

asp参数化单行通过传值参数得到某字段内容

昨天帮一个客户写的，他的程序是老的asp，想实现微信在手机上下单付款，让帮忙给写一份asp微信支付的接口代码，昨天晚上闲着没事，搞了一个晚上才搞好，其实asp支付并不需要安装证书，其实asp支付也很好用，微信对asp的支持还是有的，回调入库等都很完善，不说了，上代码：

证书文件post_url.aspx和post_url.aspx.cs源码下载

很多朋友在网上找的asp支付代码中都没有这两个证书文件，只能是用别人的，但是如果别人把他的网站这个文件删了，你的支付也就不能用了，今天我就把大家需要的这两个asp微信支付代码证书文件post_url.aspx和post_url.aspx.cs源码发布到网上来，有需要的可以下载使用：

asp从表中读出数据，然后生成数组

<%

Do While Not rszdpm80.EOF

%>

<%

if rszdpm80.EOF then

zdpmid = zdpmid & cint(rszdpm80("hyid"))

else

zdpmid = zdpmid & cint(rszdpm80("hyid")) & ","

<div align="center"><%if rs("p_PicList")<>"" then%>

<%

mystr=rs("p_PicList")

<% if isnull(rslm("weburl")) or isempty(rslm("weburl")) or rslm("weburl")="" then %>

判断字符型字段是不是空的

<%

css = "class='cur'"

打开表语句放在这

Do While Not rs.EOF

Response.write("<li "&css&"><a href='h.asp'>"&rs("class")&"</a></li>")

<%

set rsM=createobject("adodb.recordset")

rsM.open "select count(*) as total from scunews where reference='"&name1&"' ",cn,1,1

if not rsM.eof then

numM=rsM("total")

app下载在微信中设置在浏览器中打开APP下载链接

看这个效果：如果在微信中想下载，就提示让他到浏览器中下载，因为他是判断浏览器类型的

http://caibaojian.com/demo/2015/3/register/success.html