Submit a ticketCall us

whitepaperYour VM Perplexities Called, and They Need You to Read This.

Virtualization can give you enormous flexibility with future workloads and can be a key enabler for other areas, like cloud computing and disaster recovery. So, how can you get a handle on the performance challenges in your virtual environment and manage deployments without erasing the potential upside? Learn the four key areas you need to be focusing on to help deliver a healthy and well-performing data center.

Get your free white paper.

Home > Success Center > Kiwi CatTools > Kiwi CatTools Documentation > Kiwi CatTools 3.11 Administrator Guide > API > CatTools API Classes > CatTools Devices class > Sample Code to iterate devices using the CatTools API

Sample Code to iterate devices using the CatTools API

Table of contents
No headers
Created by Caroline Juszczak, last modified by Caroline Juszczak on Jun 28, 2016

Views: 165 Votes: 0 Revisions: 1

Sample VB code showing you how to iterate devices using the CatTools API.

 

Dim DB As CatToolsAPI.Database

Dim Devices As CatToolsAPI.Devices

Dim Device As CatToolsAPI.Device

 

Set DB = New CatToolsAPI.Database

 

DB.OpenConnection

If DB.Connected Then

Set Devices = DB.Devices

Debug.Print Devices.Count & " devices in the database"

For Each Device In Devices

If Device.Group = "Default" then

Debug.Print Device.Name & " " & Device.HostAddress

End If

DoEvents

Next

Else

Debug.Print "Connection failed: " & DB.ErrDescription

End If

 

DB.CloseConnection

 

Set Device = Nothing

Set Devices = Nothing

Set DB = Nothing

Last modified

Tags

Classifications

Public