BindTotal Property

The BindTotalproperty gets a running total of the bind times performed.

[VBScript] ActiveDirectory.BindTotal

Access

Read-only

Return Value

Long

Examples

The following example shows how to determine the total time for the bind operations performed.

[VBScript] 
Function GetAverageTimeToBindToPDC(strDomain)
	Dim objActiveDirectory
	Dim lngBindTotal, lngBindCount, fAverageBindTime

	fAverageBindTime = -1

	Set objActiveDirectory =
CreateObject("McActiveDir.ActiveDirectory")

	objActiveDirectory.Domain = strDomain

	If (objActiveDirectory.BindPDCMaster()) Then
		lngBindTotal = objActiveDirectory.BindTotal
		lngBindCount = objActiveDirectory.BindCount
	
		If (lngBindCount > 0) Then
			fAverageBindTime = lngBindTotal / lngBindCount
		End If
	End If

	Set objActiveDirectory = Nothing

	GetAverageTimeToBindToPDC = fAverageBindTime
End Function

Requirements

Windows NT/2000: Requires Windows 2000 or later
Version: Requires MOM 1.0 SP1

See Also

ActiveDirectory Object

Did you find this information useful? Please send your suggestions and comments about the documentation to momsdk@microsoft.com.