StopBuild Method

This method stops a build.

Syntax

IBuildCatalog.StopBuild

Example

The following example starts building the catalog specified by the KMSampleCatalog1 catalog definition, then displays a message box asking the user whether they would like to stop the build.

Option Explicit 
On Error Resume Next

Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog 
Dim Prompt, Buttons, Title, Response

Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs 
Set objCatalog  = objCatalogs("KMSampleCatalog1")

Prompt = "Build started." & Chr(13) 
  & "Would you like to stop the build?"
Buttons = vbYesNo
Title = objCatalog.Name

objCatalog.StartBuild

Response = MsgBox(Prompt, Buttons, Title)

If Response = vbYes Then
  objCatalog.StopBuild
End If

'Release objects
Set objCatalog  = Nothing
Set objCatalogs = Nothing 
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing 
 

See Also

PauseBuild, ResumeBuild, StartBuild


© 1997-1998 Microsoft Corporation. All rights reserved.