I use a Collection to capture Call Chain Information.  This process is contained in the module cscCallChain.bas.  By putting an entry at the beginning and end of each process, a Call Chain that includes Module and Procedure names can be built.  If an error occurs The entry is not removed and an error handling routine can use the Collection to print out a Call Chain along with the error information.  In a production environment,   this information would be logged and a more meaningful English message would be presented to the User.  I don't use this in properties. 

All Dll functions that are used, are wrapped by VB code that converts error information returned by the function, to err.raise type errors.  Dll subroutines can be called directly without the VB wrapper, but some will be wrapped anyway.

All that is needed at this point, is to add an error handler in the procedure(s) that would pass control to VB.  This limits the number of error handlers required by excluding any subordinate procedures from having an error handler in it.

Note: I am providing cscCallChain.bas before it is complete.  I will be adding documentation to it.

fncTrimNulls is one that I made myself.

I used Articles Q154512 SAMPLE: Getting HostAddress Using Windows Sockets and Q160215 HOWTO: Obtain the Host IP Address Using Windows Sockets to build cscWinSock.bas.

This is the module that provides access to the WinSock Dll.

WinSockInfo project directions:
Create a directory that will hold all of the projects in this series. 
Create a directory called "Common" under that directory, download  Common.zip (**Updated 2/12/99**) and expand it into that directory. 
Create a directory called "WinSockInfo", and download WinSockInfo.zip and expand it into that directory.

Common.zip includes cscCallChain.bas, cscVariables.bas, cscUser.bas, cscMAC.bas and cscWinSock.bas. 

WinSockInfo.zip contains WinSockInfo.frm, WinSockInfo.frx, WinSockInfo.vbw and WinSockInfo.vbp

After expanding the files open the WinSockInfo.vbp file and run it from VB.
WinSockInfo displays the information contained in the WSADATA Type structure that is returned in the WSAStartup procedure.

Note: I am providing cscVariables.bas and cscWinSock.bas (**Updated 2/12/99**) before they are complete.  I will be adding documentation to it.
Note: Common.zip and WinSockInfo.zip are not complete, but will run. 

Note: I am providing cscUser.bas before it is complete.  I will be adding documentation to it.

Note: I am providing cscMAC.bas before it is complete.  I will be adding documentation to it.

LocalInfo project directions:
If you didn't do so in the WinSockInfo project, create a directory that will hold all of the projects in this series. 
If you didn't do so in the WinSockInfo project, create a directory called "Common" under that directory, download Common.zip (**Updated 2/12/99**) and expand it into that directory. 
Create a directory called "LocalInfo", and download LocalInfo.zip (**Updated 2/12/99**) and expand it into that directory.

Common.zip includes cscCallChain.bas, cscVariables.bas, cscUser.bas, cscMAC.bas and cscWinSock.bas. 

LocalInfo.zip contains LocalInfo.frm, LocalInfo.frx, LocalInfo.vbw and LocalInfo.vbp

After expanding the files open the LocalInfo.vbp file and run it from VB.

LocalInfo displays the information contained in the WSADATA Type structure that is returned in the WSAStartup procedure, the Host Name from the GetHostName call, the IP addresses from the GetHostByName call,  the user name returned from GetUser and the MAC address returned from the ASTAT type structure that is returned from  the NETBIOS call.  All of the information is displayed in a TreeView control.

The DNSLookup project displays the data in text boxes as did the WinSockInfo project.

DNSLookup project directions:
If you didn't do so in the previous project, create a directory that will hold all of the projects in this series. 
If you didn't do so in the previous project, create a directory called "Common" under that directory, download Common.zip (**Updated 2/12/99**) and expand it into that directory. 
Create a directory called "DNSLookup", and download DNSLookup.zip  (**New 2/12/99**) and expand it into that directory.

Common.zip includes cscCallChain.bas, cscVariables.bas, cscUser.bas, cscMAC.bas and cscWinSock.bas. 

DNSLookup.zip contains DNSLookup.frm, DNSLookup.frx, DNSLookup.vbw and DNSLookup.vbp

After expanding the files open the DNSLookup.vbp file and run it from VB.

In DNSLookup you can enter either a Domain Name or an IP Address to retrieve the DNS information.  Errors creating the HOSTEN structure are reported in the Domain Name or IP Address field corresponding to the type of  lookup made.  To see Alias names, try a lookup for "www.mysite.com".  To see Secondary IP addresses, try a lookup for "www.search.com".