sub showlink(this)
	if this.value <>empty then
	window.open this.value
	end if 
end sub