.hta 파일의 VBScript 사용

VBScripting을 처음 사용했지만 VBScript를 사용하여 .wsf 파일을 만들 수있었습니다..hta 파일의 VBScript 사용

나는 이것을 한 단계 더 나아가 HTML 응용 프로그램을 사용하여 좀 더 대화식으로 만들기로 결정했습니다. 나는 이것에 대해 꽤 많이 읽었으며 .hta 파일에서 WScript를 사용할 수없는 것처럼 보였지만이 작업을 수행 할 수있는 깨끗하고 간단한 방법을 볼 수 없습니다. 나는 이것으로 내 발목을 잡는 데 도움이되는 몇 가지 지침이나 모범 사례 아이디어에 정말 감사 할 것입니다. 사전에

set fs = WScript.CreateObject("Scripting.FileSystemObject") 
    set oShell = CreateObject("Wscript.Shell") 
    set objShell = CreateObject("Shell.Application") 

    currDir = oShell.currentDirectory 
    CreateFolder(C:\TEMP1234") 


    Function CreateFolder(foldr) 
     dim create 
     if(fs.FolderExists(foldr)) then 
      Msgbox "Folder already exists: "+foldr 
     else 
      fs.CreateFolder(foldr) 
     end if 
    End Function 

</script> 

<body> 
<p>Please make selection</p> 
<input type="checkbox" name="Selection" value="1.">Option 1<br> 
<input type="checkbox" name="Selection" value="2.">Option 2<br> 

<input id=runbutton class="button" type="button" value="OK" name="ok_button" onClick"getSelection"> 
&nbsp;&nbsp;&nbsp; 
<input id=runbutton class="button" type="button" value="Cancel" name="cancel_button" onClick="CancelScript> 

</body> 

<script language="VBScript"> 

    Sub getSelection 
     if Selection(0).Checked then 
      option1 
     end if 
     if Selection(1).Checked then 
      option2 
     end if 

     if radioChoice="" then 
      exit sub 
     end if 
    end sub 

    Sub CancelScript 
     Self.Close() 
    end sub 

    sub option1 
     Msgbox "Option 1 Selected" 
    end sub 

    sub option2 
     Msgbox "Option 2 selected" 
    end sub 

</script>

감사 :

어쨌든, 코드가 희망이 있고 꽤 자기 설명입니다! 코드에서

출처

2013-02-18 Ekins86

일부 세부 정보 :

당신은 파일에서 allover 스크립트를했습니다. head 및/또는 body에 넣으십시오. 단,이 두 요소의 바깥 쪽은 어디에도 없습니다.

WScript 개체는 HTA에서 사용할 수 없습니다. fs = CreateObject("Scripting.FileSystemObject"); 트릭을 수행합니다.

여기에서 인용문 CreateFolder(C:\TEMP1234")은 의심 스럽습니다. 쌍을 이루지 못하거나 여분입니까? 경로 이름에는 따옴표가 포함될 수 없으므로 수정해야 할 사항이 있습니다.

첫 번째 input에는 오타가 있으며 =은 (는) <input ... onClick"getSelection">입니다. getSelection이 호출되지 않기 때문에 이것은 중요합니다.

출처

2013-02-18 13:16:31 Teemu

.hta 파일의 VBScript 사용

답변

관련 문제