| |
Mediante código ASP, podemos realizar la comprobación
del terminal que se conecta a nuestro servidor WEB. Si se desea
que esta función la realice nada más conectarse a
nuestro servidor, este escript debe ser la página por defecto
que se cargue.
<%acceptString = Request.ServerVariables("HTTP_ACCEPT")
If Instr(LCase(acceptString), "wap") > 0 Then
Response.ContentType = "text/vnd.wap.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="main">
<p>Has accedido
mediante un terminal WAP</p>
</card>
</wml><%
Else
Response.ContentType = "text/html"
%>
<html>
<body>
<p>Has accedido
a través de un Navegador WEB</p>
</body>
</html>
<%End If%>
Código Fuente: htmlowml.asp
|
|