2015-01-30 6 views
1

У меня есть HTA, для которого я создал файл справки .chm. Я хочу JavaScript или функция VBScript, чтобы открыть файл .chm из ОМТ, чтобы быть в состоянии сделать кнопку помощи, как это:Открыть .chm от hta

<button onclick="//I don't know what to put here">Help</button> 

Как мне это сделать?

+1

через командную строку: 'новый ActiveXObject ('WScript.Shell') Run ("A_Path_To_CHM_File");'.. – Teemu

+2

Как вы уже много раз задавали вопросы HTA, я бы рекомендовал вам загрузить [устаревшую документацию Windows Script 5.6] (http://www.microsoft.com/en-us/download/details.aspx?id = 2764). Не то, чтобы просить было бы плохо, но документы могут быть более быстрым способом получить информацию в некоторых ситуациях;). – Teemu

ответ

1

В VBScript с ОМТ, мы можем сделать это следующим образом:

<html> 
<Title>How to open VBSCRIP5.CHM</Title> 
<head> 
<HTA:APPLICATION 
ICON="cmd.exe" 
APPLICATIONNAME = "How to open VBSCRIP5.CHM" 
BORDER="dialog" 
BORDERSTYLE="complex" 
> 
<style> 
body{ 
background-color: DarkOrange; 
} 
</style> 
</head> 
<script type="text/Vbscript"> 
Sub OpenCHMFile() 
Dim CHMFile 
CHMFile = "C:\Program Files\Microsoft Office\Office12\1036\VBSCRIP5.CHM" 
Call Launch(CHMFile) 
End Sub 
'******************************************** 
Sub Launch(MyProgram) 
Dim ws,Result 
Set ws = CreateObject("wscript.Shell") 
Result = ws.run(DblQuote(MyProgram),1,False) 
End Sub 
'******************************************** 
Function DblQuote(Str) 
    DblQuote = Chr(34) & Str & Chr(34) 
End Function 
'******************************************** 
</script> 
<body text="white"> 
<center> 
<input type="button" onClick="OpenCHMFile()" value="Open the help file"> 
</center> 
</body> 
</html> 
Смежные вопросы