Repository.Pool.AddPool

Syntax

 * AddPool( pool cPool )

Parameters:
 * pool: The cPool to add.

Usage Example
Private WithEvents MyRepository As New Repository

Dim Success As Boolean = False Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")

Dim newPool As New cPool("NewPool1")

Dim SuccessAddPool As Boolean SuccessAddPool = MyRepository.AddPool(newPool)