Duda sobre funciones en asp

[Muzztein]

pues escribe en pantalla la variable SQL y checa si es que es valida la instruccion SQL

creo que el valor de TABLA viene vacio

sub lista_dinamica(c,r,tabla,sel)
dim SQL
SQL="SELECT * FROM " &tabla& " ORDER BY descripcion ASC"

reponse.write sql
response.end



Set r = c.Execute(SQL)
if not r.eof=FALSE then
Response.Write"<form name=""form1"">"
Response.Write"<select name="&sel& ">"
Response.Write"<option Select"" value=""""> </option>"
while r.eof=false
Response.write"<option value=""captura.asp"">"&r.fields ("descripcion").value& "</option>" &vbCrLf
r.movenext
wend
end if
Response.write"<\select> <\form>" & vbCrLf
end sub