Change windows CD Key in Registry

I am looking for someone to show me how to use the following visualbasic script code in a vb6 project. I want to be able to convert the following code and use it inside a vb6 project. The code has come from the Microsoft Site and is used to change the Windows CD Key. The code is vbs but I want to know how to use it in a vb6 project with comments please. I want a simple form with 5 text boxes and a command button which will change the Windows CD Key based on the information supplied in the text boxes. Simple error checking is also required. Code example taken from microsoft. <[login to view URL];en-us;328874> ' WMI Script - [login to view URL] ' ' This script changes the product key on the computer ' '*************************************************************************** ON ERROR RESUME NEXT if [login to view URL]<1 then [login to view URL] "Script can't run without VolumeProductKey argument" [login to view URL] "Correct usage: Cscript [login to view URL] ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX" [login to view URL] end if Dim VOL_PROD_KEY VOL_PROD_KEY = [login to view URL](0) VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") result = [login to view URL] (VOL_PROD_KEY) if err <> 0 then [login to view URL] [login to view URL], "0x" & Hex([login to view URL]) [login to view URL] end if Next ## Deliverables 1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done. Also required to have the code commented so I can learn from it 2) Deliverables must be in ready-to-run condition, as follows (depending on the nature of the deliverables): ## Platform Windows XP