Hola:
estoy haciendo un cd-rom, y puse un boton para que se contacten conmigo via e-mail.
Como hago para que al hacerle click se habra el outlook, o mejor aún, que al clickear el botón, se realice la conexion a internet (si es que el usuario no esta conectado) y se abra el outlook.
Gracias
estoy haciendo un cd-rom, y puse un boton para que se contacten conmigo via e-mail.
Como hago para que al hacerle click se habra el outlook, o mejor aún, que al clickear el botón, se realice la conexion a internet (si es que el usuario no esta conectado) y se abra el outlook.
Gracias
1 Respuesta
Respuesta de bedelludrica
1
Asi
On mouseup me
GotoNetPage "mailto:[email protected]"
end
Comportamiento completo:
------------------------------------------------------------------------------
-------------------------------------------------------------------------------
property p_direccion, p_rutina
on getBehaviorTooltip me
return \
"usa este comportamiento para mandar un e_mail mediate"\
" el programa de correo que tenga el usuario instalado "
end getBehaviorTooltip
on getPropertyDescriptionList
set lista= [:]
addProp lista, #p_direccion, [#comment: "escribe la direccion de correo",#format:#String,\
#default: "[email protected]"]
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 "mailto:"&p_direccion
end if
end MouseUp
on MouseDown me
if p_rutina = "On MouseDown" then
gotoNetPage "mailto:"&p_direccion
end if
end MouseDown
on MouseEnter me
if p_rutina = "On MouseEnter" then
gotoNetPage "mailto:"&p_direccion
end if
end MouseEnter
on MouseLeave me
if p_rutina = "On MouseLeave" then
gotoNetPage "mailto:"&p_direccion
end if
end MouseLeave
On mouseup me
GotoNetPage "mailto:[email protected]"
end
Comportamiento completo:
------------------------------------------------------------------------------
-------------------------------------------------------------------------------
property p_direccion, p_rutina
on getBehaviorTooltip me
return \
"usa este comportamiento para mandar un e_mail mediate"\
" el programa de correo que tenga el usuario instalado "
end getBehaviorTooltip
on getPropertyDescriptionList
set lista= [:]
addProp lista, #p_direccion, [#comment: "escribe la direccion de correo",#format:#String,\
#default: "[email protected]"]
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 "mailto:"&p_direccion
end if
end MouseUp
on MouseDown me
if p_rutina = "On MouseDown" then
gotoNetPage "mailto:"&p_direccion
end if
end MouseDown
on MouseEnter me
if p_rutina = "On MouseEnter" then
gotoNetPage "mailto:"&p_direccion
end if
end MouseEnter
on MouseLeave me
if p_rutina = "On MouseLeave" then
gotoNetPage "mailto:"&p_direccion
end if
end MouseLeave
