标签: vbscript

我已经制作了一个.vbs文件来清除我计算机上的RAM,它只是打开我写入的记事本.我该怎么做才能解决这个错误？我试过重写文件.我删除了该文件并重新制作.文件说

clearmem=space (10902)

编码是ANSI.

我有一个HL7消息导出.有一个字段在输入中有一个tild符号(〜).HL7将其转换为符号"\ R \"

我也尝试使用VBScript使用ASCII值(126)作为'〜'字符导出此值.但这也被HL7转换为"\ R \"

如何导出'〜'？任何帮助,将不胜感激.

我在VS2012上用ATL创建了一个基本的COM DLL.它被称为testCOM.dll,它只有一个名为CSimpleObj的类.CSimpleObj只有一个名为addValues的方法,它添加了两个值.

我已经使用Windows 7 64位注册了DLL.在VBA中,我手动添加对DLL的引用,以下代码正常工作

Dim Obj As New testCOMLib.SimpleObj
MsgBox Obj.addValues(1,2)

它给出了一个3号的消息.

现在如果我运行包含以下内容的vbs:

Dim Obj
Set Obj = CreateObject("testCOMLib.SimpleObj")

它经常出错并且无法创建对象.但是如果我使用"Excel.Application"ProgID(作为示例)用于CreateObject方法,它可以正常工作.

我认为注册DLL存在问题.我已经检查了注册表,COM和类型库的键已经存在.

我该怎么办？

我想在空间之前抓住第一个字符.

我知道可以这样做

 str = "3 Hello World"
 str = Mid(str, 1,2)

但是如何在一个空间之后做到这一点？

我能够使用兼容模式在IE 10中浏览并将网站添加到Intranet区域/受信任区域.我不确定IE11.我们正计划将组织级别升级到IE11.请告诉我您对经典ASP应用的建议.谢谢.

通过添加两个问题来阐述我的问题:

1. 哪些ASP的东西/组件/功能在IE11中会失败,但它们在IE8中成功运行？

2. 哪些ASP的东西/组件/功能在IE11中会失败,但它们在IE10中成功运行？

我在宏中使用以下代码删除excel中的空行.你可以帮我把它转换成Vbscript吗？

Columns("A:A").Select
   Selection.SpecialCells(xlCellTypeBlanks).Select
   Selection.EntireRow.Delete

等待你的宝贵回应.

我正在尝试编写将运行ping命令的脚本,并且从输出中它将获得平均延迟和丢包值的百分比,我尝试使用下面的命令运行良好

`ping -n 8 4.4.4.4  > D:\latency.txt

C:\Users\tnt5273>ping 4.2.2.2

Pinging 4.2.2.2 with 32 bytes of data:
Reply from 4.2.2.2: bytes=32 time=253ms TTL=54
Reply from 4.2.2.2: bytes=32 time=242ms TTL=54
Reply from 4.2.2.2: bytes=32 time=252ms TTL=54
Reply from 4.2.2.2: bytes=32 time=248ms TTL=54
Reply from 4.2.2.2: bytes=32 time=253ms TTL=54
Reply from 4.2.2.2: bytes=32 time=242ms TTL=54
Reply from 4.2.2.2: bytes=32 time=252ms TTL=54
Reply from 4.2.2.2: bytes=32 time=248ms TTL=54

Ping statistics for 4.2.2.2:
    Packets: Sent = 8, Received = 8, Lost = 0 (**0% loss**), …

如果在远程服务器上指定插件命令,则可以执行脚本.
在下面的示例中,插件命令是get_disk:

 command[get_disk]=csript.exe c:\nagios\checks\check_disks_percentage_spave_used.vbs

但是,我希望远程服务器上的NRPE在客户端服务器上执行脚本,而不需要插件命令.
在远程服务器上这样的事情:

check_nrpe  -H 196.35.132.9 -t 60 -c 'csript.exe c:\\nagios\\checks\\check_disks_percentage_space_used.vbs'

我有一些每晚刷新的Excel文件

我现在想用密码保护它们，以便修改其中的任何数据，但是当脚本打开文件时，它会提示您输入密码，

如何通过脚本传递密码？

这是我用的（尝试过的）

Set fs = CreateObject("Scripting.FileSystemObject")
 Set rootFolder = fs.GetFolder(fs.GetParentFolderName(wscript.ScriptFullName))
Set oExcel = CreateObject("Excel.Application")

 oExcel.Visible = True
 oExcel.DisplayAlerts = False
 oExcel.AskToUpdateLinks = False
 oExcel.AlertBeforeOverwriting = False

 For Each file in rootFolder.Files
   If inStr(file.type, "Script") = 0 Then
     Set oWorkbook = oExcel.Workbooks.Open(file.path)

Dim WSH
Set WSH = CreateObject("WScript.Shell")
wsh.sleep(25000)
Wsh.SendKeys "?"
Wsh.SendKeys "{ENTER}"  

     oWorkbook.RefreshAll
     oWorkbook.Save
     oWorkbook.Close
     Set oWorkbook = Nothing
  End If
 Next

 oExcel.Quit
set oExcel = nothing

有什么帮助吗？我真的不使用vb​​s（根本）

编辑，此代码在打开文件时刷新所有文件，然后保存然后关闭，我只是不知道如何获取它以输入密码才能在完全编辑模式下打开它

Set fs = CreateObject("Scripting.FileSystemObject")
 Set rootFolder = fs.GetFolder(fs.GetParentFolderName(wscript.ScriptFullName))
Set …

如何从命令行更改List分隔符？

通常我必须在以下位置编辑字段:控制面板→更改键盘或其他输入法→其他设置

我希望创建一个我点击的VBScript,它会自动更改,为;,以及另一个返回的VBScript .