一区二区三区在线-一区二区三区亚洲视频-一区二区三区亚洲-一区二区三区午夜-一区二区三区四区在线视频-一区二区三区四区在线免费观看

服務器之家:專注于服務器技術及軟件下載分享
分類導航

PHP教程|ASP.NET教程|Java教程|ASP教程|編程技術|正則表達式|C/C++|IOS|C#|Swift|Android|VB|R語言|JavaScript|易語言|vb.net|

服務器之家 - 編程語言 - ASP教程 - PostHttpPage用asp是實現模擬登錄效果的代碼

PostHttpPage用asp是實現模擬登錄效果的代碼

2019-10-09 14:29asp代碼網 ASP教程

PostHttpPage用asp是實現模擬登錄效果的代碼

  1. '==================================================  
  2. '函數名:PostHttpPage  
  3. '作  用:登錄  
  4. '==================================================  
  5. Function PostHttpPage(RefererUrl,PostUrl,PostData)   
  6.     Dim xmlHttp   
  7.     Dim RetStr        
  8.     Set xmlHttp = CreateObject("Msxml2.XMLHTTP")    
  9.     xmlHttp.Open "POST", PostUrl, False  
  10.     XmlHTTP.setRequestHeader "Content-Length",Len(PostData)   
  11.     xmlHttp.setRequestHeader "Content-Type""application/x-www-form-urlencoded"  
  12.     xmlHttp.setRequestHeader "Referer", RefererUrl  
  13.     xmlHttp.Send PostData   
  14.     If Err.Number <> 0 Then   
  15.         Set xmlHttp=Nothing  
  16.         PostHttpPage = "$False$"  
  17.         Exit Function  
  18.     End If  
  19.     PostHttpPage=bytesToBSTR(xmlHttp.responseBody,"GB2312")  
  20.     Set xmlHttp = nothing  
  21. End Function  

延伸 · 閱讀

精彩推薦
主站蜘蛛池模板: 色屁屁二区 | 日本久久啪啪婷婷激情五月 | 手机在线观看国产精选免费 | bl双性受乖调教改造身体 | 国产aaa毛片 | 国产精品久久香蕉免费播放 | 欧美精品v日韩精品v国产精品 | 久久视频这有精品63在线国产 | 精品在线网站 | 秋霞一级黄色片 | 俺来操 | 视频国产91 | 国内精品久久久久久不卡影院 | 人人擦 | 午夜精品久视频在线观看 | 国产成人精品午夜视频' | 欧美日韩中文国产一区 | 欧美日韩在线一区二区三区 | 俄罗斯一级在线播放 | 久久精品麻豆国产天美传媒果冻 | 肉文高h调教 | 啪啪无尽3d动漫漫画免费网站 | 99视频在线观看视频 | 亚洲精品国产A久久久久久 亚洲精品福利一区二区在线观看 | 日本 在线观看 | 40岁女人三级全黄 | 欧美成人aletta ocean | 91制片厂制作传媒破解版免费 | 国产v在线在线观看羞羞答答 | 精品一久久香蕉国产线看播放 | 成年人免费观看 | 亚洲天堂免费 | 国产精品视频一区二区三区经 | 日本深夜视频 | 国产播放器一区 | 无敌在线视频观看免费 | 白丝vk丨tk失禁 | 欧美精品一区二区三区免费播放 | 精品亚洲欧美中文字幕在线看 | 超级碰碰青草免费视频92 | 成全视频在线观看免费 |