2013-03-20 2 views
7

VB 스크립트에서 드롭 다운/콤보 상자를 만들려고합니다. 나의 이해에 따라 우리는이 같은 Internet Explorer의 인스턴스를 생성하고 드롭 다운/콤보 상자를 만들어야합니다VB 스크립트에 드롭 다운/콤보 상자 표시

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 

가 IE를 사용하지 않고 DORP 다운/콤보 상자를 만들 수 있습니다를, 메시지 상자 또는 입력 상자와 비슷합니까?

+0

[가치있는 시도] (http://www.veretennikov.org/WSO/) –

답변

5

나는 많은 사람들이이 질문에 대해 기꺼이 대답 할 것이라고 확신한다. 그들의 대답은 다양한 세부 사항을 담고 있을지 모르겠지만 분명히 대답은 똑같다. 적어도 순수한 것은 없다. VBScript 자신의 ActiveX 구성 요소를 프로그래밍하십시오.이 구성 요소는 CreateObject으로 구체화되며 .vbs 스크립트 안에 있습니다.

그러나 대안을 찾고 있다면 HTA을 사용자 지정 GUI 용 옵션으로 고려할 수 있습니다.