si lo tengo miren ahi les va mi codigo completo
<HTML>
<HEAD>
<title>Coordinacion de Asesores del C.gobernador</title>
<%
Set oConn = Server.CreateObject("ADODB.Connection")
set recordset1 = Server.CreateObject("ADODB.RecordSet")
oConn.Open "papeleria2"
SQL = "SELECT * FROM tot "
objRS = oConn.execute(SQL)
%>
</HEAD>
<BODY bgcolor="#1A5CC0">
<table border=1>
<tr>
<td><B>PRODUCTO</B></td>
<td><B>CANTIDAD</B></td>
<td><B>ID_PRODUCTO</B></td>
</TR>
<%
if (not objRS.Eof) and (not objRS.bof) then
while (not objRS.Eof)
%>
<tr>
<td></td>
<td><%=objrs("total_actual")%&g t; </td>
<td><%=objrs("id_producto")%> ;</td>
</tr>
<%
objRS.MoveNext
wend
end if
%>
</BODY>
</HTML>
<table border=1>
<tr>
<td>
solo se que no se nada.
el que persevera alcanza.
by sonneman</td>
</tr>
</table>