|
|
设定事件处理脚本部件,初始化时指向虚拟主机根目录下的 global.wsc
host.EventSink[ = strEventSink]
通过设定事件处理的脚本部件,可以根据不同的事件触发相应的事件处理,当前支持的事件有:OnSessionStart,OnSessionEnd,OnApplicationStart,OnApplicationEnd。
在虚拟主机初始化时,此属性指向虚拟主机根目录的 global.wsc 文件。例如:
Set host = httpd.AddHost("", "\wwwroot")
此时虚拟主机的根为 "\wwwroot",则 EventSink 自动初始化为 "\wwwroot\global.wsc"
下面的示例设定当前 Host 对象的事件处理为 demo.wsc:
Set httpd = CreateObject("NetBox.HttpServer")
httpd.Create("", 80)
Set host = httpd.AddHost("", "\wwwroot")
host.AddDefault "default.htm"
host.EnableScript = true
host.EventSink = "\demo.wsc"
httpd.Start
demo.wsc 的代码如下:
<?xml version="1.0"?>
<component>
<public>
<method name="OnSessionStart"/>
<method name="OnSessionEnd"/>
<method name="OnApplicationStart"/>
<method name="OnApplicationEnd"/>
</public>
<script language="VBScript">
<![CDATA[
Sub OnSessionStart
End Sub
Sub OnSessionEnd
End Sub
Sub OnApplicationStart
End Sub
Sub OnApplicationEnd
End Sub
]]>
</script>
</component>