<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Session.CodePage=65001%>
微信客服信息发送
<%'Response.end
'微信临时二维码请求
fromusername="oAJ1cwegdmr12YVPyyM5hF1EhcOk"
access_token="83_7uOi0rqOYWNT2_wM_2k7ZwfsJ1lIInJyoa2bjYbLBP9_nd3pEz4CPW7earjSTpTQrEpdvJ5iSizOofxXlrUrv53SsdLKgfBvG2qw56HYn-GxQg9mTpWJagYR--YUNUcAIALEL"
Content="请点击收费公示"
appUrl="https://api.weixin.qq.com/cgi-bin/message/custom/send?access_token="&access_token
args1="{"
args1=args1&"""touser"":"""&fromusername&""","
args1=args1&"""msgtype"":""text"","
args1=args1&"""text"":{"
args1=args1&"""content"":"""&Content&""""
args1=args1&"}"
args1=args1&"}"
'call PostBody(appUrl,args1)
Response.Write appUrl&"
"&args1 &"
"
'Response.end
HTMLCODE= PostBody(appUrl,args1)
Response.Write HTMLCODE &"
"
%>
