QuickWAP V1.5在执行了SQL语句外，会在内部自动生成记录集，记录集名称为：RS，引用时需要加实例化对象的名称。如：Wap.Rs.RecordCount 。
首先，我们建立一个名为Url.mdb的Access2000数据库，然后在其中新建一个表，表名为：SiteUrl，数据库结构如图1所示：
图1
数据库内容填写如下：
图2
然后我们在Url.mdb的同级目录下新建一个Url.asp的文件，代码如下所示：;
<%
Set Wap=Server.CreateObject("QuickWap.WapNetSdk")
Wap.CardTitle="中国被爱可以在线"
Wap.PageHeader
'以下为文件正文。
Wap.WriteRow "++++++++++++++++++"
Wap.Mdb_Path="Url.mdb" '用于设置Access数据库的路径。
Wap.Mdb_StrSql="Select * From SiteUrl Order by ID Asc" '要查询数据库的SQL语句。
Wap.MdbDo '执行SQL语句。
For I=1 To Wap.Rs.RecordCount
Wap.WriteRow Wap.A("确定",Wap.Rs("SiteUrl"),Wap.Rs("SiteName"))
Wap.Rs.MoveNext
Next
Wap.WriteRow "++++++++++++++++++"
'以下为返回链接等信息。
Wap.WriteRow Wap.A("访问","http://wap.bicyle.org","被爱可以")
Wap.WriteRow Wap.DoPrev("prev", "后退", "ToBack", "false")
Wap.PageFooter
Set Wap=Nothing
%>
接着通过IIS执行并在MyIE2浏览器中浏览，效果如图3所示。
图3
在WapDisplayer中浏览的效果如图4所示。
图4
使用QuickWAP V1.5编写WAP网页程序，不仅可以在手机中浏览、还可以在IE浏览器中浏览。同时，它简化了ASP连接数据库，让您开发ASP+WML更加迅速，最后程序通过释放实例化对象，清空连接对象、记录集等。
QuickWAP V1.5不仅支持动态WAP程序调用器中的模块，也支持动态WEB程序调用其中的模块，希望QuickWAP能够给您的开发带来方便。
标签：
