• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

asp与asp.net共用session

原作者: [db:作者] 来自: [db:来源] 收藏 邀请
这是一个老话题了,因为最近用的到,所以没办法又到处找资料。微软的网站上提供的是用数据库实现的,总觉得太麻烦,也有说直接使用的,但我没有试成功。我认为直接使用是不可能的。还有一种方法,就是通过几个页面转换,我使用的也是这个方法,通过总结搜索到的资料,整理后编写了几个页面来转换。主要是通过隐藏的input来实现的。具体方法如下:

  asp 转 asp.net 页面:

     用一个asp页,把session信息写到input中,提交给asp.net页
   trans.asp
   <%
    '----------测试数据--------
    session("name")="srx"
    session("id")="1"
    session("sex")="f"
    session("pass")="asdfas"
    session("age")="23"
    session("weight")="131"
     '--------------------------

    response.write("<form name=frm id=frm action=""asptoaspx.aspx"" method=post >")

    for each item  in session.contents
     response.write("<input type=hidden name=" & item)
     response.write( " value=" & session(item) & " >")
    next

    if len(request.querystring("destpage")) >4 then  
     response.write("<input type=hidden name=destpage value=" &   request.querystring("destpage") & ">")
     end if
    response.write("</form>")
    response.write("<scr" + "ipt>frm.submit();</scr" + "ipt>")
    %>


asptoaspx.aspx
<%@ page language="c#" %>
<script language=c# runat=server>
 private void page_load(object sender, system.eventargs e)
 {
  session.timeout = 60;

  for(int i=0;i<request.form.count;i++)
  {
    session[request.form.getkey(i)]=request.form[i].tostring();
   }
  
  allsession(); //输出所有的session,使用时可注释掉
  
  try
  {
   if( session["destpage"].tostring().length >4 )
   {
     server.transfer(session["destpage"].tostring(),true);
   }
  }
  catch {}

 }
 private void allsession()
 {
  response.write ("there are " + session.contents.count +" session <i>var</i>iables<p>");
  
  foreach(object obj in session.contents)
  {
    response.write("session["+obj.tostring()+"] - "+session[obj.tostring()].tostring()+"<br>");//输出所有的session,使用时可注释掉
  }
 }
</script>


asp.net 转 asp 页面:

     用一个asp.net页,把session信息写到input中,提交给asp页


trans.aspx
<%@ page language="c#"  %>
<script language=c# runat=server>
 private void page_load(object sender, system.eventargs e)
 {
  // ----------测试数据---------
  
  session["name"] = "srx";
  session["sex"]="f";
  //----------------------------
  
  response.write("<form name=frm id=frm action=aspxtoasp.asp method=post>");
  foreach(object obj in session.contents)
  {
    response.write("<input type=hidden name='"+obj.tostring()+"'");
    response.write(" value = '"+session[obj.tostring()].tostring()+"'>");
  }
  try
  {
   if(request.querystring["destpage"].tostring().length > 4 )
   {
     response.write("<input type=hidden name='destpage'");
     response.write(" value = '"+request.querystring["destpage"].tostring()+"'>");
   }
  }
  catch{}
  response.write("</form>");
  response.write("<scr"+"ipt language='javascript'>frm.submit();</scr"+"ipt>");
 }   
</script>

 

aspxtoasp.asp
<%
for i=1 to request.form.count
    session(request.form.key(i))=request.form(i)
next
if len(session("destpage")) >4  then
   response.redirect(session("destpage"))
end if

'-----------------------输出所有的session------------------------------------------------

call allsession() '使用时注释掉此行代码即可

function allsession()
 response.write "there are " & session.contents.count &" session <i>var</i>iables<p>"
 dim strname, iloop  
 for each strname in session.contents'使用for each循环察看session.contents
 
   if isarray(session(strname)) then '如果session变量是一个数组? '循环打印数组的每一个元素
     for iloop = lbound(session(strname)) to ubound(session(strname))
      response.write strname & "(" & iloop & ") - " & _
      session(strname)(iloop) & "<br>"
     next
   else '其他情况,就简单打印变量的值
     response.write strname & " - " & session.contents(strname) & "<br>"
   end if
 next
end function
'------------------------------------------------------------------------------------------
%>
  代码实现的过程中,asp.net页面提交到asp页的时候不能使用server.transfer方法,所以只好用response.write来自己写form表单提交。


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
ASP.NET图书管理系统简单实现步骤发布时间:2022-07-10
下一篇:
ASP.NET常用内置对象发布时间:2022-07-10
热门推荐
热门话题
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap