[50分]asp.net级别URL重写-灵异事件

VB.NET code:

'Global.asax
Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
'在应用程序启动时运行的代码
Dim RequestUrl As String = HttpContext.Current.Request.RawUrl
Dim VisualUrl As String = "^(.+)Action/(\d+)\.aspx(\?.*)*$"
Dim RealUrl As String = "$1default.aspx?action=$2"

If Regex.IsMatch(RequestUrl, VisualUrl, RegexOptions.IgnoreCase Or RegexOptions.Compiled) Then
Dim NewUrl As String = Regex.Replace(RequestUrl, VisualUrl, RealUrl, RegexOptions.Compiled Or RegexOptions.IgnoreCase)
Context.RewritePath(NewUrl)
End If
End Sub

'default.aspx
Imports System
Imports System.Web
Imports System.Web.UI
Imports System.Web.Security

Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Request.QueryString("action") <> Nothing Then
Response.Write(Request.QueryString("action").ToString())
End If

End Sub
End Class


这样写好后第一次提交http://127.0.0.1/Action/1187.aspx
能打出1187 接着刷新就变成了无法找到资源。
太郁闷了

---

当然，Application_Start只在程序被启动的时候执行，之后不会被执行了。

用asp.net 3.5的web.routing的模块来做吧。