Submit a ticketCall us

Webinar: Web Help Desk for HR, Facilities and Accounting Departments
This webinar will focus on use cases for HR, Facilities and Accounting.

Having a unified ticketing and asset management system for all the departments in your company can provide end-users with a seamless experience and make things easier for your IT team. Yet, with different business tasks and objectives, many departments don’t fully understand the capabilities of Web Help Desk and how the software can be customized for effective use in their departments.
Register Now.

Home > Success Center > Kiwi CatTools > 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: 25 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
07:23, 28 Jun 2016

Tags

Classifications

Public