asp中一个非常少用的函数：用asp代码来判断一个过程或者函数是否存在，如果存在在的话，就调用这个过程或者函数，不存在的话，就不进行调用，转做其他处理。具体代码如下：
<%
Function FunExists(Byval FunName)
Dim O
ON Error Resume Next
Set O = GetRef(FunName)
If Err Then
FunExists = false
Else
FunExists = True
End If
End Function
Function test1(byval a)
response.write "这个函数来自www.aspbc.com整理。"
End Function
response.write FunExists("test")&"<br>"&FunExists("test1")
%>(鼠标移到代码上去，在代码的顶部会出现四个图标，第一个是查看源代码，第二个是复制代码，第三个是打印代码，第四个是帮助)
这里这个函数主要基于asp函数getRef的基础上定义的，大家可以网上搜索一下关于getRef的使用方法。
原创文件，转载请注明来源：asp编程网（www.aspbc.com），谢谢。