当前位置: 首页 > 图文教程 > 网络编程 > ASP > 在VBScript中实现-函数/方法名作为参数传入另一个函数

ASP
防止网站被采集的理论分析以及十条方法对策
Asp 操作Access数据库时出现死锁.ldb的解决方法
asp HTTP_X_FORWARDED_FOR和REMOTE_ADDR
ASP 代码出现80040e14错误的解决方法
Asp 编码互转的研究和实现代码
asp fckeditor自定义上传文件的文件名
asp javascript picasa相册外链批量导出
asp MD5加密方式使用建议
asp javascript值的互相传递方法
ASP UTF-8编码下字符串截取和获取长度函数
asp vbcrlf是什么意思
ASP 相关文章或者相关产品
在Win2003 64位下ASP无法连接Access数据库
asp 得到动态数组中元素的个数
Session.TimeOut的最大取值是1440,超出会报错
Form Post提交容量大的数据
启动iis出现发生意外0x8ffe2740的解决方法
asp 实现当有新信息时播放语音提示的效果
asp 延时 页面延迟的三种方法
Asp 日期格式化问题

ASP 中的 在VBScript中实现-函数/方法名作为参数传入另一个函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 120 ::
收藏到网摘: n/a

在JS中有这种用法,某个函数名可以当成参数的形式,传入到另外一个函数内部去,例如:
<script type="text/javascript">
<!--
function myFuncA(str,myFuncB){
str = str + " 您好!";
str = myFuncB(str);
return str;
}
function myFuncB(str){
str = str + "欢迎来到IECN.NET";
return str;
}
alert(myFuncA("张三",myFuncB));
//-->
</script>
在VBScript有两种方式可以来实现,即用execute或GetRef 函数。
一、利用execute:
<script language=vbscript>
Function myFuncA(str,myFuncName)
str = str & " 您好!"
execute("str = " & myFuncName & "(str)")
myFuncA = str
End Function
Function myFuncB(str)
str = str + "欢迎来到IECN.NET"
myFuncB = str
End Function
msgbox myFuncA("张三","myFuncB")
</script>
二、利用GetRef:
<script type="text/vbscript">
Function myFuncA(str,myB)
str = str & " 您好!"
str = myB(str)
myFuncA = str
End Function
Function myFuncB(str)
str = str + "欢迎来到IECN.NET"
myFuncB = str
End Function
document.write(myFuncA("张三",GetRef("myFuncB")))
</script>