QuickWAP1.5利用ASP读取Access记录集一例（转）

很多WAP开发人员除了掌握了QuickWAP V1.5提供的MdbList、MdbListPages等函数外，仍然感觉QuickWAP V1.5提供的数据处理功能有限，于是想自己控制SQL查询后记录集，现提供一简单实例，作为抛砖引玉。

　　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能够给您的开发带来方便。

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

转载于:http://blog.itpub.net/10294527/viewspace-127173/