Externe Prozedur

Externe Prozeduren erhalten die Endung .vbs, da sie nur noch VBScript-Code enthalten. XML-Tags wie <job> oder <script> kommen in dieser Datei nicht vor. Die Prozedur hängt einen String an eine Datei an. Damit lassen sich Vorgänge loggen.

Sub procExt(ByVal strFilename, ByVal strText)
  Dim objFS, objTextFile

  Set objFS = CreateObject("Scripting.FileSystemObject")
  Set objTextFile = objFS.OpenTextFile(strFilename, 8, True)
  objTextFile.Write(strText)
  objTextFile.Close
End Sub