让WAP模拟器显示中文汉字
作者:未知 发布时间:2007-10-15 0:36:19 发布人:admin 来源:不详
源代码如下:(这些代码是放在同一个文件中的,我是用ASP写的,用的是VBScrip,文件名是以".asp"结尾
<%@ LANGUAGE="VBScript" %>
<% Function c2u(text)
For i=1 to Len(text)
c=Mid(text,i,1)
c2u=c2u&"&#x" & Hex(AscW(c)) & ";"
next
End Function
%>
<% 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>
<template>
<do type="options" label="back">
<prev />
</do>
</template>
<card id="lists">
<p><%=c2u("选择一位作者:")%>
<select title="<%=c2u("作者列表")%>" ivalue="0">
<option value="jinyong" onpick="#jy"><%=c2u("金庸")%></option>
<option value="gulong" onpick="#gl"><%=c2u("古龙")%></option>
</select>
</p>
</card>
<card id="jy">
<onevent type="onenterbackward">
<prev />
</onevent>
<do type="accept">
<go href="#display_fav" />
</do>
<p><%=c2u("选择你想要购买的书")%>
<select name="fav" title="Stooges">
<option value="<%=c2u("笑傲江湖")%>"><%=c2u("笑傲江湖")%></option>
<option value="<%=c2u("射雕英雄传")%>"><%=c2u("射雕英雄传")%></option>
<option value="<%=c2u("鹿鼎记")%>"><%=c2u("鹿鼎记")%></option>
<option value="<%=c2u("神雕侠侣")%>"><%=c2u("神雕侠侣")%></option>
</select>
</p>
</card>
<card id="gl">
<onevent type="onenterbackward">
<prev />
</onevent>
<do type="accept">
<go href="#display_fav" />
</do>
<p><%=c2u("选择你想要购买的书")%>
<select multiple="true" title="<%=c2u("古龙")%>" name="fav">
<option value="<%=c2u("孤星传")%>"><%=c2u("孤星传")%></option>
<option value="<%=c2u("大地飞鹰")%>"><%=c2u("大地飞鹰")%></option>
<option value="<%=c2u("天涯明月刀")%>"><%=c2u("天涯明月刀")%></option>
<option value="<%=c2u("陆小凤")%>"><%=c2u("陆小凤")%></option>
</select>
</p>
</card>
<card id="display_fav">
<p><%=c2u("你选择的书是:")%>$fav.</p>
</card>
</wml>
上一篇文章:中国联通的话费余额查询电话
下一篇文章:函数:round()
资源搜索 |
|
热点文章
- 黄色网站侵染手机 淫秽图片小说视频样样全(图)04-07
- 为Exchange Server安装WAP电子邮件网关04-08
- NET移植案例学习:建造Web站点(7)11-12
- 一个基于web的QQ程序 2(xml+asp)11-12
- 排序方式解决“上下主题”问题(一)11-12
- 排序方式解决“上下主题”问题(二)11-12
- 排序方式解决“上下主题”问题(三)11-12
- 一个基于web的QQ程序 1(xml+asp)11-12
- XMLHTTP+Javascript+Asp写得聊天室,无刷新实现(一)11-12
- XMLHTTP+Javascript+Asp写得聊天室,无刷新实现(二)11-12
- XMLHTTP+Javascript+Asp写得聊天室,无刷新实现(三)11-12
- XMLHTTP+Javascript+Asp写得聊天室,无刷新实现(四)11-12


