asp.net 与 asp 的session是无法直接共享的(底层的处理dll也不一样),要想互通session,只能用变通的办法:
一、asp.net -> asp 的session传递
a) 建一个类似SessionHanler.asp的页面,代码如下:
代码语言:javascript复制<!-- #include virtual="inc/Func.asp" -->
<%
Dim returnUrl
Session("user") = Request("user")
Set returnUrl = Request("returnUrl")
if returnUrl="" then
returnUrl = "home.asp"
end if
'记日志
AppendFile "/log/log.txt" , Now() & ",user:"&Session("user") &",returnUrl:" & returnUrl
Response.Redirect(returnUrl)
%>
大概功能,就是接收参数,然后按需要生成Session,最后重定向到真正的功能页面,这样其它页面访问Session时就有值了
b) 建一个asp.net页面,把需要传递的值,以参数形式提交到 SessionHanler.asp (POST或GET方式都行),参考代码:
代码语言:javascript复制using System;
namespace ASP_ASPX_TEST
{
public partial class index : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
if (IsPostBack)
{
string returnUrl = "home.asp";
string sessoinHandlerUrl = "SessionHandler.asp";
string postData = "user=" this.txtUser.Text "&returnUrl=" returnUrl;
Response.Redirect(sessoinHandlerUrl "?" postData);
}
}
}
}
二、asp -> asp.net 的session传递
反过来做即可,原理完全相同。
三、拦截asp请求
对于现有的asp项目,在不修改其asp源代码的前提下,如果需要对http请求加以拦截(例如:把拦截到的请求参数做些处理,再转发到其它子系统。同时不影响原来asp项目的正常运行),有二种做法:
a) 自行开发ISAPI 筛选器 ,然后在IIS里,把自己开发的dll加入ISAPI 筛选器
这个方法比较繁琐,技术难度也相对较高,在今天.net的时代,不推荐大家使用,有兴趣的可以参考一个开源项目: http://filterdotnet.codeplex.com/
以及 一些ISAPI的开发文章,比如
ISAPI开发介绍 http://blog.csdn.net/mycoolx/article/details/6913048
ISAPI tutorial for Delphi developers http://delphi.about.com/library/bluc/text/uc060901c.htm
delphi IIS ISAPI http://www.cnblogs.com/cisky/archive/2011/01/05/1926249.html
delphi IIS ISAPI http://siyebocai.blog.163.com/blog/static/103316426200810297512408/
用Delphi编写 IIS ISAPI 程序 http://download.csdn.net/detail/wwwvvingnet/2229146
在Delphi中用IIS或PWS调试ISAPI程序 http://bbs.csdn.net/topics/7979
b) 利用asp.net的HttpModule (环境:IIS7 /Asp.Net 4.0上 测试通过)
前提:Asp项目所用的应用程序池必须采用"集成"模式
先建一个HttpModule
代码语言:javascript复制using System;
using System.IO;
using System.Web;
namespace ASP_ASPX_TEST
{
public class MyHttpModule : IHttpModule
{
string logFileName;
public MyHttpModule()
{
logFileName = HttpContext.Current.Server.MapPath("~/log/request.log");
}
public void Dispose()
{
}
public void Init(HttpApplication context)
{
context.BeginRequest = BeginRequestHandle;
context.EndRequest = EndRequestHandle;
}
private void BeginRequestHandle(Object source, EventArgs e)
{
HttpApplication application = (HttpApplication)source;
HttpContext context = application.Context;
HttpRequest request = context.Request;
File.AppendAllText(logFileName,Environment.NewLine request.Url Environment.NewLine "BeginRequest => " DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss") Environment.NewLine);
foreach (var item in request.QueryString.AllKeys)
{
File.AppendAllText(logFileName, string.Format(" QueryString => {0}:{1}", item, request.QueryString[item]) Environment.NewLine);
}
foreach (var item in request.Form.AllKeys)
{
File.AppendAllText(logFileName, string.Format(" Form => {0}:{1}", item, request.Form[item]) Environment.NewLine);
}
context.Response.Write("BeginRequestHandle<br/>");
}
private void EndRequestHandle(Object source, EventArgs e)
{
HttpApplication application = (HttpApplication)source;
HttpContext context = application.Context;
HttpRequest request = context.Request;
File.AppendAllText(logFileName, Environment.NewLine request.Url Environment.NewLine "EndRequest => " DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss") Environment.NewLine);
foreach (var item in request.QueryString.AllKeys)
{
File.AppendAllText(logFileName, string.Format(" QueryString => {0}:{1}", item, request.QueryString[item]) Environment.NewLine);
}
foreach (var item in request.Form.AllKeys)
{
File.AppendAllText(logFileName, string.Format(" Form => {0}:{1}", item, request.Form[item]) Environment.NewLine);
}
context.Response.Write("EndRequestHandle<br/>");
}
}
}
这里只是演示代码,我把所有请求的QueryString和Form参数都记录了下来。
web.config中修改配置
代码语言:javascript复制<?xml version="1.0" encoding="UTF-8"?>
<configuration>
<system.web>
<compilation debug="true" targetFramework="4.0" />
</system.web>
<system.webServer>
<modules runAllManagedModulesForAllRequests="true">
<add name="MyHttpModule" type="ASP_ASPX_TEST.MyHttpModule,ASP_ASPX_TEST" />
</modules>
</system.webServer>
</configuration>
注:IIS7及以上版本,自定义的HttpModule,必须加到 system.webServer节点下,否则只能拦截asp.net的请求,对asp无效
最后赠送一个asp调试的小技巧(自从asp.net出来以后,很多人估计象我一样,已经很久不碰asp,这些小技巧差不多忘记光了,贴在这里备份一下)
IE浏览器里先去掉 友好错误的勾选
IIS设置里,允许发送详细错误到客户端
这样,asp代码出错时,就会显示详细信息了