Inclure un un VBS dans un VBS

Bonjour,

Je développe un script VBS autonome (lancé en ligne de commande avec wscript
monscript.vbs). Je voudrais pouvoir séparer mon code dans plusieurs fichiers
VBS.

Existe-t-il une fonction VBS permettant de faire l'équivalent d'un #include
en C ou d'un require en PHP ?

Merci pour vos lumières.
Cordialement,
Queuemi

Une solution serait de lire tout le fichier à inclure avec FSO et
exécuter le contenu avec l'instruction ExecuteGlobal de VBScript:

http://msdn.microsoft.com/library/en-us/script56/html/vsstmExecuteGlobal.asp

Ce qui donne un truc du genre :
http://automation.eu.tf/Inclure.VBS (cf code ci-dessous)

'---8<---Inclure.VBS---
Inclure("a_inclure.vbs")

Function Inclure(quoi)
ExecuteGlobal(_
CreateObject("Scripting.FileSystemObject")_
.OpenTextFile(quoi).ReadAll _
)
End Function
'---8<---Inclure.VBS---

Vous pouvez aussi utiliser l'attribut src d'une balise script

- dans un fichier WSF :

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/wsAdvantagesOfWs.asp

ou

- dans un fichier HTA ou HTML :

http://msdn.microsoft.com/workshop/author/dhtml/reference/properties/src_1.asp

Amicalement,

--
Jean - JMST
Belgium

... petite correction :-)

'---8<---Inclure.VBS---
inclure("montest.vbs")

Sub inclure(quoi)
ExecuteGlobal(_
CreateObject("Scripting.FileSystemObject")_
.OpenTextFile(quoi).ReadAll _
)
End Sub
'---8<---Inclure.VBS---

Amicalement,

--
Jean - JMST
Belgium