Roxen.git / server / etc / Win32Installer.vbs

version» Context lines:

Roxen.git/server/etc/Win32Installer.vbs:1:   ' - ' $Id: Win32Installer.vbs,v 1.4 2004/12/01 12:49:58 grubba Exp $ + ' $Id: Win32Installer.vbs,v 1.5 2004/12/01 13:25:56 grubba Exp $   '   ' Companion file to RoxenUI.wxs with custom actions.   '   ' 2004-11-29 Henrik Grubbström   '      ' At call time the CustomActionData property has been set to [SERVERDIR].   '   ' Creates "[SERVERDIR]pikelocation.txt" with the   ' content "[SERVERDIR]pike\bin\pike"
Roxen.git/server/etc/Win32Installer.vbs:30:   Function CreateConfigInterface()    Dim re, matches, match, WshShell, serverdir    Set re = New RegExp    re.Pattern = "[^;]*"    re.Global = False    Set matches = re.Execute(Session.Property("CustomActionData"))    For Each match in matches    serverdir = match.Value    Next    -  Set WshShell = Wscript.CreateObject("Wscript.Shell") +  Set WshShell = WScript.CreateObject("WScript.Shell")    WshShell.Run """" & serverdir & "pike\bin\pike"" """ & serverdir &_    "bin\create_configif.pike"" --batch __semicolon_separated__ """ &_    Session.Property("CustomActionData") & """ ok y update n", 0, True       CreateConfigInterface = 1   End Function