Calling a vbscript from a vbscript 1

[SlakeB]

Is it possible to call a vbscript file from within another vbscript file without using the DOS shell?

 

[EBGreen]

You can read the file into a variable then .Execute it.

[red]"... isn't sanity really just a one trick pony anyway?! I mean, all you get is one trick, rational thinking, but when you are good and crazy, oooh, oooh, oooh, the sky is the limit!" - The Tick[/red]

 

[SlakeB]

So would I do something like this?:

Set Cmd = Server.CreateObject("ADODB.Command")
sVBToRun = "externalScript.vbs"
Cmd.Execute(sVBToRun)

 

[EBGreen]

No, look at the ExecuteGlobal function and the .Readall method of the text stream object. This is a generic function that I wrote so that I could pull classes into a script from an external file. It should get you going:

Sub AddClass(strClassFile)
    Dim oFSO, oFile, strFile

    Set oFSO = CreateObject ("Scripting.FileSystemObject")
    Set oFile = oFSO.OpenTextFile(strClassFile)
    strFile = oFile.ReadAll
    oFile.close
    Set oFso = Nothing
    Set oFile = Nothing
    ExecuteGlobal strFile
End Sub

[red]"... isn't sanity really just a one trick pony anyway?! I mean, all you get is one trick, rational thinking, but when you are good and crazy, oooh, oooh, oooh, the sky is the limit!" - The Tick[/red]

 

[PHV]

You may also have a look here:

http://www.tek-tips.com/faqs.cfm?fid=3419

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886