Dynamic WAP Sites

[pjb007]

I am looking at wml at the moment, and discovered that you could get it to pull data out of a database, I have put this to the test but it does not seem to work.

Here is my code for a simple wml page that should display some simple news headlines.

Can anyone see anything wrong with this code?


<%@ Language = "JScript"; %><% Response.ContentType = "text/vnd.wap.wml";
%><?xml version="1.0"?>
<!-- #include file="adojavas.inc" -->
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN"
"http://www.wapforum.org/DTD/wml_1.2.xml">

'no idea what the above does

<wml>
<card id="card1" title="News">
<p>
Latest Headlines<br/>
<%
dim Conn
dim FilePath
dim SQL
Dim RsUser

'Connection to Database
Set Conn = Server.CreateObject("ADODB.Connection")
FilePath = Server.MapPath("db/database.mdb")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & FilePath & ";"

'SQL Query String
SQL = "Select headline FROM news"
'select items in headline field in the table called news

'Set the Recordset
Set RSUser = Conn.Execute (SQL)

'Print the Recordset
RSUser.movefirst
Do while not RSUser.EOF

Response.Write (RSUser("headline"))
RSUser.movenext
Loop
%>
</p>
</card>
</wml>