最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

ASP模擬POST請求異步提交數(shù)據(jù)的方法

 更新時(shí)間:2014年07月24日 09:06:55   投稿:junjie  
這篇文章主要介紹了ASP模擬POST請求異步提交數(shù)據(jù)的方法,本文使用MSXML2.SERVERXMLHTTP.3.0實(shí)現(xiàn)POST請求,需要的朋友可以參考下

有時(shí)需要獲取遠(yuǎn)程網(wǎng)站的某些信息,而服務(wù)器又限制了GET方式,只能通過POST數(shù)據(jù)提交,這個(gè)時(shí)候我們可以通過asp來實(shí)現(xiàn)模擬提交post數(shù)據(jù),網(wǎng)上有挺多這樣的例子的。下面的是我自己寫的比較簡潔易懂的函數(shù)。

首先,需要一個(gè)編碼設(shè)置的函數(shù),因?yàn)閍sp一般為gbk的,而標(biāo)準(zhǔn)的網(wǎng)站現(xiàn)在大都使用utf-8的。所以需要轉(zhuǎn)換。

復(fù)制代碼 代碼如下:

function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End function

其次就是用組件實(shí)現(xiàn)post數(shù)據(jù)的提交了,我這里使用了MSXML2.SERVERXMLHTTP.3.0。當(dāng)然也可以使用其他的。

復(fù)制代碼 代碼如下:

function PostHTTPPage(url,data)
dim Http
set Http=server.createobject("MSXML2.SERVERXMLHTTP.3.0")
Http.open "POST",url,false
Http.setRequestHeader "CONTENT-TYPE", "application/x-www-form-urlencoded"
Http.send(data)
if Http.readystate<>4 then
exit function
End if
PostHTTPPage=bytesToBSTR(Http.responseBody,"utf-8")
set http=nothing
if err.number<>0 then err.Clear
End function

使用的時(shí)候就是這樣子:

復(fù)制代碼 代碼如下:

PostHTTPPage("m.fzitv.net","str1=a&str2=b&str3=c")

相關(guān)文章

最新評論

故城县| 青铜峡市| 台湾省| 屯门区| 武定县| 绥棱县| 邢台市| 若尔盖县| 鄱阳县| 元江| 蓬安县| 安平县| 商城县| 岚皋县| 前郭尔| 诸暨市| 济阳县| 盐津县| 临夏县| 沁阳市| 南昌市| 宜城市| 石棉县| 华蓥市| 九龙坡区| 防城港市| 龙井市| 赞皇县| 霍山县| 宜丰县| 锡林浩特市| 赫章县| 罗山县| 丰镇市| 宁晋县| 永平县| 布尔津县| 额敏县| 财经| 赤水市| 平山县|