# Easy asp question

**URL:** <https://forum.kirupa.com/t/easy-asp-question/26496>\
**Category:** Uncategorized\
**Created:** [July 23, 2003, 5:07pm UTC](https://forum.kirupa.com/t/easy-asp-question/26496 "2003-07-23T17:07:34Z")\
**Posts on this page:** 2\
**Page:** 1

<div class="post-metadata">

**Author:** ![loki](https://avatars.discourse-cdn.com/v4/letter/l/3be4f8/32.png) [@loki](https://forum.kirupa.com/u/loki)\
**Post date:** [July 23, 2003, 5:07pm UTC](https://forum.kirupa.com/t/easy-asp-question/26496/1 "2003-07-23T17:07:34Z")

</div>

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

---

<div class="post-metadata">

**Author:** ![system](https://canada1.discourse-cdn.com/flex011/uploads/kirupa/original/3X/6/2/621e5c11736f46532526e61be85940af4230f3e5.png) [@system](https://forum.kirupa.com/u/system)\
**Post date:** [July 23, 2003, 8:24pm UTC](https://forum.kirupa.com/t/easy-asp-question/26496/2 "2003-07-23T20:24:56Z")

</div>

```php

<% 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

```php

<% 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

```php

 <% Do While Not rsSeries1.EOF %>

```

this displays the record

```php

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

```

move to the next record and keep looping

```php
<% 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