サービスマニュアルを見るための備忘録。
Windows11だけでなく、Windows10も同様。
<簡単な方法>
テキストファイルを新規作成し、下記画像のように記入します。
コピペ用
CreateObject("InternetExplorer.Application").Visible=true
記入後、ファイルを保存する(名前は何でもOK)。
その後、拡張子を「txt」から「vbs」に変更する。
変更後、ファイルを開くとInternet Explorerのウィンドウが立ち上がるので、
そこにサービスマニュアルのHTMLファイルをウィンドウ内にドロップすることで
閲覧可能。
<ファイルを開くだけでサービスマニュアルを表示させる場合>
テキストファイルの内容を下記の画像のようにします。
コピペ用
Dim objIE
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True
objIE.Navigate2 "C:\ServiceManual\HONDAESM.HTML"
保存後、拡張子をvbsに変更することで閲覧可能です。
なお、今回のケースではCドライブ直下にServiceManualというフォルダを作成し、
その中にサービスマニュアルの内容をコピーしています。
そのため、C:\ServiceManual\HONDAESM.HTML の部分は
各自の環境に合わせて修正願います。
Posted at 2025/09/16 22:08:48 | |
トラックバック(0) | クルマ