SET CLASSLIB TO Registry.vcx ADDITIVE >oReg = CREATEOBJECT("Registry") >RELEASE CLASSLIB Registry >IF oReg.IsKey("wrifile") > IF oReg.OpenKey("wrifile\Shell\Open\Command") = 0 > lcbuffer = SPACE(260) > oReg.GetKeyValue("", @lcbuffer) > oReg.CloseKey > ENDIF >ENDIF >oReg = NULLlcbuffer will contain something like this: C:\Program Files\Windows NT\Accessories\WORDPAD.EXE "%1".