标签: vbscript

问题说这一切都真的,但......

我正在扫描一个文件,寻找与某个正则表达式模式匹配的行,然后我想打印出符合但按字母顺序排列的行.我确定这是微不足道的,但vbscript不是我的背景

我的数组定义为

Dim lines(10000)

如果这有任何区别,我正在尝试从正常的cmd提示符执行我的脚本

谢谢

我正在尝试在vbscript中的单个If语句中执行两个条件.应该很简单,但它不起作用.就像是:

 If Not (fileName = testFileName) & (fileName <> "") Then
Else ....

我正在制作两个if语句以使其正常工作,但是我可以做一个不带条件的"和"而另一个没有条件吗？

我正在尝试编写VBScript,我正在使用Randomize和MsgBox等函数.我很好奇使用()和不使用它们有什么区别.例如:

Randomize - 这条线有效.

Randomize() - 这条线也有效.

MsgBox "Hello world!" - 这很有效.

MsgBox ("Hello world!") - 这也有效.

该脚本将在具有不同Windows版本(至少是Windows XP)的多台计算机上运行.我想知道在使用这些函数时是否会遇到任何兼容性/语法问题.

我正在尝试自动将文件推送到我的用户的主目录中,但是我被困在"权限被拒绝"错误上 - 在这里使用CopyFile调用抛出第6行.

脚本的其他部分(未显示)使用相同的源和目标目录创建和复制文件夹内容,并且它们完美地工作.只有当我使用CopyFile失败时才会这样.

Dim fso

Set fso = CreateObject("Scripting.FileSystemObject")

If Not fso.FileExists("H:\Minecraft\.minecraft\options.txt") Then
    fso.CopyFile "C:\Minecraft\options.txt", "H:\Minecraft\.minecraft\"
End If

Set fso = Nothing

H: 是一个网络主目录,当前用户具有完全读/写权限.

我尝试添加/删除路径中的尾部斜杠,添加"options.txt"到目标路径,删除false参数...不确定还有什么要尝试.有什么想法吗？

谢谢!

仅供参考,在上面容易出错的位之前,这段代码每次都会完美地执行:

If Not fso.FolderExists("H:\Minecraft\.minecraft\bin\") Then
    If Not fso.FolderExists("H:\Minecraft\.minecraft\") Then
        fso.CreateFolder("H:\Minecraft\.minecraft\")
    End If
    fso.GetFolder("C:\Minecraft\bin\").Copy "H:\Minecraft\.minecraft\"
End If

结肠的目的是什么？

例如:

Dim objConn : Set objConn = OpenConnection()`

结肠用于将两个语句组合成一行吗？我只是想确定一下.

PS:我试着在Google上搜索这个问题的答案而没有运气.

有没有退出/破坏whileVBS/VBA的方法？

以下代码无法按预期工作:

num = 0
while (num < 10)

    if (status = "Fail") then
        exit while
    end if

    num = num+1
wend

PrinterLabel = Printer + PrinterNumber

If Floors = 1 And (PrinterLabel) > 127 Then 
    Wscript.Echo "Invalid Printer11 Selection "    
    Wscript.Quit
End If

If Floors = 2 And PrinterLabel > 220 Then 
    Wscript.Echo "Invalid Printerss Selection "    
    Wscript.Quit
End If

问题是PrinterLabel是一个String,我想将它转换为Int并进行比较.

PrinterLabel是一个字符串,也是一个数字"218"

有什么建议？

我在Classic ASP页面中有以下VBScript:

function getMagicLink(fromWhere, provider)
    dim url 
    url = "magic.asp?fromwhere=" & fromWhere
    If Not provider is Nothing Then ' Error occurs here
        url = url & "&provider=" & provider 
    End if
    getMagicLink = "<a target='_blank' href='" & url & "'>" & number & "</a>"
end function

我不断在行上写一个"Object Required"错误消息If Not provider Is Nothing Then.

值为NULL,或者它不是NULL,为什么我会收到此错误？

编辑:当我调用对象时,我传入NULL,或者传入一个字符串.

请记住这是经典的asp

哪个更好,所有HTML包含在Response.Write语句中或通过<%=%>将变量插入HTML.
例如

Response.Write "<table>" & vbCrlf
Response.Write "<tr>" &vbCrLf
Response.Write "<td class=""someClass"">" & someVariable & "</td>" & vbCrLf
Response.Write "</tr>" & vbCrLf
Response.Write "</table>" & vbCrLf

VS

<table>
  <tr>
     <td class="someClass"><%= someVariable %></td>
  </tr>
</table>

我主要是从性能的角度询问,当要插入多个变量时,服务器的影响最小？

如果没有技术差异,那么另一个的争论是什么？

我只需要编写一个简单的批处理文件来运行vbscript.vbscript和批处理文件都位于同一文件夹中,并且位于SysWOW64目录中,因为vbscript只能在该目录中执行.目前我的批处理文件如下:

@echo off
%WINDIR%\SysWOW64\cmd.exe
cscript necdaily.vbs

但是vbscript没有执行,只是命令提示符已打开.任何人都可以告诉我如何在运行此批处理文件时执行vbscript？谢谢.