Acemoney & others in Application Installs Posted January 28, 2005 Hi,I Just Wrote an Install Script for EditPlus 2.12.This works for my Desk, hope it will work for yours.Save this as install.js or like what you want. Only the .js is needed.var WshShell = WScript.CreateObject ("WScript.Shell");var WshShell2 = WScript.CreateObject ("WScript.Shell");WshShell.RUN ("\"%systemdrive%\\Install\\Applications\\editplus\\setup_ep.exe\"");WScript.Sleep(2000);WshShell.SendKeys ("{TAB}");WScript.Sleep(200);WshShell.SendKeys ("{ENTER}");WScript.Sleep(200);WshShell.SendKeys ("{ENTER}");WScript.Sleep(500);WshShell.SendKeys ("{ENTER}");WScript.Sleep(500);WshShell.SendKeys ("{ENTER}");WScript.Sleep(500);WshShell.SendKeys ("{ENTER}");WScript.Sleep(500);WshShell.SendKeys ("{ENTER}");WScript.Sleep(500);WshShell.SendKeys ("%{F4}");//simulate the ALT+F4 Key for Closing ApplicationsWScript.Sleep(500);WshShell2.RUN ("\"%systemdrive%\\Programme\\EditPlus 2\\editplus.exe\"");WScript.Sleep(500);WshShell2.SendKeys ("{TAB}");WScript.Sleep(200);WshShell2.SendKeys ("Name");//keep the quotes even if your name has no spacingWScript.Sleep(200);WshShell2.SendKeys ("{TAB}");WScript.Sleep(200);WshShell2.SendKeys ("xxxxx-xxxxx-xxxxx-xxxxx-xxxxx");//your Serial number with "-" between the keys!WScript.Sleep(200);WshShell2.SendKeys ("{ENTER}");WScript.Sleep(200);WshShell2.SendKeys ("{ENTER}");WScript.Sleep(200);WshShell2.SendKeys ("%{F4}");PS: You need only run the install.js with xplode or RunOnceEx or what you have.Greetings 0
Acemoney & others
in Application Installs
Posted
Hi,
I Just Wrote an Install Script for EditPlus 2.12.
This works for my Desk, hope it will work for yours.
Save this as install.js or like what you want. Only the .js is needed.
PS: You need only run the install.js with xplode or RunOnceEx or what you have.
Greetings