Performs a build of a Visual Build Pro project.  The global Builder item is available to all script code

 

ProgId: VisBuildSvr6.Builder

 

Note: The Builder component is an in-process server marked for Free threading (MTA).  A version marked for Both threading (MTA or STA) is also available starting with v6.3.

 

jProperties

 

App | BuildIndex | BuildThread | CancelEvent | CompletionStatus | Debugging | FailedStep | LastStep | LaunchType | MaxStopWait | ProcessID | StartTime | Status | StepType

 

Methods

 

ExpandMacros | GetFileContents | Initialize | LogFileContents | LogMessage | Pause | Resume | Run Program | Run ProgramEx | ResetBuildStatus | Start | StartEx | StartEx2 | Stop | SyncBuild | SyncBuildEx | Uninitialize

 

Events

 

BuildStarting | BuildDone | BuildCleanup | StepStarting | StepStarted | StepDone | BuildMessage

 

Examples

 

Note: See the Object Model and Script.bld samples for additional examples.

 

This VBScript sample code demonstrates loading a project and building it:

 

       Set objBld = CreateObject("VisBuildSvr6.Builder")

       Set objApp = CreateObject("VisBuildSvr6.Application")

       objBld.Initialize objApp

 

       objApp.Project.Load "C:\Program Files\VisBuildPro6\Samples\RegEdit.bld"

       objBld.SyncBuild

       objBld.Uninitialize

 

 

This Visual Basic 6.0 sample code demonstrates loading a project, starting a build, and notifying the user when it completes:

 

Private WithEvents Builder As VisBuildSvr.Builder

       Private m_app As VisBuildSvr.Application

 

       Private Sub Builder_BuildDone(ByVal Status As VisBuildSvr.BuildCompletionStatusEnum)

               MsgBox "Build completed with status code " & Status

       End Sub

 

       Private Sub Builder_BuildStarting()

               Debug.Print "starting"

       End Sub

 

       Private Sub cmdStart_Click()

               m_app.Project.Load txtFilename

               Builder.Start       ' start, continue and handle events

               Debug.Print "started"

       End Sub

 

       Private Sub cmdStop_Click()

               Builder.Stop

       End Sub

 

       Private Sub Form_Load()

               Set Builder = New VisBuildSvr.Builder

               Set m_app = New VisBuildSvr.Application

               Builder.Initialize m_app

       End Sub

 

       Private Sub Form_Unload()

               If Not Builder Is Nothing Then Builder.Uninitialize

       End Sub

 

See Also

 

Application object