DLL组件问题？

[xunua]

以下是dll组件的代码
Public Sub OnStartPage(PassedScriptContext As ScriptingContext)
Set Context = PassedScriptContext 'Asp运行环境对象
Set Application = Context.Application 'Asp 五大对象
Set Request = Context.Request
Set Response = Context.Response
Set Server = Context.Server
Set Session = Context.Session
Response.Write "start" '测试
End Sub



Public Sub OnEndPage()
Set Response = Nothing
Set Request = Nothing
Set Server = Nothing
Set Application = Nothing
Set Session = Nothing
Response.Write "end" '测试
End Sub

为什么在asp页面中调用组件的时候成功输出了"start"而"end"没有输出呢？

[winehero]

你已经将Response清除掉了（Set Response = Nothing），当然write方法无效。

将Response.Write "end" 放在
Set Response = Nothing前面。

[yas]

粗心的了 ^_^