string - 如何使用字符串作为表达式

Question

我在一个字符串中构建了一个 VBScript 命令，我喜欢将该字符串用作普通的 VBScript 代码。如何将该字符串转换为文字 VBScript 代码？任何帮助都会很棒。

请参阅下面我For Loop用来创建表达式的代码。当我使用msgbox打印结果时，我想按原样获取计算值expStr而不是字符串。

For i = 0 to x
    expStr =   expStr  & "":""  & Mid(OrigStr,ArrSt(" & i & "),ArrEn(" & i + 1 & ")-ArrSt(" & i & "))
    i = i + 1
Next

result = expStr 

msgbox result

Answer 1

你有 Eval，它接受一个表达式并返回它的值，Execute，它接受一组语句并在本地范围内执行它们，以及 ExecuteGlobal，它在全局范围内执行它们。

例如，您可以将可重用代码保存在 .vbs 文件中并按如下方式使用它

Set oFs = CreateObject("Scripting.FileSystemObject")
Set oFile = oFs.OpenTextFile(strFile)
code = oFile.ReadAll
oFile.Close
ExecuteGlobal code

您还有 Eval，它接受一个表达式并返回其值，Execute，它接受一组语句并在本地范围内执行它们，以及 ExecuteGlobal，它在全局范围内执行它们。

在 ASP 中，您可以包含这样的代码

<!-- #include File="routines.asp" -->