esto quiza te pueda servir
http://linux.tecnicosenlinea.cl/download/bddpack.zip
solo tienes que cambiar algunos parametros de la conexion con la base de datos y otras cosillas por hay, tu sabes que muchas veces en internet no encuentras todo como quisieras que fuera, pero te ayudará bastante. jojojoj
comparalo con esto:
<%
Set con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../../../db/exalumn.mdb")&";"
%>
<FORM METHOD="POST" ACTION="borrar2.asp">
Nombre<br>
<%
'Creamos la sentencia SQL y la ejecutamos
sql = "SELECT * FROM datos ORDER BY numero DESC"
Set RS = con.Execute(sql)
%>
<select name="numero">
<%do while not RS.eof%>
<option><%=RS("numero")%>
<%RS.movenext
loop
%>
</select>
<br>
<INPUT TYPE="SUBMIT" value="Borrar">
</FORM>