ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 一看就会QuickWAP入门(转)

一看就会QuickWAP入门(转)

原创 Linux操作系统 作者:jcszjswkzhou 时间:2019-02-20 19:33:05 0 删除 编辑
WAP是英文“Wireless Application Protocol”的缩写,是“无线应用协议”之意。目前开发WAP主要使用的是WML标记语言。WML是一种基于XML(扩展标记语言)的一种标记语言。这种语言是为无线设备用户提供交互界面而设计的。这些无线设备包括电话、呼机和个人数字助理(Personal Digital Assistants)等等。
  WML是一种语言,但算不上是程序语言。因为WML所定义的范围只限于如何表现文字、图片以及如何建立文件的链接等。单纯使用WML构成的文件只能称之为静态网页,所以我们要想让网页具备动态功能,可以借助ASP、PHP、JSP等网页技术实现。
  QuickWAP就是一款辅助编写WAP网页程序的ActiveX组件,不仅ASP程序等能够调用其中的模块,而且还可以被应用程序轻松调用。下面我们重点介绍QuickWAP在开发WAP网页程序方面中的应用。

WAP编码转换

  首先我们来用WML语言开发一个导航页面(文件后缀为.wml),效果如图1所示。


图1

  为了更好的通用于WAP手机,我们采取了UTF-8编码。代码中需要将中文字符转换提前为UTF-8编码的形式,代码如下。









WAP网站导航

++++++++++++++++++

搜狐
新浪
网易


雅虎
百度
中华

++++++++++++++++++


返回上级





  如果采用ASP编写的话,我们可以动态实现UTF-8编码,这样方便了我们修改,代码如下(文件后缀为.asp)。

<%Response.ContentType="text/vnd.wap.wml"%>






">


<%=Uni("WAP网站导航")%>

++++++++++++++++++

" href="http://wap.sohu.com"><%=Uni("搜狐")%>
" href="http://wap.sina.com"><%=Uni("新浪")%>
" href="http://wap.163.com"><%=Uni("网易")%>


" href="http://wap.yahoo.com"><%=Uni("雅虎")%>
" href="http://wap.baidu.com"><%=Uni("百度")%>
" href="http://wap.china.com"><%=Uni("中华")%>


++++++++++++++++++

" href="Index.asp">
<%=Uni("返回上级")%>






<%
Function Uni(Byval Chinese)
Dim i
For i = 1 to Len (Chinese)
A=Mid(Chinese, i, 1)
Uni=Uni & "&#x" & Hex(Ascw(A)) & ";"
Next
End Function
%>


  我们看到用ASP编写动态WAP网页程序,第一行必须声明ASP文件的处理方式。然后代码里面还要再定义转码函数,然后利用转码函数对每个中文字符进行UTF-8编码转换。
  使用ASP编写WAP程序,确实在编辑修改方面方便了很多。那么下边我们看看QuickWAP是怎样编写这个代码的,如下所示(文件后缀为.asp)。

<%
Set Wap=Server.CreateObject("QuickWap.WapNetSdk")
Wap.CardTitle="中国被爱可以在线"
Wap.PageHeader
'以下为文件正文。
Wap.WriteRow "WAP网站导航"
Wap.WriteRow "++++++++++++++++++"
Wap.WriteOut Wap.A("确定","http://wap.sohu.com","搜狐") & " "
Wap.WriteOut Wap.A("确定","http://wap.sina.com","新浪") & " "
Wap.WriteOut Wap.A("确定","http://wap.163.com","网易") & "
"
Wap.WriteOut Wap.A("确定","http://wap.yahoo.com","雅虎") & " "
Wap.WriteOut Wap.A("确定","http://wap.baidu.com","百度") & " "
Wap.WriteOut Wap.A("确定","http://wap.china.com","中华") & "
"
Wap.WriteRow "++++++++++++++++++"
'以下为返回链接等信息。
Wap.WriteRow Wap.A("确定","Index.asp","返回上级")
Wap.PageFooter
Set Wap=Nothing
%>

  在上边的文件代码首末我们分别创建和销毁了QuickWAP的实例化对象“Wap”,PageHeader和PageFooter两个函数创建了WAP的框架,在这个框架之间您可以像编写ASP程序那样编写正文。WriteOut和WriteRow是输出字符串的函数,并且已经内置了UTF-8编码的功能,可以直接使用它们输出要显示的内容。

  比较以上三种形式的WAP程序代码,我们发现使用QuickWAP的代码最简单,除此之外他还有一个更明显的优点那就是在IE中查看也可以执行不误,而前边两个文件就必须使用手机或WAP模拟器了,在IE中浏览的效果如图2所示。


