开发Wap 中的随笔

以下是在开发wap中的随笔，其中一些对于“老鸟”来说，谈不上什么，希望对初学者有所帮助，大家有什么小技巧，欢迎顶上来。共同学习、共同进步 ^－^
1、iis配置Wap环境
在作为wap站点的属性－－>Http头－－>MIME映射中添加新的文件类型，具体如下：
关联文件名 内容类型
wml text/vnd.wap.wml
wmlc application/vnd.wap.wamlc
wmls text/vnd.wap.wmlscript
wmlsc application/vnd.wap.wmlscript
wbmp image/vnd.wap.wbmp
编写一个wml文件或者使用asp编写一个动态网页
如果使用asp编写，在源码的开始添加
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
编码采用utf-8
就可以使用模拟器进行浏览了。
2、wap中的编码比较严格，标签区分大小写。标签一定要对应。初学者经常犯这样的错误
3、说到标签对应就涉及到这样一个问题。当在一个表中查询记录的时候，在asp中没有记录就输出“没有记录提示”并response.end。但是在wap中不行，因为这样就不会输出</card></wml>等闭合标签。
我采用的方法是。得到记录集后。


if rs.eof then
Wrong="暂时没有记录。。。"
else
'正常的进行页面显示。。。。。
end if
respong.write Wrong
。
</p>
</card>
</wml>
这样可以避免标签不闭合。

4、图片下载中首先一定要做到
a、图片格式要正确：有的手机支持png 有的支持gif、bmp、jpg 。（联通CDMA的大部分都支持png）
b、图片的路径要正确：绝对路径 比如http://****/PicDown/aa.png
c、图片的大小要适当：预览的图片不能超过10kb，供下载的图片不能超过30kb。（这个我也不知道有没有标准，这是我在实际测试中得到的数据），下载有些手机支持图片或者铃声可能还要大 <50kb，但是为了照顾大多数手机所以，建议<30kb。
d、图片的大小一定要和图片的名称对应，也就是说 aa.png是多么大，在其size中就写多么大，这两个是对应的。
e、有的手机在手机内存储图片达到一定数量时候，就会提示“下载个数过多”等类似提示，有的手机有预览－－>保存（如：MOTO）有的没有，下载后直接保存到手机中（LG8180）。
f、判断用户下载是否成功，可以在指定的文件中获得Status，if Status＝‘ok’ 则表明下载成功，进行提示下载成功、下载次数＋1等操作，否则，提示下载失败

5、wap中的分页
分页和web中是一样的，只是有些功能比较简化了，下面是常用的分页，没有写成函数是方便大家修改。

在打开记录集后写，如下代码：

<%
filepath=request.servervariables("path_info")%>
<%page=1
page=request("page")
rs.PageSize = 8 '每页的记录的条数
if Not IsEmpty(trim(Request("Page"))) then
Page = CInt(Request("Page"))
if Page > rs.PageCount then
rs.AbsolutePage = rs.PageCount
elseif Page <= 0 then
Page = 1
else
rs.AbsolutePage = Page
end if
End if
%>


然后再想显示分页的地方，一般是在记录集循环输出完毕的后面写：

<%if rs.pagecount<>1 and rs.pagecount<>0 then%>
<br/>
<%if page>rs.pagecount then%>
<a title="确定" href="<%=filepath%>?Page=<% =page -1 %>">上一页</a>
<%else%>
<%if page<>1 then %>
<a title="确定" href="<%=filepath%>?Page=<% =page -1 %>">上一页</a><br/>
<% end if %>
<a title="确定" href="<%=filepath%>?Page=<% = page + 1%>">下一页</a>
<%end if %>
<%end if
response.Write "第"&page&"页 共"&rs.pagecount&"页"
%>

注意显示的时候首先显示下一页，然后再显示上一页这和web上的习惯不太一样。

另外，如果这页的内容是显示是通过上页传送来的参数，作为条件的，则在 类似
<a title="确定" href="<%=filepath%>?Page=<% = page + 1%>">下一页</a>
的地方都要加上该参数，否则进行下一页连接的时候就会把参数丢掉。
例如：从上页用户选择的新闻的种类，来显示新闻。在List.asp页面首先写，NewType=request.form("NewType")得到用户选择的新闻的类型。
然后SQL="Select ..........where NewType='"&NewType&"'" 。完成记录集合的准备工作。注意：在进行下页面的时候要写成
<a title="确定" href="<%=filepath%>?Page=<% =page -1 %>&amp;NewType=<%=NewType%>">上一页</a><br/>,
这样的形式，有多少条件后面跟多少条件。
但是这样就产生问题了，即时这样写NewType=request.form("NewType")也得不到NewType的值。所以在页首刚开始的地方应该写成NewType=request("NewType")。就可以实现把参数带到下一页的连接中了。
wap中上一条、下一条的问题。
在开发中，新闻、笑话、下载等业务为用户提供方便基本都需要在一条记录完成后，再提供下一条记录的操作，下面是简要的对下一条记录实现方法的描述。

