ASP實用大全-實戰ASP(5)

　在我前面那篇文章《如何結合使用WML和ASP技術編寫動態手機頁面》，我介紹了如何使用ASP產生動態的WML網頁。在本文中，我想進一步的介紹如何利用ASP開發動態的WML網頁，及其應用。其實細想一下，可以使用服務器端編程（例如ASP）開發很多很多應用程序用在WAP手機上，只要把它們直接生成WAP手機能識別的WML網頁就可以了。比如說在本文中要介紹的，如何為WAP等無線設備開發一個循環式的旗幟廣告系統。

　　圖一顯示了一個旗幟廣告的示意圖，這是在一個 WAP 站點上顯示旗幟廣告的一個可能的方法。

　　使用這種方法，你就可以在你的網站上加入循環式的旗幟廣告，就能給那些使用無線上網沖浪的用戶一個機會，讓他們了解到更快的廣告信息，只需他們輕輕一按電話左邊的按鈕就可以了，不但能夠方便用戶而且能夠增加網站的收入。

　　假設我們想要創建一個循環旗幟廣告，并把它放在任何頁面的頂部，使用ASP和WML來創建這個頁面。為了使這個系統更加具有可伸縮性，并更加貼近現實，我想把將要顯示的廣告信息存入數據庫中，然后從數據庫中抽取出所有相關的信息，從而使產生的內容保持動態變化的。然后將隨機從數據庫選擇一個廣告和它所指向的鏈接，這樣才能做到使廣告不斷的循環出現。每次載入一個頁面的時候，就將會出現一個新的廣告。

　　好下面我先說一下，建立廣告數據庫。為了簡化，我使用了Microsoft Access 數據庫，表名為ADbase，其中有主鍵bannerid（用來說明旗幟廣告名），bannertext（顯示于手機上的廣告詞，也就是旗幟廣告的實際的正文消息） 和 bannerURL（連接廣告的鏈接）當然了，你也可以在網頁中加入一些圖形，不過為了簡化，我將省掉這些圖形。建好的庫如下顯示。

＜%@Language=VBScript

' 定義用于產生隨機數的最大值
MaxNoAds = 10

' 設置文檔類型
Response.ContentType = "text/vnd.wap.wml"

' 從數據庫中隨機選擇一個廣告
Randomize(Cbyte(Left(Right(Time(),5),2)))
AdID=(Int((MaxNoAds-1+1) * Rnd + 1))

' 從數據庫中把這條廣告取出

set objConn = Server.CreateObject("adodb.connection")
objConn.Open "dsn=adserver;uid=adserver"
sql = "SELECT * from ADbase where bannerid = '" & AdID & "'"
set rsAd = objConn.Execute(sql)

' 顯示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="bannerad" title="廣告"＞
＜p＞
＜a href="＜%=rsAd("bannerURL")%＞"＞ ＜%=rsAd("bannertext")%＞
＜/p＞
＜/wml＞