當前位置:名人名言大全網 - 端午節短信 - 微信開發者對接ASP代碼

微信開發者對接ASP代碼

不要聽不會胡說八道的人。

所謂接口就是任何語言都可以調用。不僅僅是PHP可以使用。

我只能說有些人技術不夠或者懶得做。我的微信官方賬號是用ASP做的界面。給妳壹個簡單的參考:

& lt% @ Language =“VBScript“?code page =“65001“% & gt;

& lt%

ASP文件以UTF 8格式保存,否則可能會出現亂碼。

'====================================

這兩行代碼用於通過微信令牌接口進行初始驗證。驗證後將不會使用它們。

回復。寫?請求(“echostr”)

響應。結束

'====================================

暗淡?“簽名”微信加密簽名

暗淡?“時間戳”時間戳

暗淡?隨機數隨機數

暗淡?Echostr隨機字符串

暗淡?代幣

暗淡?signature temp

token =“myweixincode“““妳在後臺寫的?代幣

簽名?=?請求(“簽名”)

現在呢。=?請求(“現時”)

時間戳?=?請求(“時間戳”)

暗淡?“ToUserName”開發者微信號

暗淡?發件人帳戶(壹個OpenID)

暗淡?“創建時間”消息創建時間(整數)

暗淡?“MsgType”文本

暗淡?“WxCont”消息內容

暗淡?“MsgId”消息Id,64位整數

Sub?getMSG()

開?錯誤?簡歷?然後

呃。清除

設置?xDom?=?這裏根據您的實際服務器情況重寫了server . createobject(“MSXML 2 . DOM document“)。

xDom.load?請求

touser name = xdom . getelementsbytagname(“touser name“)。項目(0)。文本

from username = xdom . getelementsbytagname(“from username“)。項目(0)。文本

msg type = xdom . getelementsbytagname(“msg type“)。項目(0)。文本

如果?msg type =“text“?然後呢?wx cont = xdom . getelementsbytagname(“Content“)。項目(0)。文本

如果?msg type =“event“?然後呢?wx cont = xdom . getelementsbytagname(“Event“)。項目(0)。文本

設置?xDom=Nothing

結束?潛水艇

打電話?getMSG()

如果?from用戶名=““?然後呢。wxCont=““?然後呢?回應。結束?沒有源或內容,處理中止。

wx cont = replace(wx cont,chr(13),““)

wx cont = replace(wx cont,chr(10),““)

wx cont = trim(wx cont)

功能?有(鑰匙)

開嗎?錯誤?簡歷?然後

暗淡?黨衛軍我

keys = replace(keys,“;“,";")

ss=split(鍵,“;“)

為了什麽?i=0?去哪?超聲波探傷

如果?instr(?lcase(wx cont),lcase(?ss(I)?)?)& gt0?然後

has=true

退出?功能

結束?如果

然後

has=false

結束?功能

如果?wxCont =“subscribe“?然後呢?表示有新的用戶問題,舊的接口是Hello2BizUser。

Remasg =“歡迎關註“& ampVBCrLf?& amp?"?主頁:?“& ampVBCrLf?& amp?“www.fj543.com“

埃爾瑟夫。wxCont=“退訂“?s退訂。

埃爾瑟夫。wxCont =“0“?然後

處理自定義回復代碼。

remasg =“Help:“?& amp?VBCrLf?& amp“回復1查看我們的網站;回復2查看聯系方式;”

埃爾瑟夫。wxCont =“1“?然後

Remasg =“我們的網站:“&;VBCrLf?& amp?“www.fj543.com“

其他

Remasg =“感謝您的留言。吳世昌IT技術服務團隊將盡快回復。請耐心等待。”

結束?如果

reMSG=reMSG?& amp?vbcrlf & amp?vbcrlf?& amp?“回復號碼0尋求幫助。“?& amp?錯誤描述

out XML =“& lt;xml & gt”?& amp_

“& ltToUserName & gt& lt!【CDATA【“& amp;from用戶名& amp“】】& gt& lt/ToUserName>?& amp_

“& ltfrom用戶名& gt& lt!【CDATA【“& amp;tousername & amp“】】& gt& lt/FromUserName>?& amp_

“& lt創建時間》& amp?現在()?& amp“& lt/create time & gt;”?& amp_

“& ltMsgType & gt& lt!【CDATA【text】】& gt;& lt/MsgType & gt;”?& amp_

“& lt內容& gt& lt!【CDATA【“?& amp?reMSG?& amp?“】】& gt& lt/Content》?& amp_

“& ltFuncFlag>0 & ltFuncFlag》?& amp_

“& lt/xml》

回復。寫?outXML

% & gt