WinPE 2.0 環境内で実行する HTA アプリケーションを作成しています。
この HTA アプリの目的は、バックアップの場所を選択するようにユーザーに促すことです。現在、BrowseForFolder を使用して、ユーザー フォルダーの場所を確認しています。スクリプトは Vista で正常に動作します。
ただし、これは winpe 2.0 では機能せず、選択するフォルダがないダイアログが表示されます。
これが私のコード、61〜75行目です:http://pastie.org/747122
Sub ChooseSaveFolder
strStartDir = ""
userselections.txtFile.value = PickFolder(strStartDir)
End Sub
Function PickFolder(strStartDir)
Dim SA, F
Set SA = CreateObject("Shell.Application")
Set F = SA.BrowseForFolder(0, "Please choose a location to backup your system to. A .tbi file will be created here.", 0, strStartDir)
If (Not F Is Nothing) Then
PickFolder = F.Items.Item.path
End If
Set F = Nothing
Set SA = Nothing
End Function
失敗した解決策:
1) ディレクトリ X:\Windows\System32\config\systemprofile\Desktop の追加
winpe 2.0 用の高度な HTA アプリを作成した人はいますか? この問題の解決策、または同様のタスクを達成するために私を導くことができるいくつかの C++ コードを探しています。