关于运行微信的公众平台的消息接口,收不到消息的求助
各位朋友,有人使用过微信的公众平台的消息接口吗?我使用的是asp版本的,但是就是收不到微信发过来的信息,这可能是什么原因,大家有知道的吗?

以下是我的代码。希望得到大家的帮助,谢谢!


<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
'转换时间
Function ToUnixTime(strTime, intTimeZone)
If IsEmpty(strTime) or Not IsDate(strTime) Then strTime = Now
If IsEmpty(intTimeZone) or Not isNumeric(intTimeZone) Then intTimeZone = 0
ToUnixTime = DateAdd("h",-intTimeZone,strTime)
ToUnixTime = DateDiff("s","1970-1-1 0:0:0", ToUnixTime)
End Function
   set xml_dom = Server.CreateObject("MSXML2.DOMDocument")
   xml_dom.load request   
   ToUserName=xml_dom.getelementsbytagname("ToUserName").item(0).text '微信公众号
   FromUserName=xml_dom.getelementsbytagname("FromUserName").item(0).text '用户微信
   CreateTime=xml_dom.getelementsbytagname("CreateTime").item(0).text
   MsgType=xml_dom.getelementsbytagname("MsgType").item(0).text
   content=xml_dom.getelementsbytagname("Content").item(0).text
   MsgId=xml_dom.getelementsbytagname("MsgId").item(0).text    
   temp=vbcrlf &vbcrlf &vbcrlf &"####以下内容为接收#####"&vbcrlf   
   temp=temp&"<xml>"&vbcrlf
   temp=temp&"<ToUserName><![CDATA["&ToUserName&"]]></ToUserName>"&vbcrlf   
   temp=temp&"<FromUserName><![CDATA["&FromUserName&"]]></FromUserName>"&vbcrlf 
   temp=temp&"<CreateTime>"&CreateTime&"</CreateTime>"&vbcrlf 
   temp=temp&"<MsgType><![CDATA[text]]></MsgType>"&vbcrlf
   temp=temp&"<Content><![CDATA["&content&"]]></Content>"&vbcrlf 
   temp=temp&"<MsgId>"&MsgId&"</MsgId>"&vbcrlf
   temp=temp&"</xml>"&vbcrlf&vbcrlf
   temp=temp&"####以下内容为配置接口返回内容#####"&vbcrlf   
   strsend="你好!"&content
   strresponse="<xml>"&vbcrlf
   strresponse=strresponse&"<ToUserName><![CDATA["&FromUserName&"]]></ToUserName>"&vbcrlf 
   strresponse=strresponse&"<FromUserName><![CDATA["&ToUserName&"]]></FromUserName>"&vbcrlf
   strresponse=strresponse&"<CreateTime>"&ToUnixTime(now,+8)&"</CreateTime>"&vbcrlf
   strresponse=strresponse&"<MsgType><![CDATA[text]]></MsgType>"&vbcrlf
   strresponse=strresponse&"<Content><![CDATA["&strsend&"]]></Content>"&vbcrlf
   strresponse=strresponse&"<FuncFlag>0</FuncFlag>"&vbcrlf
   strresponse=strresponse&"</xml>"
   response.write strresponse
 //以下内容为调试    
   filepath=server.mappath(".")&"\logo.txt"
   Set fso = Server.CreateObject("scripting.FileSystemObject")
   set fopen=fso.OpenTextFile(filepath, 8 ,true)
   fopen.writeline(temp&strresponse)
   set fso=nothing
   set fopen=Nothing
%>


用这段代码的时候提示
缺少对象: 'xml_dom.getelementsbytagname(...).item(...)'
怎么解决的啊!

阅读更多
想对作者说点什么? 我来说一句

微信公众平台基础接口

vvvbird vvvbird

2016-08-16 17:50:53

阅读数:1110

没有更多推荐了,返回首页

不良信息举报

关于运行微信的公众平台的消息接口,收不到消息的求助

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