02
2018
11

微信公众号发送模板消息asp源码

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% 
session.codepage=936
Response.Charset = "GB2312"
%>
<!--#include file="WxApi.asp"-->
<%
url = "http://www.xxx.com"
Dim Arr(4)
Arr(0) = "first=Hi,你好!"
Arr(1) = "keyword1=FromUserName"
Arr(2) = "keyword2="&Now
Arr(3) = "keyword3="&Url
Arr(4) = "remark=这里是备注信息"
color = "#000000"
Openid = "oGYGwuNbebj21KS3ydHKH5Mj5CRs"
template_id = "0x8MfyRiJSOYBPk4qLQ6m3AGdybjmOETitix18_IiBk" 
SET Wx = New WxAPI
call Wx.SendMessage(Openid,template_id,Url,Arr,color)
Set Wx=Nothing

%>

« 上一篇下一篇 »