这是经典的 ASP,在 IIS 8.5 上运行。
我需要在对这些 *.asp 文件的每个 Http 请求开始时运行一些对我的所有 *.asp 页面都应该通用的 VBScript。
目前我#include
在每个 *.asp 文件的顶部使用一个标签。我引用了一个包含我要运行的代码的文件。
它可以解决问题,但既丑陋又危险:如果其中一个 *.asp 文件碰巧错过了#include
标记,则代码将无法运行。
有没有办法为每个 *.asp 请求运行一些代码,而不必在每个 *.asp 文件中编写代码?
在 ASP.NET 中,我们有HttpApplication.BeginRequest
事件。我正在寻找的是与此等价的东西,但在 Classic ASP 中。我需要运行一些能够在每个 *.asp 请求开始时访问经典 ASP 对象的 VBScript。
编辑:根据@Kul-Tigin 的请求,这就是我想要这样做的原因:我的 *.asp 文件是用 ANSI 编码的。但是 URL 请求以 UTF-8 编码,这会产生问题。
如果我什么都不做,ASP 引擎会像在 ANSI 中一样对 url(和查询字符串)进行解码。例如:查询字符串?value=ç
将由浏览器发送为?value=%C3%A7
. C3A7 是以 UTF-8 编码的 'ç' 字节。但是 ASP 引擎将 2 个字节作为 2 个单独的 ANSI 字符读取。所以,如果我什么都不做,那Request.QueryString("value")
将是一个长度为 2 的字符串,内容为“ç”。
为了解决这个问题,我创建了以下解决方法,它可以工作:
Sub Workaround()
Response.CodePage = 65001 ' Temporarally set the Response CodePage to UTF-8. Originally it was 1252 (ANSI).
Dim foo
foo = Request.QueryString("foo") 'ASP engine uses the Response.CodePage to decode the querystring
Response.CodePage = 1252 ' Set the Response CodePage back to ANSI.
End Sub
Workaround()
我不关心“foo”查询字符串,它甚至可能不存在。我这样做只是为了“触摸” ASP 查询字符串反序列化引擎。Aparently,它在请求处理期间第一次使用它时解码所有查询字符串值。因此,即使在将 CodePage 设置回 1252 之后,在我之前的示例中,如果我读取具体的查询字符串Request.QueryString("value")
,它将是一个长度为 1 的字符串,其中包含“ç”,如预期的那样。
我已将解决方法代码放在一个workaround.inc
文件中,并将其包含在我的大多数 *.asp 文件的开头,这暂时解决了问题。但是有超过一千个 *.asp 文件,还有更多有待开发。不可能确保所有这些都包含workaround.inc
,这就是为什么我想为所有 *.asp 请求运行代码,而不考虑包含标记。
感谢您对我的问题的关注。如果您能提出更好的解决方案,我将非常高兴。谢谢!