VBScript中的eval()函数
来源:programfan.com 时间:2008-04-09 13:41:00
Javascript中的eval函数让我们可以很方便地操作一系列变量(a1,a2,a3,……)。自从VBScript 5.0之后,我们也可以ASP中使用这个功能了!
和Javascript一样,eval()也是计算其中字符串所代表变量的值并返回,如eval("a"&"1")返回a1的值。不过这个eval()的功能和Javascript比起来还是有差距的。我试了一下,发现主要有以下一点:VBScript中的eval函数只能读取返回值而不能为其中所代表变量赋值,即我们不可以用eval("a"&"1")为a1赋值。
那位朋友提出的问题,是将接收到的一个长字符串("2005081200507120050612005051")按7个字符为一组依次赋给一系列变量a1,a2,a3,…。
如果是赋值予数组,那我们可以建立动态数组:
<%
use="2005081200507120050612005051"
dim myarray()
reDim myarray(0)
for i=1 to Len(use) step 7
reDim myarray(ubound(myarray)+1) '将数组容量加1
myarray(ubound(myarray))=mid(use,i,7)
next
%>
现在要赋值给系列变量,我们得引入另外一个函数execute()。这个函数的作用是将其中字符串视为VBScript语句执行,如execute("a"&"1="&100")是执行以下语句:a1=100。
据此,我们可以按那位朋友的要求写出以下代码:
<%
use="2005081200507120050612005051"
dim n '作为变量a后的索引1,2,3,…
n=1
for i=1 to Len(use) step 7
execute "dim a"&CStr(n)&":a"&CStr(n)&"="&mid(use,i,7)
'执行语句dim a:a1=mid(use,i,7)
n=n+1
next
%>
标签:eval(),vbscript,函数
0
投稿
猜你喜欢
xhtml+css VS div+css
2008-04-07 13:00:00
vbscript与javascript如何传递变量(包括服务器端与客户端)
2008-04-09 13:46:00
MS IIS server Frontpage Ext Server漏洞
2008-05-04 09:54:00
如何实现html表格里隔行换色
2007-10-19 13:42:00
如何增强网站数据库Access文件的安全性
2008-11-13 16:58:00
Linux系统下导出ORACLE数据库出现Exporting questionable statistics.错误 处理
2010-07-16 13:27:00
关于 Flash Banner 设计的建议
2010-02-02 18:19:00
MySql循环插入数据
2010-10-14 13:50:00
ASP中生成文件的两种方式
2007-08-30 09:49:00
asp从Excel中筛选符合条件的记录保存至新的Excel中
2007-09-06 19:20:00
XML简易教程之四
2008-09-05 17:19:00
IE7异常CSS 导致内存破坏漏洞
2009-11-30 12:52:00
防止别人iframe的js
2008-09-26 17:19:00
仿天涯底部固定漂浮导航,无JS纯CSS定义
2009-07-06 12:44:00
深入研究ASP中的Session
2007-09-13 12:37:00
如何解决ASP脚本运行超时的错误
2007-10-14 11:38:00
服务器响应HTTP的类型ContentType大全
2007-10-23 10:21:00
什么是XML?
2007-10-29 12:53:00
仿阿里巴巴搜索导航设计效果
2008-04-15 15:01:00
SQL Server数据转换服务基本概念介绍
2009-01-20 15:52:00