<div style="text-indent: 2em;">
'*********************************************************
' 目的: 注册插件函数
'
' 注释: 将插件信息保存到数组中。即在原有数组最后增加一个元素
'保存传递过来的插件名称和激活函数/过程的信息。
'
' 位置: /FUNCTION/c_system_base.asp
'*********************************************************
Function RegisterPlugin(strPluginName,strPluginActiveFunction)
'On Error Resume Next
Dim i
i=UBound(PluginName)
ReDim Preserve PluginName(i+1)
ReDim Preserve PluginActiveFunction(i+1)
PluginName(i)=strPluginName
PluginActiveFunction(i)=strPluginActiveFunction
'Err.Clear
End Function
'*********************************************************