<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/odbc.asp"-->
|
|
<!docType html>
|
<html>
|
<head>
|
<meta http-equiv="content-type" content="text/html; charset=utf-8">
|
<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, minimum-scale=1.0, user-scalable=no" />
|
<title>微信客服信息发送</title>
|
<!--#include virtual="/inc/JsonPost.asp"-->
|
</head>
|
<body>
|
<center>
|
|
<%'Response.end
|
'微信临时二维码请求
|
fromusername="oAJ1cwegdmr12YVPyyM5hF1EhcOk"
|
access_token="83_7uOi0rqOYWNT2_wM_2k7ZwfsJ1lIInJyoa2bjYbLBP9_nd3pEz4CPW7earjSTpTQrEpdvJ5iSizOofxXlrUrv53SsdLKgfBvG2qw56HYn-GxQg9mTpWJagYR--YUNUcAIALEL"
|
Content="请点击<a href='http://11651451.s21i.faimallusr.com/2/ABUIABACGAAgtOuNpgYotpKRiwYwgCA48jY.jpg'>收费公示</a>"
|
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&"<br>"&args1 &"<br><br><br>"
|
'Response.end
|
HTMLCODE= PostBody(appUrl,args1)
|
Response.Write HTMLCODE &"<br><br>"
|
|
%>
|
</body>
|
</html>
|