比如显示新闻是国际新闻的记录，list.asp来进行显示，通过sql语句select * from NewsInfo where type='国际' ,来得到符合条件的记录集，用户在浏览过程中，当前记录的id＝10，下一条记录的id是idnext=10＋1＝11，上一条记录的id是idpre=10－1＝9，然后<a href="list.asp?id='"&IdNext&"'">上一条</a>，这样的做法是欠缺的，仅仅适用与id是连续的，也就是说所有国际新闻的id是连续的，如果国际新闻和国内新闻在表中是穿插写入的，那么你的id－1很可能是国内新闻，条件限制type='国际' 就不起作用了。

正确且简练的做法应该是这样的（可能大家还有更好的做法），

当前的id是IdNow，表NewsInfo是按照id自增的。
获得idnext＝select top 1 from NewsInfo where type='国际' and id>'"&IdNow&"'
获得Idpre＝select top 1 from NewsInfo where type='国际' and id<'"&IdNow&"' order by id desc

剩下的问题，就不用说了吧，注意，先显示下一条，然后显示上一条，这样才方便用户
新闻小说的分页
在wap中过长的新闻和小说，会给大家带来很大的不方便。所以要求进行分页显示，比如按照每页显示300字来举例子。

pageWordNum=300 ' 每页显示的字数，这里300可以是变量
StartWord = 1
Length=len(Content) '要显示内容的总的长度
PageAll=(Length+PageWordNum-1)/PageWordNum '该篇新闻总共可分的总页数

i=request.QueryString("i") '第几页的标记
if isnull(i) or i="" then '如果是新闻的刚开始则默认i＝0
i=0
end if
Content = mid(Content,StartWord+i*PageWordNum,PageWordNum) '利用mid函数进行新闻内容的截取（mid函数的含义：从字符串中返回指定数目的字符）

。
。
。
<%
'开始进行分页操作
if 0<=i<PageAll then
if cint(i)<cint(PageAll)-1 then%>
<a href="ListFengshuiInfo.asp?i=<%=i+1%>">下一页</a><br/>
<%end if
if cint(i)>0 then%>
<a href="ListFengshuiInfo.asp?i=<%=i-1%>">上一页</a><br/>
<%end if
end if
%>

结束。

注意：1、 <a href="ListFengshuiInfo.asp?i=<%=i+1%>">下一页</a><br/>中ListFengshuiInfo.asp?i=<%=i+1%>可以按照你的实际环境的需要添加变量。
2、Mid函数的解释说明：


从字符串中返回指定数目的字符。

Mid(string, start[, length])
参数
string
字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。
Start
string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。
Length
要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。

wap中新闻等图片和文字混排
Wap开发中，图片和文字混排，可以采用ubb编码，原理就是自己定义一共特殊的格式，采用mid和replace函数进行转换。比如定义[img][/img],表示图片的开始和结束。
但是要注意，web和wap中的区分。进行以下替换 string1all = Replace(string1all,"[img]","</p><p align=""center""><img src=""../img/")
string1all = Replace(string1all,"[/img]"," "" alt=""""/></p><p>")

会使得图片居中显示。

编制wap中的快捷键
把accesskey属性加入到<a>、<anchor>和<input>标签中。
accesskey属性将允许用户只需要按一个专门的按键转跳到一个专门的锚或者输入框中。
这样可以加快用户的访问速度，并且符合用户的访问习惯。

如何让WML页面自己更新？
有过Web经验的人喜欢使用：
<meta http-equiv="refresh" content="1;http://somewhere.com/">　
来强制浏览器自动更新。
虽然在WAP中也支持一些META标签，一个更好的办法是使用<ontimer>标签。
以下的代码显示了如何自动转跳到另外一个卡片：nextdeck.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="splashscreen" ontimer="nextcard.wml">
　　　　　 <timer value="40"/>
　　　　　 <p>Please wait for the timer to run out...</p>
　　　 </card>
</wml>
下面的代码将强制浏览器在一段时间后重新装入同一个卡片。这个页面叫做loop.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="loop" ontimer="loop.wml">
　　　　　 <timer value="40"/>
　　　　　 <p>This text will be shown over and over again...</p>
　　　 </card>
</wml>
注意必须避免浏览器可能要使用的cache机制。