Question

在这个例子中：

TestSub.vbs

a = "String"

TestSub a

Sub TestSub(a)

    MsgBox "Test " & a

End Sub

Sub功能正常工作并显示文本＆＃34; Test String ＆＃34;在MsgBox中

但是在这个例子中（嵌入在HTA中）

TestSub2.VBS

Sub getdata

    NameID = "name123"

    ' NameID = 123 ' (This works)

    strHTML0 = strHTML0 & _
    "<select>" & _
        "<option onclick='UpdateSelect("& NameID &")' language='vbscript'>" & _
            NameID & _
        "</option>" & _
    "</select>"

    SelectBox.innerHTML = strHTML0

End sub

Sub UpdateSelect(NameID)

    MsgBox "Test " & NameID

End sub

NameID显示在选择框中，但是当您调用sub时它不会显示在消息框中，但是，如果设置NameID = 123，它会在消息框中显示整数< / p>

为什么它只显示整数以及如何让它显示字符串？

在 pastebin

上发布整个.hta

Answer 1

您正在连接字符串，并且必须以这种方式分隔NameID值：

"<option onclick='UpdateSelect("""& NameID &""")' language='vbscript'>" & _

如何从vbscript中的sub获取字符串

1 个答案: