Fatal编程技术网
  • vbscript/
  • 如何在vbscript中从子脚本中获取字符串

如何在vbscript中从子脚本中获取字符串

vbscript

如何在vbscript中从子脚本中获取字符串,vbscript,hta,Vbscript,Hta,在本例中： TestSub.vbs a = "String" TestSub a Sub TestSub(a) MsgBox "Test " & a End Sub 子函数工作正常，在MsgBox中显示文本“Test String” 但在本例中（嵌入在HTA中） TestSub2.VBS Sub getdata NameID = "name123" ' NameID = 123 ' (This works) strHTML0 = strHT

在本例中：

TestSub.vbs

a = "String"

TestSub a

Sub TestSub(a)

    MsgBox "Test " & a

End Sub
子函数工作正常，在MsgBox中显示文本“Test String”

但在本例中（嵌入在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

Sub-getdata
NameID=“name123”
'NameID=123'（这是有效的）
strHTML0=strHTML0&_
"" & _
"" & _
NameID&_
"" & _
""
SelectBox.innerHTML=strHTML0
端接头
子更新选择（名称ID）
MsgBox“测试”和NameID
端接头
选择框中会显示
NameID
，但当您调用sub时，它不会显示在消息框中，但是，如果您设置
NameID=123
，它会在消息框中显示整数

为什么它只能显示整数，如何让它显示字符串

在

上发布整条.hta。您正在连接字符串，并且必须以以下方式分隔NameID值：

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

”&_
您需要在
选择
选项上指定
onclick
而不是
选项上指定
onclick
，它不起作用，我不希望每次单击选择框时触发
onclick
事件