Help - Deleting a record in a database

[Rich]

I have a page that list all records in an access table. I would like to add
a delete record function to the list to delete selected records. Here is my
current code:

*************** *************** *************** ************
<%
Dim strDB, con
Dim rs

strDB = "Provider=Micro soft.Jet.OLEDB. 4.0; Data Source=" &
Server.MapPath( "ques_comm.mdb" ) & ";"

Set con = CreateObject("A DODB.Connection ")
con.Open strDB
Set rs = CreateObject("A DODB.Recordset" )
rs.CursorLocati on =3

rs.Open "select * from questions ORDER BY usernumber DESC", con
WHILE NOT rs.EOF %>
<TR>
<TD width=25 rowspan="3" align=left valign="middle"
bgColor=#000000 ><div align="center"> <span
class="style1"> <%=rs("usernumb er")%>&nbsp;</span></div></td>

<TD align=left height=25 bgColor=#e7e7de width=103><stro ng><font
size="2">Name:</font></strong></td>
<td width="697" bgColor=#e7e7de ><font
size="2"><%=rs( "UserName")%>&n bsp;</font></td> <td width="3"></TD>
</TR>
<TR>
<TD align=left height=25 bgColor=#e7e7de width=103><stro ng><font
size="2">Time
Submitted:</font></strong></td>
<td bgColor=#e7e7de ><font
size="2"><%=rs( "SubmitDT")%>&n bsp;&nbsp;<%=rs ("SubmitTF")%>& nbsp;</font></TD>
</TR>
<TR>
<TD align=left height=25 bgColor=#e7e7de width=103><stro ng><font
size="2">Questi on:</font></strong></td>
<td bgColor=#e7e7de ><font size="2"><%=rs( "Comments")%>&n bsp;</font></TD>
</TR>
<TR>
<TD align=left colspn=2>&nbsp; </TD>
<TD align=left height=25 colspn=2>&nbsp; &nbsp;</TD>
</TR>
<% rs.MoveNext
wend
con.Close
Set con = Nothing
Set rs = Nothing
%>

*************** *************** *************** ***********

Thanks in advance.
Rich

[David Dorward]

Ri**@NeedsHelp. com wrote:

I have a page that list all records in an access table. I would like to
add a delete record function to the list to delete selected records. Here
is my current code

That looks like ASP+VBScript. This is a JavaScript newsgroup - not the best
place to get answers for that type of question.

--
David Dorward <http://blog.dorward.me .uk/> <http://dorward.me.uk/>
Home is where the ~/.bashrc is

[Rich]

Thanks, I moved it to VBScript.