Links en CD + Internet

Con este behaviour lo puedes poner a un botón y si no esta conectado a internet se inicia la conexión.
--Creado por bedelludrica
property p_direccion, p_rutina
on getBehaviorTooltip me
return \
"Usa este comportamiento para abrir una página web con el navegador predeterminado. "&\
"Puedes abrir páginas locales o navegar por internet con rutas absolutas"&\
return&\
"Comportamiento realizado por bedelludrica: " & \
return&\
"[email protected] "
end getBehaviorTooltip
on getPropertyDescriptionList
lista= [:]
addProp lista, #p_direccion,\
[#comment: "escribe la direccion ",#format:#String,\
#default: "c:/bedelludrica.htm" ]
addProp lista, #p_rutina, \
[#comment: "elige la rutina" ,#format:#String\
,#range:["On MouseUp","On MouseDown","On MouseEnter",\
"On MouseLeave"]\
,#default:"On MouseUp"]
return lista
end getPropertyDescriptionList
on MouseUp me
if p_rutina = "On MouseUp" then
gotoNetPage p_direccion
end if
end MouseUp
on MouseDown me
if p_rutina = "On MouseDown" then
gotoNetPage p_direccion
end if
end MouseDown
on MouseEnter me
if p_rutina = "On MouseEnter" then
gotoNetPage p_direccion
end if
end MouseEnter
on MouseLeave me
if p_rutina = "On MouseLeave" then
gotoNetPage p_direccion
end if
end MouseLeave

CReo que no es esto pero me viene como anillo al dedo . LO que quiero es marcar dos rutas: una para los que tengan internet y otra para los que no, tengo un vinculo a mi sitio en internet pero también quiero incluir mi web y otras webs en mi CD . O sea que mi cd detecte y elija la ruta cuando se presione tal botón.
Lo he visto anteriormente, creo.
Gracias maestro.