ajax ÇëÇóÓòÃû²»Í¬sessionÎÊÌâ
s.com ÓòÃûÏÂÓÐÒ»Îļþprocess.asp
VBScript code:
Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "No-Cache"
Response.charset="gb2312"
response.Write Session("UserID")
ÏëÒªÔÚh.comÏÂÓÃajaxÀ´·ÃÎÊ
VBScript code:
response.Write getHTTPPage("http://s.com/process.asp")
Function getHTTPPage(url)
dim http
set http=Server.createobject("Msxml2.ServerXMLHTTP")
Http.open "get",url,false
Http.send()
if Http.readystate<>4 then
getHTTPPage = "error"
exit function
end if
getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
set http=nothing
if err.number<>0 then Response.write(err.number)
End function
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 F
Ïà¹ØÎÊ´ð£º
ÏëÖªµÀÔõôÔÚDWÖÐÔËÐÐAjax
ÎÒÔËÐеÄÎļþ±¨Õâ¸ö´í..
Warning: Unknown: failed to open stream: No such file or directory in Unknown on line 0
Fatal error: Unknown: Failed opening requir ......
²é¿´Ô´Îļþʱ³öÀ´µÄ
<script type="text/javascript">
// <![CDATA[
Sys.Application.initialize();
Sys.Application.add_init(function() {
$create(Sys.UI._Upd ......
<div id="div6" runat="server" style= "height:auto;width:auto; text-align: left;">
& ......
ÔÚ¼ÒÑо¿ajax£¬¿´Á˱ðÈ˵ÄÒ»¸öÍøÉϹºÎïÉ̳ÇÏîÄ¿µÄÔ´´úÂ룬×Ô¼ºÒ²À´·Â±ðÈ˵Ķ«Î÷Á·Ï°Á·Ï°£¬Ã»Ïë³öÎÊÌâÁË£¡Ò»ÏµÄÕâЩ´úÂëÊÇÎÒ·ÂÕÕ±ðÈËдµÄ¡£ÎÒÊÇÏëÈÃ×¢²áµÄÈËÌîдÓû§Ãû£¬¹â±êÀ뿪Óû§ÃûºóÃæµÄÌîд¿Õ°×´¦ºóÁ¢¿ÌÀûÓÃaj ......
JScript code:
function callback() {
alert(18); //²âÊÔÊÇ·ñµ÷ÓÃÁËcallback»Øµ÷º¯Êý
if (httpRequest.readyState==4) {
if(httpRequest.status==200){
alert(3); //²âÊÔÊ ......