Jump to content

bblaze83

Member
  • Posts

    5
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    United States

Everything posted by bblaze83

  1. The error that I am getting is "user canceled operation". It is stating that the error is on line 54 and 63, char 11. When I was getting that error I had spaces between each set of scripts. For example: <script language="VBScript"> Sub RunAvast Dim WshShell Set WshShell = CreateObject("WScript.Shell") [color="#FF0000"][b]WshShell.Run "x:\tools\avast\avast.exe", 1, true[/b][/color] End Sub </Script> <p> <Input type="button" value="Avast AntiVirus" name="RunAvast" onclick="RunAvast"></p> <script language="VBScript"> Sub RunDr Dim WshShell Set WshShell = CreateObject("WScript.Shell") [color="#FF0000"][b]WshShell.Run "x:\tools\drweb\drweb.exe", 1, true[/b][/color] End Sub </Script> <p> <Input type="button" value="Dr. Web AntiVirus" name="RunDr" onclick="RunDr"></p> The bold red lines are where the error code was stating. It is char 11 where it said the error was. It's not the launched program that is causing the problem because it can be launched from the command line just fine. The problem resides on 2 different computers as well. As for not changing to WinPE 3.0: 1) it's a BETA and I'm not too keen on BETA, I am looking for something stable and tested. 2) That's what I am used to. I like the "way it handles." It's missing some good stuff like easily customizable shells and so forth. That is why I am using an HTA.
  2. I was able to get the hta menu to start working by using some VBscript. The problem now is that the second and third programs will not run. I am getting an error on line 53 and 61 character 11. I cannot see the problem though as each line was copied from working ones. The script is as follows: <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>PE Applications</title> <script language="vbscript"> <!-- Insert code, subroutines, and functions here --> Set oShell = CreateObject("Wscript.Shell") oShell.Run "%Comspec% /c dir",1,True </script> <hta:application applicationname="apps" border="dialog" borderstyle="normal" caption="Win PE Applications" contextmenu="no" icon="myicon.ico" maximizebutton="no" minimizebutton="yes" navigable="no" scroll="no" selection="no" showintaskbar="yes" singleinstance="yes" sysmenu="yes" version="1.0" windowstate="maximize" > </head> <body bgcolor="#000021" text="#FFFFFF"> <font FACE="Arial" Size=+4> <center><p>| WinPE Utilities |</p> </font> <p> </p> <p> </p> <p> </p> <p> </p> <p> </p> <p> </p> <font face="arial" size=+2> <script language="VBScript"> Sub RunClam Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\clam\clamwinportable.exe", 1, true End Sub </Script> <p> <Input type="button" value="Clam AntiVirus" name="RunClam" onclick="RunClam"></p> [b] <script language="VBScript"> Sub RunAvast Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\avast\avast.exe", 1, true End Sub </Script> <p> <Input type="button" value="Avast AntiVirus" name="RunAvast" onclick="RunAvast"></p> <script language="VBScript"> Sub RunDr Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\drweb\drweb.exe", 1, true End Sub </Script> <p> <Input type="button" value="Dr. Web AntiVirus" name="RunDr" onclick="RunDr"></p>[/b] <script language="VBScript"> Sub RunSophos Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\sophos\sav32cli.exe", 1, true End Sub </Script> <p> <Input type="button" value="Sophos CLI AntiVirus" name="RunSophos" onclick="RunSophos"></p> <script language="VBScript"> Sub RunFC Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\freecommander\freecommander.exe", 1, true End Sub </Script> <p> <Input type="button" value="Free Commander" name="RunFC" onclick="RunFC"></p> <script language="VBScript"> Sub RunRA Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\runalyzer\runalyzer.exe", 1, true End Sub </Script> <p> <Input type="button" value="RunAlyzer" name="RunRA" onclick="RunRA"></p> </font> </center> </body> </html> problem area here: <script language="VBScript"> Sub RunAvast Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\avast\avast.exe", 1, true End Sub </Script> <p> <Input type="button" value="Avast AntiVirus" name="RunAvast" onclick="RunAvast"></p> <script language="VBScript"> Sub RunDr Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Run "x:\tools\drweb\drweb.exe", 1, true End Sub </Script> <p> <Input type="button" value="Dr. Web AntiVirus" name="RunDr" onclick="RunDr"></p> The bold areas are where the problem is residing. Any help would be greatly appreciated.
  3. This is caused by the Windows backup utility pointing to the D: drive by default. HP and Compaq make the recovery partition the D drive, so Windows doesn't know any better. You can change this in the advanced settings under Backup, have it point to the e: drive for discs or any other drive of your choice. Burn your recovery media, if you try to boot to the recovery partition, you may run into corruption.
  4. I am trying to create a menu with links to programs local on winpe image. I am using a bootable flash drive to get into winpe. I am having trouble with the links actually working. The links work just fine from the HTA in a windows environment, but when in winpe, I get nothing. I can click forever and no joy. Please help.
  5. I am trying to create a menu with links to programs local on winpe image. I am using a bootable flash drive to get into winpe. I am having trouble with the links actually working. The links work just fine from the HTA in a windows environment, but when in winpe, I get nothing. I can click forever and no joy. Please help.
×
×
  • Create New...