حزمة مكون XMLHTTP في ASP
كتبت وظيفة اللص ، وأولي اهتماما لجزء الرمز الأحمر ، وأضف الآخرين بنفسك!
functionposthttppagefrom (httpurl ، stra ، fromurl)
DIMHTTP
sethttp = server.createBject ("msxml2.xmlhttp")
http.open "post" ، httpurl ، false
http.setrequestheader "طول المحتوى" ، Len (Stra) http.setrequestheader "محتوى--
اكتب "،" التطبيق/x-www-form-urlencoded "
http.setRequestHeader "المرجع" ، فرومورل
http.sendstra
ifhttp.readyState <> 4then
sethttp = لا شيء
gethttppage = "$ false $"
exitfunction
Endif
posttTPageFrom = bytestobstr (http.responseBody ، "GB2312") sethttp = لا شيء
iferr.number <> 0then
err.clear
Endif
الوظيفية
FunctionByTestobstr (الجسم ، CSET)
Dimobjstream
setObjStream = server.createBject ("Adodb.stream")
objstream.type = 1
objstream.mode = 3
objstream.open1d)
objstream.writeBody
objstream.position = 0
objstream.type = 2
objstream.charset = cset
bytestobstr = objstream.readtext
objstream.close
setObjStream = لا شيء
الوظيفية