Registry Keys in VB 2005

[BarryM]

Hi im tryin to add a key to registry in classes root. Im tryin to put a icon a .pls file that i made in vb 2005

i have tried using the followig code

imports microsoft.win32

button1.click
dim key as registrykey
key = registry.classe sroot.createsub key("plsfile")
key = registry.classe sroot.createsub key("plsfile\De fualtIcon\")
key = registry.classe sroot.opensubke y("plsfile",tru e)
key.setvalue ("","SLS File")
key.close
key = registry.classe sroot.opensubke y("plsfile\Defu altIcon\")
key.setvalue("" ,"C:\Media Player.ico")
key.close

that will enter in all the keys and data in rededit.exe but does not still do anything to .pls files that are made

[VBWheaties]

key = registry.classe sroot.createsub key("plsfile")
key = registry.classe sroot.createsub key("plsfile\De fualtIcon\")
key = registry.classe sroot.opensubke y("plsfile",tru e)
key.setvalue ("","SLS File")
key.close
key = registry.classe sroot.opensubke y("plsfile\Defu altIcon\")
key.setvalue("" ,"C:\Media Player.ico")
key.close

Misspelling -
DefaultIcon instead of 'DefualtIcon'.