asp(vbscript)中实现自定义函数的默认参数

现代语言的函数中都可以带有默认参数,在vbscript系统内建的函数可以带有可选值(如常用的 split()等等),然而我们自己定义的函数中无法具有此功能.

下面提供一个方法实现可选参数的功能.

functin foo(dtype, dsize, value)
    dim  a, b
    if   TypeName (dtype)  <>   " Error "   Then
       a  =  dtype
    else
       a  =   " default value "
    end   if
    If   TypeName (dsize)  <>   " Error "   Then
       b  =  dsize
    else
       b  =   - 1
    end   if
   .
end function

如示例代码所示, foo函数中dtype, dsize均为可选函数,调用时可以传参数,也可不传参数.当不传参数的时候,逗号占位符不能丢了,即应该使用 foo(,,"myvalue") 的形式.

转载于:https://www.cnblogs.com/xwing/archive/2008/10/06/1305652.html