Displaying databse records

Hi,

Ive also posted this in the ASP forum as i was unsure where it should go.

Im a newbie to ASP and WML, i have attempted abit of coding and i use the word "Attempted" so really i dont know what im doin .

I was wondering if youd be kind enough to look through it and see where im goin wrong

<% Response.ContentType = "text/vnd.wap.wml"%>
<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.3//EN" "http://www.wapforum.org/DTD/wml13.dtd" >

<wml>

<%
strconn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/cds.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn
%>
<card id="card1" title="test">
<p>hiya test</p>
<%SQLQuery = "SELECT ProductName FROM products WHERE Type ='DVD' ORDER BY ProductName "
Set RSproduct = conn.Execute(SQLQuery) %>

<%RSproduct.movefirst
Do while not RSproduct.eof %>


<p><%=RSproduct("ProductName")%></p>
<% RSproduct.movenext
Loop %>
</card>
</wml>

Thanks for your help guys

Andy

So what exactly is or isn't happening?
Please don't cross post, people will respond one way or another