Actually an easier way:

TRY 
	x=CREATEOBJECT("dictionary.dict")
ENDTRY
IF TYPE("x")!='O'
	DECLARE integer DllRegisterServer IN dictionary.dll
	x=CREATEOBJECT("dictionary.dict")
ENDIF

If it's a COM DLL, then unregistering it is not required: just register it in it's new location.