VB programs

  charpis 18:58 01 Oct 2007
Locked

I am trying to find a program to view key on an WinXP CD.I found this site (Planet source Code by Snytax)and copied its instructions below. Can anyone explain how to do it since I am new to VB programs.
WinXP Pro SP2, Pentium 4, 1.8GHz computer.

'**************************************
'Windows API/Global Declarations for :Vi
' ew Windows XP CD Key
'**************************************
Option Explicit
Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long ' Note that if you declare the lpData parameter as String, you must pass it By Value.
Private Const REG_BINARY = 3
Private Const HKEY_LOCAL_MACHINE = &H80000002
Private Const ERROR_SUCCESS = 0&
'**************************************
' Name: View Windows XP CD Key
' Description:Function: sGetXPCDKey() wi
' ll return the CD Key for Windows XP in t
' he format XXXXX-XXXXX-XXXXX-XXXXX-XXXXX.
'
' By: Snytax
'
'
' Inputs:Nothing.
'
' Returns:Your Windows XP CD Key.
'
'Assumes:None
'
'Side Effects:None
'This code is copyrighted and has limite
' d warranties.
'Please see click here
' e.com/xq/ASP/txtCodeId.57164/lngWId.1/qx
' /vb/scripts/ShowCode.htm
'for details.
'**************************************

  Fruit Bat /\0/\ 19:07 01 Oct 2007

I am trying to find a program to view key on an WinXP CD.

You cannot view the key on a CD!

You can only view the KEY of an installed system.
There are several programs on the net to do that, Magic jelly bean is one, SIW, Belarc etc. will also show your key.

  VoG II 19:08 01 Oct 2007

This will find your product key click here

This thread is now locked and can not be replied to.

Elsewhere on IDG sites

Fujitsu Lifebook P727 laptop review

Converse draws on iconic heritage for a fresh brand identity

Mac power user tips and hidden tricks

Comment lancer Windows 10 en mode sans ├ęchec ?