标签: vbscript

我有这个代码:

a = "xyz"  
g = "abcd " & a  

它运行后,价值g为abcd xyz.

但是,我希望围绕ain 的值引用g.运行代码后,g应该是abcd "xyz".

我怎么能做到这一点？

如何使用VBScript获取变量的类型？

substring()VBScript中的函数是否与Java类似string.substring()？

如何设置vbscript的延迟？

WScript.Sleep(100) 在Windows XP,Vista上不起作用.

是否可以基于正则表达式字符串在Outlook 2007中创建规则？

我想添加过滤器包含一个字符串,如消息:4000-10,四位数字后加破折号后两位数,这可以从任何东西0000-00到9999-99.

我正在使用它作为正则表达式:\b[0-9]{4}\-[0-9]{2}\b但过滤器不起作用.我也尝试过其他一些修改但没有运气.我无法在网上找到关于Outlook是否支持将正则表达式纳入规则的具体内容,所以我想我会问这里以防万一我浪费时间.

编辑:感谢Chris在下面的评论,我能够通过宏实现这个过滤器.我想我会在下面分享我的代码,以防它能够帮助其他人:

Sub JobNumberFilter(Message As Outlook.MailItem)
    Dim MatchesSubject, MatchesBody
    Dim RegEx As New RegExp

    'e.g. 1000-10'
    RegEx.Pattern = "([0-9]{4}-[0-9]{2})"

    'Check for pattern in subject and body'
    If (RegEx.Test(Message.Subject) Or RegEx.Test(Message.Body)) Then
        Set MatchesSubject = RegEx.Execute(Message.Subject)
        Set MatchesBody = RegEx.Execute(Message.Body)
        If Not (MatchesSubject Is Nothing And MatchesBody Is Nothing) Then
            'Assign "Job Number" category'
            Message.Categories = "Job Number"
            Message.Save
        End If
    End If
End Sub

我有一个以.vbs结尾的文本文件,我在下面写了:

Set Conn = CreateObject("ADODB.Connection")
Conn.Provider = "Microsoft.ACE.OLEDB.12.0"
Conn.Properties("Data Source") = "C:\dummy.accdb"
Conn.Properties("Jet OLEDB:Database Password") = "pass"
Conn.Open
Conn.Close
Set Conn = Nothing

• 当我在Windows 32位机器上执行它时,它运行并结束,没有任何概念(预期).
• 当我在Windows 64位计算机上执行此操作时,它会收到错误

  无法找到提供商.它可能没有正确安装.

但它已安装.我认为问题的根源是提供者是32位提供者,据我所知它不存在为64位.

如果我在64位计算机上通过IIS运行VBScript(作为ASP文件),我可以选择它应该以32位模式运行.然后它可以找到提供者.

如何在Windows 64位上找到提供程序？我可以告诉CScript(执行.vbs文本文件)以某种方式在32位模式下运行吗？

我想在VBScript中使用Replace函数来替换"\n"字符串中的所有换行符.我来自java,所以在字符串中使用\n表示换行符.

VBScript中是否有相同的内容？

我和一位同事试图在VBScript"For/Next"循环中找到一种相当于"continue"语句的方法.

我们看到的每个地方都发现人们没有办法在VBScript中做到这一点而没有讨厌的嵌套,这对我们来说不是一个选择,因为它是一个非常大的循环.

我们提出了这个想法.它会像"继续(下一次迭代)"一样工作吗？有没有人有更好的解决方法或改进建议？

For i=1 to N
  For workaroundloop = 1 to 1
    [Code]
    If Condition1 Then
      Exit For
    End If

    [MoreCode]
    If Condition2 Then
      Exit For
    End If

    [MoreCode]
    If Condition2 Then
      Exit For
    End If

    [...]

  Next
Next

感谢您的意见

是否可以在vbscript中创建文件并在其中写入行？

类似于bat文件中的echo(echo something something >>sometextfile.txt).

在根据脚本的路径将创建一个autorun.inf文件来执行特定程序(VBScript中的执行\ smartdriverbackup\sdb.exe).

另外,如何从完整文件路径中删除/删除驱动器号？

如何在VBScript中将项添加到现有数组？

是否有一个VBScript等效于Javascript中的push函数？

即

myArray有三个项目,"苹果","橙子"和"香蕉",我想在阵列的末尾添加"西瓜".