windows scripting host support

[Tupos]

Hi every one

Why not include windows scripting host support,
Instead of command line support ?

Im not using ms-dos anymore,
I have created a small Dll file, for my self
Im using it with windows scripting host
Very simple programming :

Dim Daemon
Set Daemon = CreateObject("FileSystemObj.DaemonExt")

Daemon.autorun "off"
Daemon.Mount 3 , "D:\Virtual CD\Gdi Tiberian Sun.iso"
Daemon.Execute  "C:\Tiberian Sun\SUN.EXE", "", "C:\Tiberian Sun", "True"
Daemon.unmount 3
Daemon.autorun "on"
Set Daemon = Nothing
WScript.Quit()

Thats easy

Interested ?

[Tupos]

some games are difficult to start
Why not starting a shortcut and wait for the program to end ?

its very useful, windows scripting host can start every game or program
even the difficult Age of Empires II - The Conquerors Expansion

With SEI 
     .Fmask  = SEE_MASK_FLAG_NO_UI Or SEE_MASK_NOCLOSEPROCESS
     .Hwnd             = ""
     .lpVerb            = "open"
     .lpFile             = "D:\The Conquerors.lnk"
     .lpParameters  = "" 
     .lpDirectory      = ""
     .nShow            = "1"
     .Wait              = "True"
     .Start              = "True"
End With

[saivert]

Windows Script Host (WSF) for launcing The Sims 2 from Image file

<package>
<job id="Sims2">
<runtime>
<description>Runs The Sims 2</description>
</runtime>
<script language="JScript">

var WshShell;
var olddir;
var app;
var DaemonToolsPath = 'C:\\Programfiler\\D-Tools\\daemon.exe';
var ImagePath = 'D:\\Disc Images\\Sims2_1.nrg';
var GamePath = 'D:\\EA GAMES\\The Sims 2\\TSBin';
var GameExec = 'Sims2.exe';

WshShell = new ActiveXObject("WScript.Shell");

if (7==WshShell.Popup("Vil du starte The Sims 2?", 0, "The Sims 2 Launcher laget av Nicolai", 32|4))
WScript.Quit();


function Quote(str) {
return '\"' + str + '\"';
}

// Mount image
WshShell.Run(Quote(DaemonToolsPath) + ' -mount 0,' + Quote(ImagePath));

olddir = WshShell.CurrentDirectory;
WshShell.CurrentDirectory = GamePath;


app = WshShell.Exec(GamePath + '\\' + GameExec);
while (app.Status != 1) WScript.Sleep(100);


WshShell.CurrentDirectory = olddir;

// Unmount image
WshShell.Run(Quote(DaemonToolsPath) + ' -unmount 0');


</script>
</job>
</package>

[,jACkdA\W]

@tupos

i probably don't get your point, but i've been using VBscript for a long time now to operate DT via command line? And i don't see any disadvantages compared with what you seem to want?

[Tupos]

Im just add more options that deamon.exe comes with

With others words Im extending the command line options

All you need to do is loading a special object in to memory
That works like this

Dim Daemon 
Set Daemon = CreateObject("FileSystemObj.DaemonExt")

Lets switch auto run off
Lets mount the image file into a empty drive, if no empty drive is found mount image into drive 0

With Daemon
       .autorun = "off"                 
       . MountEmptyDrive = "D:\ts.iso"
End with