Easy asp question

1

ok…i need to write an asp script that will take all the information from ‘news.mdb’ and display it in a flash environment. I know how to code the flash part, but i stuck on the whole asp thing :-\ please help

-loki

2 

<% Dim conn %>

<% MyPath=Server.MapPath("database.mdb") %>

<% Set conn = Server.CreateObject("ADODB.Connection") %>

<% conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
	"DBQ=" & MyPath %>

<% srSQL1 = "SELECT * FROM Publications WHERE series = '1 SERIES'" %>
<% Set rsSeries1 = conn.Execute(srSQL1) %>

      <table width="707" border="0">
        <tr> 
          <td class="header" colspan="5"> 
            <div align="center"><font face="Tahoma, Arial, Verdana" size="2" color="#333333"><b>ADMINISTRATION 
              (1 SERIES)</b></font></div>
          </td>
        </tr>
        <tr>
		    <% Do While Not rsSeries1.EOF %>
          <td width="123" align="top"><font face="Tahoma, Arial, Verdana" size="1" color="#333333"> 
            <% Response.Write rsSeries1("pubNum")%>
            </font></td>
          <td width="341" align="top"><font face="Tahoma, Arial, Verdana" size="1" color="#333333"> 
            <% Response.Write rsSeries1("title")%>
            </font> </td>
          <td width="136"><font face="Tahoma, Arial, Verdana" size="1" color="#333333"> 
            <% Response.Write rsSeries1("date")%>
            </font></td>
          <td width="89"><font face="Tahoma, Arial, Verdana" size="1" color="#333333"> 
            <% Response.Write rsSeries1("prop")%>
            </font></td>
        </tr>
        <% rsSeries1.MoveNext %>
        <% Loop %>
      </table>

that will connect to your database, and grab the records
pubNum
title
date
prop

through a recordset called rsSeries1 and place them in a table
this simply connects to your database


<% Dim conn %>

<% MyPath=Server.MapPath("database.mdb") %>

<% Set conn = Server.CreateObject("ADODB.Connection") %>

<% conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
	"DBQ=" & MyPath %>

this is saying, pull the rocords until there arent any more to pull


 <% Do While Not rsSeries1.EOF %>

this displays the record


<% Response.Write rsSeries1("pubNum")%>

move to the next record and keep looping

<% rsSeries1.MoveNext %>
        <% Loop %>

now you stated you already know how to get the records into flash, so i am not going to elaborate, if you need help, repost