图2

  使用QuickWAP编写的程序代码兼容性好了,我们也就不用再专门做WEB网页让人们在IE中预览我们的WAP站点效果,同时您在IE中查看网页的文件源代码仍然是标准的WML代码,可以直接保存为WML文件执行。

分页功能

  假如我们想把下边的文字分页怎么办?
  "对于熟悉ASP的开发人员,很容易就能够掌握QuickWAP组件的,因为QuickWAP的诞生就是为辅助动态WAP程序产生的。"  您也许认为很简单,文字很短,有什么难的呢,对于WML文件来说可能需要做两个卡片或两个文件,而对于ASP可要编写分页函数来实现。
  在这里我们看看QuickWAP给我们提供了怎样的解决方案,我们先看分页代码实例的效果图,如图3、图4、图5所示。


图3


图4


图5

  如果让您用ASP或WML程序来编写这个程序的话,至少需要几分钟吧,请看下边用半分钟时间用QuickWAP来实现它的代码。

<%
Set Wap=Server.CreateObject("QuickWap.WapNetSdk")
Wap.CardTitle="中国被爱可以在线"
Wap.PageHeader
'以下为文件正文。
Dim Content
Content="对于熟悉ASP的开发人员,很容易就能够掌握QuickWAP组件的,因为QuickWAP的诞生就是为辅助动态WAP程序产生的。"
Wap.WriteRow "++++++++++++++++++"
Wap.WriteRow Wap.EasyMorePage(Content,25)
Wap.WriteRow "++++++++++++++++++"
'以下为返回链接等信息。
Wap.WriteRow Wap.A("确定","Index.asp","返回上级")
Wap.PageFooter
Set Wap=Nothing
%>

  以上代码中EasyMorePage是一个功能简易的分页函数,它需要设置两个变量,第一个变量为要分页的字符串内容,第二个变量为设置每页显示的字符数量。该函数可以根据两个变量的值产生不同的翻页链接代码。

中文字符传递

  像WEB站点那样在URL地址中传递中文字符,并且正确显示,不产生乱码现象。执行的效果图6如下所示。


图6


<%
Set Wap=Server.CreateObject("QuickWap.WapNetSdk")
Wap.CardTitle="中国被爱可以在线"
Wap.PageHeader
'以下为文件正文。
Wap.WriteRow "++++++++++++++++++"
Wap.WriteRow Wap.A("确定",Wap.ThisFileName & "?Site=" & Wap.SubmitText("WAP之家"),"点击查看您喜爱的WAP站")
Wap.WriteRow Wap.RequestText("Site")
Wap.WriteRow "++++++++++++++++++"
'以下为返回链接等信息。
Wap.WriteRow Wap.A("确定","Index.asp","返回上级")
Wap.PageFooter
Set Wap=Nothing
%>

  在上边的代码中SubmitText和RequestText分别用于提交和接收中文字符,ThisFileName动态取到此文件的名字,所以即使您改变了文件名,程序也可以顺利执行。

  在编写WAP程序时,开发者碰到的首要问题就是解决WAP中的编码、文章分页以及中文字符提交传递等问题,QuickWAP都给出了完美的解决方案。对于在数据库方面的应用QuickWAP也毫不逊色,它全力支持Microsoft SQL Server2000和Microsoft Access2000以上版本数据库,是开发功能强大的动态WAP网站不可多得的辅助软件。

  QuickWAP采用ActiveX技术让WAP程序执行更快、更稳定、更安全,只要服务器成功安装了QuickWAP,那么您就可以在WAP(或WEB)程序中调用其中的功能模块。您可以任意迁移您的WAP程序,而不必像网上很多WAP自助建站那样总是依赖于别人的框架之下,有了QuickWAP,您也可以拥有一个强大的、属于自己的WAP网站,早日实现自己企业的无线信息化。


来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10294527/viewspace-127182/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2007-08-29

  • 博文量
    1481
  • 访问量
    1013312