Si :
---Rutas absolutas
--Esto te abre el archivo html con el navegador que el usuario tenga como preferente instalado
On MouseUp me
gotoNetPage "C:\index.htm"
end
---Rutas relativas:
On MouseUp me
gotonetpage the pathname&"mm.html"
end
Behaviour completo:
--Creado por bedelludrica
property p_direccion, p_rutina
on getBehaviorTooltip me
return \
"Usa este comportamiento para abrir una pagina web con el navegador predeterminado. "&\
"Puedes navegar por internet o por el cd con rutas relativas "&\
return&\
"Comportamiento realizado por bedelludrica: " & \
return&\
"
[email protected] "
end getBehaviorTooltip
on getPropertyDescriptionList
lista= [:]
addProp lista, #p_direccion,\
[#comment: "escribe la direccion ",#format:#String,\
#default: "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 the pathname&p_direccion
gotoNetPage the pathname&p_direccion
end if
end MouseDown
on MouseEnter me
if p_rutina = "On MouseEnter" then
gotoNetPage the pathname&p_direccion
end if
end MouseEnter
on MouseLeave me
if p_rutina = "On MouseLeave" then
gotoNetPage the pathname&p_direccion
end if
end MouseLeave