wscript visual vbs script ejemplos ejecutar scripting vbscript scripting-language

scripting - visual - Mostrar un cuadro desplegable/cuadro combinado en VB Script



ejecutar vbs (1)

Estoy intentando crear un cuadro desplegable / combo en VB Script. Según mi entendimiento, necesitamos crear una instancia para Internet Explorer y crear un cuadro desplegable / combinado, algo como esto:

set oIE = createObject("InternetExplorer.Application") with oIE .Navigate "about:blank" Do until .ReadyState = 4 : WScript.Sleep 100 : Loop set oDoc = .document .Visible = true end with with oDoc .open .writeln "<html><head><title>ComboBox Example</title></head>" .writeln "<body scroll=no><object " .writeln "classid=clsid:8BD21D30-EC42-11CE-9E0D-00AA006002F3" .writeln "id=ComboBox1 width=400></object><p>" .writeln "</body></html>" .close Do until .ReadyState = "complete" : WScript.Sleep 100 : Loop set oComboBox1 = .all.ComboBox1 end with with oComboBox1 .List = Array("One", "Two", "Three", "Four") .AutoWordSelect = true .focus end with oDoc.parentWindow.opener = "Me" bClosing = false on error resume next do until bclosing: wsh.sleep 100 : loop oIE.quit sub Closing : bClosing = True : end sub

¿Es posible crear un recuadro dorp down / combo sin usar IE, similar al Cuadro de mensaje o al Cuadro de entrada?


Estoy seguro de que muchos usuarios estarán encantados de responder a esta pregunta, y su respuesta puede contener varios detalles, pero de seguro la respuesta hubiera sido la misma: No. Al menos no con VBScript puro y sin programar su propio ActiveX componente, que luego para instanciar con CreateObject dentro de su script .vbs .

Pero si busca una alternativa, entonces puede considerar HTA como una opción para su propia GUI personalizada.