| |
Esta
aplicación consta de una primera
página en WML llamada intro.wml donde el
usuario introduce el nombre, email y su
número de teléfono.
Tras
ésto, la información es enviada a
un programa ASP donde la recibe y muestra una
nueva pantalla de
resultado.
Página
intro.wml
<?xml
version="1.0"?>
<!DOCTYPE wml PUBLIC
"-//WAPFORUM//DTD WML 1.1//EN"
"http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<card
id="c1" title="Aplicacion
ASP">
<p
align="center">
Aplicacion de
recepcion de datos<br/>
<anchor>Para introducir
datos...
<go href="#f"
method="get"/>
</anchor><br/>
<anchor>Volver
<go
href="volver.wml"
method="get">
</go>
</anchor><br/>
</p>
</card>
<card id="f"
title="DATOS"
newcontext="true">
<p
align="center">
<b>Introducir
datos</b><br/>
</p>
<p
align="left">
<fieldset
title="formInfo">
Nombre
<input
type="text" name="txtNombre"
value="" format="*X"
size="8" maxlength="15"
emptyok="false"/>
<br/>
E-mail
<input
type="text" name="txtEmail"
value="" format="*X"
size="8" maxlength="30"
emptyok="false"/>
<br/>
Movil
SMS
<input type="text"
name="txtSMS" value=""
format="*X" size="10"
maxlength="12"
emptyok="false"/>
</fieldset>
<do type="accept"
label="Enviar">
<go href="info.asp"
method="get">
<postfield name="nombre"
value="$(txtNombre)"/>
<postfield name="email"
value="$(txtEmail)"/>
<postfield name="movil"
value="$(txtSMS)"/>
</go>
</do>
</p>
</card>
</wml>
Página info.asp
<%Response.ContentType =
"text/vnd.wap.wml"%>
<%
dim conSMSWeb
nombre=Request("nombre")
email=Request("email")
movil=Request("movil")
%>
<?xml
version="1.0"?>
<!DOCTYPE wml PUBLIC
"-//WAPFORUM//DTD WML 1.1//EN" "
http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>
<!-- MENU DE
SELECCION -->
<card id="i"
title="RESULTADO"
newcontext="false">
<p
align="left">
<small>
Informacion
insertada
Nombre:<b><%Response.Write
nombre%></b><br/>
Email:<%Response.Write
email%><br/>
Movil:<%Response.Write
movil%><br/>
</small>
</p>
</card>
</wml>
|
|
