构建动态 WAP 站点 (3) - 数据库的输出 |
|---|
| WAP技术站:www.wapease.com
|
<card> ………… </card> </wml> 注意:<% Response.ContentType="text/vnd.wap.wml" %>和<?xml version="1.0"?>之间不能有空格或空行。 由于 Nokia Toolkit 不支持中文,所以,所有的汉字都只能做字符的实体引用,因此,用ASP编写了一个c2u的函数,进行汉字和字符实体之间的转换,程序如下: <% Function c2u(text) For i=1 to Len(text) c=Mid(text,i,1) c2u=c2u&"&#x" & Hex(AscW(c)) & ";" Next End Function %> 要在WML中输出汉字的时候,只需 <%=c2u("中文字符")%> 即可。 在WML中,采用不同card间的跳转来实现功能选择的步骤。采用<postfield/>标记给ASP页面传递客户端的选择信息。在ASP程序中,使用 Request.QueryString("")来获得客户端传递来的信息。 下面就是完整的一个显示页面的例子: <%@ LANGUAGE="VBScript" %> <% dim j j=0 %> <% Function c2u(text) For i=1 to Len(text) c=Mid(text,i,1) c2u=c2u&"&#x" & Hex(AscW(c)) & ";" next End Function %> <% set conn=server.createobject("adodb.connection") conn.open"dsn=money;uid=;pwd=;database=money.mdb" sql0="update stock set temp=(price5-price4)/price4*100" set rs0=server.createobject("adodb.recordset") rs0.open sql0,conn sql="select num,name,temp from stock where temp<0 order by temp ASC" set rs=server.createobject("adodb.recordset") rs.open sql,conn %> <% 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="ShowCurrent"> <p> <%=c2u("跌幅前五名:")%><br/> |
| 上一篇:构建动态 WAP 站点 (2) - 你的第一个WML页面 下一篇:没有了 |
|
