标签: vbscript

我有一个html页面,其中包含一些带有复选框的表单.我需要使用VbScript ASP来确保选中一个复选框.我怎么做？这是复选框本身:

Dim terms
terms = Request.Form("terms")

对不起,如果标题有点模糊.我想不出怎么说呢!

我有一个脚本,可以将数据检索到3个不同的记录集中.它们被称为rs1,rs2和rs3.

我稍后在脚本中有相当多的代码,所以我创建了一个节省存储空间等功能.

在函数中,我希望使用之前打开的记录集中的信息.我已经尝试将记录集的名称传递给函数,如下所示:

Function displayData(recordsetName)

response.write(recordsetName.Source)

End Function

displayData("rs1")

然而,这是试图显示一个名为recordsetName的记录集的结果,因为它不存在它会引发错误.

有人告诉我使用'ByRef'然而这会引发一个错误,说记录集不存在.

如何将传递给函数的recorset名称用作参数？

谢谢

我有来自Microsoft支持的以下vbs脚本用于添加Excel加载项:

Dim oXL As Object
Dim oAddin As Object
Set oXL = CreateObject("Excel.Application")
oXL.Workbooks.Add
Set oAddin = oXL.AddIns.Add("c:\Program Files\MyApp\MyAddin.xla",  True)
oAddin.Installed = True
oXL.Quit
Set oXL = Nothing

我将上面的脚本保存到一个名为addin.vbs的文件中,并从命令控制台运行它:

C:\...>cscript addin.vbs

我收到以下错误:

c:\...\addin.vbs(1, 9) Microsoft VBScript compilation error: Expected end of statement

不知道如何从cmd控制台运行它？

我是从Windows XP运行它.

我在ASP中有一个如下所示的数组:

3,5,7,7,3,2,3

我想要做的是将它们与计数分组,这样我就可以:

Number  Count
2       1
3       3
5       1
7       2

这可能吗？如果是这样的话？

我一直在努力寻找一种方法来获取驻留在我们服务器上的.png文件的图像宽度。我正在尝试读取文件的前24个字节，并从字节17-20解析出宽度。我在网上找到了一些例程，但是没有成功。奇怪的是，看来我正在将21-24字节的高度从十六进制解码为十进制就好了。我已经使用十六进制查看器验证了文件内容，并且文件很好。这是例程的主要部分：

Function ReadPNG(fichero)
Dim fso, ts, s, HW, nbytes
    HW = Array("0", "0")
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set ts = fso.OpenTextFile(Server.MapPath("\forums\attachments/" & fichero), 1)
    s = Right(ts.Read(24), 8)
    HW(0) = HexToDec(HexAt(s,3) & HexAt(s,4))
    HW(1) = HexToDec(HexAt(s,7) & HexAt(s,8))
    ts.Close
    ReadPNG = HW
End Function

Function HexAt(s, n)
    HexAt = Hex(AscAt(s, n))
End Function

Function HexToDec(ByVal HexVal)

Dim i, num, part
num = 0
For I = 1 to Len(HexVal)
    part = Mid(StrReverse(UCase(HexVal)), I, 1)
    If IsNumeric(part) Then
        num = num …

我有一个脚本(或者更确切地说会有一个脚本)来检查文件夹并将文件从这个文件夹复制到另一个位置(每天运行一次).但是,我要复制的fileName会根据日期而更改.

基本上,我不想将"strFilePath"设置为"C:\ somePath\somePath2\myFile.txt",而是想简单地采用最近修改过的(或者添加 - 这会对脚本产生影响吗？) "somePath2"文件夹并将其复制到目标.

奖金(但不是完全必要的)是检查脚本是否在过去24小时内修改/添加了文件,并且仅在该情况下将其复制.

谢谢你的帮助!

我XPath应该使用什么查询来访问GetLogisticsOfferDateResult节点？我附上了我正在使用的vbscript.我怀疑问题与文档中的多个名称空间有关.但是如何在XPath中引用第二个命名空间？

Dim responseXML
responseXML = '"<s:Envelope xmlns:s=""http://schemas.xmlsoap.org/soap/envelope/""><s:Body><GetLogisticsOfferDateResponse xmlns=""http://schneider-electric.com/OrderEntryService""><GetLogisticsOfferDateResult>2010-07-20</GetLogisticsOfferDateResult></GetLogisticsOfferDateResponse></s:Body></s:Envelope>"'

Dim responseDoc
Set responseDoc = WScript.CreateObject("MSXML2.DOMDocument.6.0")
responseDoc.loadXML(responseXML)
responseDoc.setProperty "SelectionNamespaces", "xmlns:s='http://schemas.xmlsoap.org/soap/envelope/'"
Dim requestedNode
'This node is not found
'Set requestedNode = responseDoc.selectSingleNode("//s:Envelope//s:Body//GetLogisticsOfferDateResponse//GetLogisticsOfferDateResult")

'This node is found
Set requestedNode = responseDoc.selectSingleNode("//s:Envelope//s:Body")
'This node is found
'Set requestedNode = responseDoc.selectSingleNode("//s:Envelope")

If requestedNode Is Nothing Then
    WScript.Echo "Node not found"
Else
    WScript.Echo requestedNode.text
End If

Set responseDoc = Nothing
Set LODateNode = Nothing

我有一个使用InternetExplorer对象的vbscript导航到几个页面并将数据传递给那些页面.最近自从修补IE8以来,我注意到有些东西导致了僵尸iexplore.exe进程的创建.在运行我的脚本并在任务管理器中查看进程列表时,我注意到当我的脚本创建InternetExplorer.Application对象时,进程列表中会出现两个进程.这是正常的行为吗？为什么会这样？我想知道,因为即使在我测试期间,当我调用InternetExplorer对象的退出方法时,这两个进程似乎都被杀死了,我仍然怀疑这些多个进程是僵尸的根本原因.

以下是一些示例代码:

Set ie = CreateObject("InternetExplorer.Application")

ie.Navigate2 "Address"
ie.AddressBar = 1 
ie.Toolbar = 1 
ie.StatusBar = 1 
ie.Width = 600 
ie.Height = 400 
ie.Left = 300 
ie.Top = 150    
ie.Visible = 1

Do While ie.Busy
        WScript.Sleep 1
Loop

ie.Navigate2 "Address?variable=value"

Do While ie.Busy
        WScript.Sleep 1
Loop

...rest of code...
ie.Quit
Set ie = Nothing

有一个关于VBS的问题:我怎样才能启动一个隐藏的新窗口(例如firefox.exe),所以它不会显示在任务栏中,你不会看到窗口？我知道它可能但我不知道怎么了...

感谢帮助

有没有办法让VBScript点击你的屏幕的确切位置,如(10,100)或沿着那些线？或者也许点击文本框？