<% Function c2u(text)
For i=1 to Len(text)
c=Mid(text,i,1)
c2u=c2u&"" & 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>









