vbscript – 尝试在.VBS文件中“包含”.ASP文件

当您提到“.ASP文件中的数据”时,另一种方法可能是.ReadAll()将文件作为文本并将信息解析为合适的(可能是复杂的)变量.

如果您需要更多帮助,请发布一个小的但有代表性的文件样本,以便“包含”.

演示脚本(针对给定样本)：

Option Explicit

Dim sASP : sASP = Join(Array( _
     " <% If MyVar = ""1"" Then" _,"       Data1 = ""this""" _,"       Data2 = ""that""" _,"   Else" _,"       Data1 = ""hi""" _,"       Data2 = ""there""" _,"   End If %>" _
),vbCrLf)
WScript.Echo sASP

Dim sExpr : sExpr = Replace(Replace(sASP,"<%",""),"%>","")
WScript.Echo sExpr
Dim MyVar,Data1,Data2
For Each MyVar In Split("1 2")
    ExecuteGlobal sExpr
    WScript.Echo myVar,Data2
Next

输出：

cscript 22821687.vbs
 <% If MyVar = "1" Then
       Data1 = "this"
       Data2 = "that"
   Else
       Data1 = "hi"
       Data2 = "there"
   End If %>
  If MyVar = "1" Then
       Data1 = "this"
       Data2 = "that"
   Else
       Data1 = "hi"
       Data2 = "there"
   End If
1 this that
2 hi there

更新评论和@Dennis的演示代码：

我错误地认为(根据w / cscript拒绝它们)“<％..％>”会引起问题.正如Dennis的代码所示(并且我的’阅读’测试确认后),Execute(Global)处理得很好;替换是没有必要的. (所以我认为丹尼斯的答案值得赞扬.)