Asp编程

ASP中用ajax方式获得session的实现代码

日期:2011/05/28 21:09:18来源: 绿色资源网整理

前个月朋友接到一个asp的私活,于是就做了。

技术方面没什么难点,asp虽然以前没怎么写过,可是看看书也就OK了。

基本全部做完后,出了一个bug。

  前期做的时候,登录方式顺手用了ajax来做,登录前先判断在session中是否存在值,如果存在,那么无需登录;如果不存在,那就弹出登录页面登录。 

  由于我是用的ff浏览器,一直没发现什么问题。上个礼拜提交给用户看的时候,说用IE登录完之后无效,大惊。结果还真的是这样。。很囧 

  登录代码如下: 

Java代码
  1. //从服务器查询是否存在session   
  2.         j.ajax({   
  3.         type:"GET",   
  4.         url:"sessioncheck.asp",   
  5.         data:"",   
  6.         timeout: 1000,   
  7.         error: function(){   
  8.                     alert('sorry, server is busy now!');   
  9.                 },   
  10.         success:function(comments_data){   
  11.             if(comments_data == 1){   
  12.                 el.createDialog(opts);   
  13.                         j.startOver();   
  14.                     }   
  15.             else{   
  16.                 var sql = selectSQL(searchkey,stype);   
  17.                 window.location.href = sql;   
  18.             }   
  19.         }   
  20.     });  
//从服务器查询是否存在session
		j.ajax({
        type:"GET",
        url:"sessioncheck.asp",
        data:"",
        timeout: 1000,
      	error: function(){
					alert('sorry, server is busy now!');
				},
        success:function(comments_data){
        	if(comments_data == 1){
        		el.createDialog(opts);
						j.startOver();
					}
        	else{
        		var sql = selectSQL(searchkey,stype);
        		window.location.href = sql;
        	}
        }
    });



大致是这样 sessioncheck.asp里面无非就是去查session,代码如下:
Java代码
  1. if session("username") = "" then   
  2.         Response.Write("1")   
  3.     else  
  4.         Response.Write("2")   
  5.     end if  
if session("username") = "" then
		Response.Write("1")
	else
		Response.Write("2")
	end if

结果就是用IE这个session("username")死活没有,timeout设置了也没用。

去网上查了半天,发现同样问题的还挺多,最后查到原因:缓存问题。

异步get获取时,如果url不变,是直接调用的缓存中的信息,然后就导致了一直获得不到session里的值。

解决方法那很简单了,google "asp 清除缓存" 一大堆。

最后是在sessioncheck.asp里添加了一段,如下:

Java代码
  1. Response.Buffer =True   
  2.   Response.ExpiresAbsolute =Now() - 1  
  3.   Response.Expires=0  
  4.   Response.CacheControl="no-cache"  
  5.     if session("username") = "" then   
  6.         Response.Write("1")   
  7.     else  
  8.         Response.Write("2")   
  9.     end if  
Response.Buffer =True
  Response.ExpiresAbsolute =Now() - 1

相关文章

相关下载

网友评论

我要评论...
没有更早的评论了
取消