VB Script retreive Object Class

Good Afternoon,

We are creating a script to return all groups and their members in
active directory.

The script first querys AD using ADODB by executing SELECT Name,
groupType, distinguishedName, member FROM 'LDAP://dc=sd,dc=com' WHERE
objectCategory='group'

From here I iterate the list of returned objects by pasing the
distinguishedname as a parameter to a funtion that basically does:

	Set adobj = GetObject("LDAP://" + distinguishedName)
	adobj.GetInfo


I want to be able to determine if the returned object is a user,
group, computer, etc.  How do I go about this?

Thanks