Beginning VB 6For coders who are new to Visual Basic, working in VB version 6 (not .NET).
Welcome to the p2p.wrox.com Forums.
You are currently viewing the Beginning VB 6 section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
This might not be the ideal way but normally I use:
Set oShell = CreateObject("Wscript.Shell")
arrRegValue = oShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Micros oft\Windows NT\CurrentVersion\ProductName")
This will read the productName value in the reg and depending on the value do whatever. Normally if u only running 2 OS versions you could only check for the common one then assume the rest would be the other.