function DoWin32DetectPlugin()
	on error resume next 
	dim o 
	set o = CreateObject("DJVUCONTROL.DjVuCtl")  
	if err.number = 0 then
		DoWin32DetectPlugin = true
		set o=nothing
	else
		DoWin32DetectPlugin=false
	end if
end function