Link to home
Start Free TrialLog in
Avatar of andre_st
andre_st

asked on

Need a simple batch-script to start and close software, with a time delay in between.

I need a simple batch-script to open up an image in Internet Explorer (to display a warning). The IE-windows needs to be open for about 3-4 seconds before it automatically closes. After that I want another application to start.

How do I accomplish this?

As for the first line, it should look something like this:

%ProgramFiles%\Internet Explorer\Iexplore.exe" -k "%programfiles%\software\image.jpg"

But how do I configure the time delay, termination of IE - and finally making the other application start?
Avatar of Tompa99
Tompa99
Flag of Sweden image

Hi

I can do that for you in one vbscript for you,
This one first shows a picture for 4 seconds and then starts notepad.

You can modify the explorer with stuff like size status bar add one of the following before
objExplorer.Visible = 1  

      objExplorer.ToolBar = 0
      objExplorer.StatusBar = 0
      objExplorer.Width = 400
      objExplorer.Height = 250
      objExplorer.Left = 300
      objExplorer.Top = 200

by this you can play with how the Internet explorer is shown.

Save the code in to a vbs file and change the path for you jpg
from c:\temp\FI.593.0.1.jpg to your choice and test.

Best Regards Tompa



ShowPicture
RunNotePad

private function RunNotePad
	Dim objWshShell 
	Set objWshShell = WScript.CreateObject("WScript.Shell.1")
	objWshShell.Exec("notepad.exe")
end function

private function ShowPicture()
	set objExplorer = WScript.CreateObject ("InternetExplorer.Application", "IE_")
	objExplorer.Visible = 1             
	objExplorer.Navigate "file:///c:\temp\FI.593.0.1.jpg"   
	Wscript.Sleep 4000
	objExplorer.Quit
end function

Open in new window

Avatar of andre_st
andre_st

ASKER

Hi!

Thanks for a quick answer! IE starts up the image without problems. However, the script is giving me some errors on line 15 (se attached error-image). Any idea how to fix that?




error-message.png
Hi

I think if you close the windows before timeout you get that message.
But if you change the code to the following you should be alright.

Best Regards Tompa
private function ShowPicture()
	Dim objExplorer
	set objExplorer = WScript.CreateObject ("InternetExplorer.Application", "IE_")
	objExplorer.Visible = 1             
	objExplorer.Navigate "file:///c:\temp\FI.593.0.1.jpg"   
	Wscript.Sleep 4000
	on error resume next	
		objExplorer.Quit
	on error goto 0
end function

Open in new window

Hello again!

The new version seems to work ,-) At least I get no errormessages, and both applications start.

But there is one small thing. Instad of IE starting first, closing down after a few seconds - and then Notepad starts up. What I am experiencing on my computer is that Notepad starts off first, for only a millisecond or so. You can see it flash on the screen, and then IE starts - and finally Notpad opens when IE closes.

Is there a way to getting Notepad to only show up when IE terminates?

Thanks again for your time!
ASKER CERTIFIED SOLUTION
Avatar of Tompa99
Tompa99
Flag of Sweden image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Hi Tompa!

My mistake, what was "flashing" on the screen was not "Notepad" :-P

I was using the variables for setting the size settings in IE - as you mentioned early in this thread. And the flashing windows was in fact IE - "before" it had processed the image, and size settings.

To me it looked like Notepad, as IE is at the time of the "flashing", is stripped clean of navigation etc. and not showing any image. But as soon as I removed the size-variables, it all looks normal.

Setting the size-variables is however not a very important thing, so it´s not something that has to be solved.

So I am quite happy with the script!

Thanks a bunch for your time and effort!! :-)

Kind regards,

André
Hello again Tompa!

I discovered a problem with the script. It works well on Win XP, but on Windows 7 - Internet Explorer doesn´t terminate before running the other appliaction...Since we are going to use this almost entirely on Win 7, I would really appreciate if you could take a quick look into the problem :-O