标签: vbscript

我正在尝试将字符代码转换为带有chr()的字符,但VBScript并没有给我我期望的值.根据VBScript,字符代码199是:

�

但是,当使用Javascript的String.fromCharCode之类的东西时,199是:

Ç

第二个结果是我需要摆脱VBScript的chr()函数.知道问题是什么吗？

你如何逃避/VBScript中的正斜杠字符()？例如,在以下字符串中:

bob = "VU administration/front desk"

我正在尝试使用以下方法将一些汉字写入文本文件

Set myFSO = CreateObject("Scripting.FileSystemObject")
Set outputFile = myFSO.OpenTextFile(getOutputName(Argument, getMsiFileName(Wscript.Arguments)), forWriting, True)
outputFile.WriteLine(s) 

该变量s包含一个我从其他文件中读取的汉字。我回显s值，并且可以在屏幕上正确看到。但是，由于某种原因，脚本在停止后outputFile.WriteLine(s)不会返回任何错误消息而停止运行。

我想念什么吗？

vbscript支持还是运营商？

我想在vbscript中执行以下代码,请帮帮我

if a="address1" or b = "address2"
    then Response.Redirect("www.example.com")
endif

我在工作中编写的很多脚本都依赖于动态大小的数组的创建.VBScript中的数组使得这是一项非常艰巨的任务,因为Redim每次想要调整它们时都需要数组.为了解决这个问题,我开始使用逗号分隔的字符串并使用它Split(...)来创建一维数组.虽然这对我很有用,但我想知道VBScript是否有更有效的方法来处理它.所以我问StackOverflow; 在那儿？

免责声明:我完全清楚VBScript是一种非常不合标准的脚本语言,但Python需要额外的软件,这对于服务器自动化来说有点麻烦,而PowerShell还不是核心组件.不过,我正在学习它们两个!

我在经典ASP中有一些VB脚本,如下所示:

if (x and y) > 0 then
    'do something
end if

它看起来像这样:(46和1)= 0和(47和1)= 1

我不明白这是怎么回事.有人可以解释一下吗？

我需要在VBScript中初始化几个具有相同值的变量.我能找到的唯一方法就是举例x = 5 : y = 5 : z = 5.有没有类似的方法x = y = z = 5？

我想打开一个使用密码保存的excel文件,以便使用VBScript进行修改.我当前的代码VBS代码在下面,它可以工作,但它不断弹出boax要求输入密码.如何使用excel提示我输入密码来打开Excel电子表格？

Option Explicit

On Error Resume Next

ExcelMacroExample

Sub ExcelMacroExample() 

  Dim xlApp 
  Dim xlBook 

  Set xlApp = CreateObject("Excel.Application")
  Set xlBook = xlApp.Workbooks.Open("C:\Users\jasons\Documents\TestFile.xlsm",,,,"yep123") 
  xlApp.Visible = True
  xlApp.Run "Refresh_data_ss"
  xlApp.Save
  xlApp.Quit 

  Set xlBook = Nothing 
  Set xlApp = Nothing 

End Sub 

在命令行中,您可以使用以下方式输出当前目录echo %CD%:

Windows Scripting Host提供了ExpandEnvironmentalStrings可以像这样使用的方法:

Dim objWshShell : Set objWshShell = CreateObject("Wscript.Shell")
MsgBox objWshShell.ExpandEnvironmentStrings("%WINDIR%")

但是,它无法使用%CD%.它只返回相同的值,%CD%:

Dim objWshShell : Set objWshShell = CreateObject("Wscript.Shell")
MsgBox objWshShell.ExpandEnvironmentStrings("%CD%")

为什么这不起作用？我知道还有其他方法可以获取当前目录; 这只是一种好奇心.

我一直在努力寻找一种方法来打开普通/编辑模式下的只读文档,而不是使用MS Word 2013打开读取模式.默认情况下,Word 2013启用"启动电子邮件附件和其他不可编辑的文件"的启动选项在阅读视图".

在打开文档时,如何禁用此选项或将视图从"读取"更改为"正常"/"编辑"视图.(我需要将文档保持为只读,因为它可能会被多个人一次访问)

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open(documentPath,,True)
objWord.ActiveWindow.ActivePane.View.Type = wdNormalView

我尝试使用上面的方法设置视图模式,但收到了如下所示的错误代码.我查看了第3行的其他变体但无法使其工作.我还在努力学习VBScript,所以我假设我没有以正确的方式做这件事.

Error: One of the values passed to this method or property is out of range
Code: 800A16D3
Source: Microsoft Word

谢谢.