Questions tagged «vbscript»


4
在IE9中将任何内容从Javascript传递到VBScript
我有一个用VBScript编写的框架。在此框架的某个函数内部检查函数的If语句中是否为Nothing,然后执行某些操作。使用Java编写的框架的代码。因此,我需要通过Nothing来执行某些操作。在IE8和更早版本中,采用了以下方法: <script type="text/vbscript"> Function Test(val) If (IsNull(val)) Then Test = "Null" ElseIf (IsObject(val)) Then If (val Is Nothing) Then Test = "Nothing" End If End If End Function Dim jsNothing Set jsNothing = Nothing msgBox(Test(jsNothing)) msgBox(Test(Null)) </script> <script type="text/javascript"> alert(Test(jsNothing)); </script> 在IE <9中,输出将为:Nothing,Null和Nothing。 在IE9中:无,无,无。 如何在IE9中将Javathing Nothing传递给VBScript? 抱歉,我知道它很丑,但是我被困了。并讨厌VBScript。 编辑: 有一个框架功能的例子。我无法更改它,因为它已在应用程序中广泛使用。 Function …

5
我可以将参数传递给VBScript(使用cscript启动的vbs文件)吗?
我将此脚本保存在“ test.vbs”中: Set FSO = CreateObject("Scripting.FileSystemObject") Set File = FSO.OpenTextFile(workFolder &"\test.txt", 2, True) File.Write "testing" File.Close Set File = Nothing Set FSO = Nothing Set workFolder = Nothing 运行脚本时,我想传递“ workFolder”变量的值。 我怎样才能做到这一点?我可以做吗?像“ cscript test.vbs workFolder:'C:\ temp \'”之类的东西? 额外的问题:是否有必要使用“ Set workFolder = Nothing”清除传递的变量,还是VBSCript在终止时自动执行此操作?也许“设置文件=什么都没有”和“设置FSO =什么都没有”也是不必要的吗?如果您知道这两个问题的答案,请告诉我。

4
VBScript —使用错误处理
我想使用VBScript捕获错误并记录错误(即发生错误“记录某些内容”),然后继续执行脚本的下一行。 例如, 关于错误继续 '执行步骤1 '执行步骤2 '做第3步 当第1步发生错误时,我希望它记录该错误(或使用它执行其他自定义功能),然后在第2步继续执行。这可能吗?以及如何实施? 编辑:我可以做这样的事情吗? 关于错误恢复myErrCatch '执行步骤1 '执行步骤2 '执行步骤3 myErrCatch: '日志错误 继续下一个

8
在经典ASP中有什么好的解析JSON的库吗?[关闭]
按照目前的情况,这个问题不适合我们的问答形式。我们希望答案得到事实,参考或专业知识的支持,但是这个问题可能会引起辩论,争论,民意调查或扩展讨论。如果您认为此问题可以解决并且可以重新提出,请访问帮助中心以获取指导。 8年前关闭。 我已经找到了无数的库来在Classic ASP(VBScript)中生成JSON,但是我还没有找到任何要解析的库。 我想要一些可以传递JSON字符串并获取某种VBScript对象(数组,Scripting.Dictionary等)的东西 谁能推荐一个用于在经典ASP中解析JSON的库?


7
是否需要将“对象”设置为“无”
我总是读到,建议在完成对对象的设置后,将其设置为空。但是我通常只在表单内部的函数中使用它们。 无论将对象设置为Nothing,在离开函数作用域时是否都不会丢失参考并释放内存? 即是否真的有必要做: Set db = Nothing Set record_set = Nothing
70 vba  vbscript  vb6 

8
仅从字符串返回数字0-9
我需要一个可以在VBScript和.NET中使用的正则表达式,该正则表达式将仅返回在字符串中找到的数字。 例如,以下任何“字符串”应仅返回1231231234 1231231234 (123)123-1234 123-123-1234 (123)123-1234 123.123.1234 1231231234 1 2 3 1 2 3 1 2 3 4 这将在电子邮件解析器中用于查找客户可能在电子邮件中提供的电话号码并进行数据库搜索。 我可能错过了类似的正则表达式,但是我确实在regexlib.com上进行了搜索。 [编辑]-在设置musicfreak的答案后添加了RegexBuddy生成的代码 VBScript代码 Dim myRegExp, ResultString Set myRegExp = New RegExp myRegExp.Global = True myRegExp.Pattern = "[^\d]" ResultString = myRegExp.Replace(SubjectString, "") VB.NET Dim ResultString As String Try Dim RegexObj As New …

1
KB4525236更改了GetRef的内存消耗(垃圾回收)
在Windows 2016 Server / Windows 10客户端上安装KB4525236后,我们会遇到内存不足的问题。通过调用函数时,内存被垃圾回收时,此安全修复程序似乎已发生更改GetRef。 PréKB4525236 GetRef在实例变量设置为时,在通过调用的函数中创建的每个实例都会被垃圾回收。nothing 帖子KB4525236 在通过调用的函数中创建的每个实例都GetRef保留在内存中,并且仅在整个函数完成时才进行垃圾回收。在循环中创建实例时,这可能会迅速累加并导致内存不足,尤其是在32位进程中。 问题 我们在网上找不到任何相关内容,因此我们希望获得其他遇到相同问题的人的确认。 编辑从零开始:这是相同的问题,但尚未解决 (自KB4524570(2019年11月12日)Windows 10 1903起vbscript.dll class_terminate bug 如果有人可以验证并知道可行的解决方案,那就太好了。 POC 在安装了KB4525236的设备上运行的以下脚本显示了以下情况下垃圾收集的区别: 直接调用:仅在第一个实例销毁后才创建第二个实例(这是我们期望的行为) 通过调用GetRef:第二个实例在第一个实例被销毁之前创建,因此有两个实例使用内存。 另存为:KB4525236.vbs 运行为:wscript KB4525236.vbs Dim Name, Log Class IDummyInstance Dim FName Sub Class_Initialize FName = Name Log = Log & "Initialize " & FName & VbNewLine End Sub …
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.