Irfanview Script?

[Arablover]

A while ago someone posted a script ot install Irfanview and the associated plugins.

But it was in German!

Has anyone managed to convert this script to English?

If so, please post it!

Cheers.

Jeremy

[Thanatos]

'Automatic, but not silent install of Irfan View

'view only all images with Irfan view

Set WshShell = WScript.CreateObject("WScript.Shell")

On Error Resume Next

WshShell.Popup "Do NOT MOVE the mouse an do NOT PRESS any button!",5," - Warning - ",48

'Run setup from location on hdd'

'you have to check the path !

WshShell.Run ("%systemdrive%\Install\Applications\iview\iview385.exe")

'if your hdd is slow, increase the next value

WScript.Sleep 5000

WshShell.SendKeys "{TAB}"

WScript.Sleep 2000

'Check the value!

'Change ALL shortcuts to your language !

'For german = w means "weiter"

'For english = n means "next"

WshShell.SendKeys "n"

WScript.Sleep 2000

WshShell.SendKeys "n"

WScript.Sleep 2000

WshShell.SendKeys "{ENTER}"

WScript.Sleep 2000

WshShell.SendKeys "n"

WScript.Sleep 2000

WshShell.SendKeys "n"

WScript.Sleep 2000

WshShell.SendKeys "y"

WScript.Sleep 2000

WshShell.SendKeys "{ENTER}"

WScript.Sleep 2000

'If you don't need the plug-ins, activate the next line and clear the following code

'Wscript.Quit

'install the plug-ins

'you have to check the path !

WshShell.Run ("%systemdrive%\Install\Applications\iview\all_plugins.exe")

WScript.Sleep 2000

WshShell.SendKeys "n"

WScript.Sleep 2000

WshShell.SendKeys "{ENTER}"

WScript.Sleep 1000

Wscript.Quit

READ the instructions included inside the file