Please point me in the right direction...

[scandler]

Hello,
I am new to web development, but am familiar (however briefly) with many different languages, but need some direction on this.

I have written a vb script that when run, willl inventory a pc for various applications (adobe, winzip, and ie6 to name a few). This only works currently when run from a fileserver as it installs the necessary apps if they are newer versions, or do not exist.

I would like VERY much to incorporate this into a web page. I can get the vb to run, but it promts the user, warning them that this script could be dangerous. I make it an exe and it asks to open or save. If they save it, it won't run properly. SO... is there any way to;

1. Run the script itself (without making it an exe) and NOT get the script warning

OR

2. Run it as an exe without the open/save dialog coming up

OR

3. Write it in a different language so as to avoid the afore mentioned pitfalls.

ANY and all help will be greatly appreciated.

Thanks,

[khaki]

The ability to protect computers from having EXEs run automatically is essential.

If you are looking to bypass the user's option of saving/running or not saving/running... then you sound unscrupulous in your intentions.

Let the user decide (not that you have much other option anyway).

Your whole explanation sounds devious. And if it's not... why are you looking to bypass a basic warning?
Big deal... so the user has to decide if they want your code running against thier machine or not!
Why shouldn't they get that warning?

This isn't a "pit-fall" for any honest developer... it's an understood and accepted reality.

you freak me out :eek:

[scandler]

That's pretty funny! I was more or less looking for a way to integrate this interrogation into the web page so it did it on launch. This is for internal usage, within my company and I assure you... I don't have anywhere near the skills required to be devious!

Once the interrogation is complete, then the technician (my user) would click on an install button to install the applications.

I will post my code (it's currently in WinBatch, not VB as I mistakenly mentioned earlier) so you can see how non-devious my intentions are!

I'm not looking to dump applications on a users pc, only to provide a simple method for my techs to do their installs! This utility (if I can ever make it work) will help us to keep our images up to date!

I appreciate your concern though, I too wouldn't want to help a "questionable" individual achieve a goal I felt was ominous!

Here is the code:
~snip~*******************************************
;Applications being displayed (all are unavail until verified needed in the gosub's)
AppLauncher004=`009,041,056,012,CHECKBOX,AdobeAcrobat,"Adobe Acrobat 5.1",1,4,2,DEFAULT,DEFAULT,DEFAULT`
AppLauncher005=`009,061,060,012,CHECKBOX,InternetExplorer,"Internet Explorer 6.0",1,5,2,DEFAULT,DEFAULT,DEFAULT`

;Subroutines to check for applications
GOSUB Adobe
Gosub IE6

;Dialog here


AppLauncherFormat=`WWWDLGED,6.1`

AppLauncherCaption=`WBH Application Launcher`
AppLauncherX=175 ;037
AppLauncherY=35;092
AppLauncherWidth=286
AppLauncherHeight=270
AppLauncherNumControls=006
AppLauncherProcedure=`DEFAULT`
AppLauncherFont=`DEFAULT`
AppLauncherTextColor=`DEFAULT`
AppLauncherBackground=`DEFAULT,DEFAULT`
AppLauncherConfig=0

AppLauncher001=`185,251,036,012,PUSHBUTTON,DEFAULT,"Install",1,1,32,DEFAULT,DEFAULT,DEFAULT`
AppLauncher002=`241,251,036,012,PUSHBUTTON,DEFAULT,"Cancel",0,2,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
AppLauncher003=`005,023,138,210,GROUPBOX,DEFAULT,"Available Applications",DEFAULT,3,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
;AppLauncher004=`009,041,056,012,CHECKBOX,AdobeAcrobat,"Adobe Acrobat 5.1",1,4,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
;AppLauncher005=`009,061,044,012,CHECKBOX,MyVariable3,"Check 2",1,5,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
AppLauncher006=`009,085,044,012,CHECKBOX,MyVariable4,"Check 3",1,6,DEFAULT,DEFAULT,DEFAULT,DEFAULT`

ButtonPushed=Dialog("AppLauncher",1)

if buttonpushed==1
;Catalog all the updates necessary
if AdobeAcrobat==1 then ;insert run of app here with a Wait command
if InternetExplorer==1 then ;insert run of app here with a Wait command
endif


exit

;Applications to check for (gosubs)

:adobe
adobepath=FileLocate("acrord32.exe")
if FileExist ("C:\Program Files\Adobe\Acrobat 5.0\Reader\AcroRd32.exe")
AdobeVer=FileVerInfo ("C:\Program Files\Adobe\Acrobat 5.0\Reader\AcroRd32.exe","","ProductVersion")
if AdobeVer<5.1
AppLauncher004=`009,041,056,012,CHECKBOX,AdobeAcrobat,"Adobe Acrobat 5.1",1,4,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
return
endif
else
AppLauncher004=`009,041,056,012,CHECKBOX,AdobeAcrobat,"Adobe Acrobat 5.1",1,4,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
endif
return

:IE6
if FileExist ("C:\Program Files\Internet Explorer\iexplore.exe")
IEver=FileVerInfo ("C:\Program Files\Internet Explorer\iexplore.exe","","ProductVersion")
if IEVer<6.0
AppLauncher005=`009,061,060,012,CHECKBOX,InternetExplorer,"Internet Explorer 6.0",1,5,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
return
endif
else
AppLauncher005=`009,061,060,012,CHECKBOX,InternetExplorer,"Internet Explorer 6.0",1,5,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
endif
return
~snip~********************************************