Hola que tal estoy realizando una aplicacion asp con SQL como manejador. Mi duda en concreto es con el siguiente fragmento de codigo, que es una funcion para llenar una lista menu a traves de una tabla de un BD.
<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.open "PROVIDER=SQLOLEDB;DATA SOURCE=GELOGGER\SQLEXPRESS;UID=sa;PWD=gestion;DATA BASE=GESTION "
Set RS_PROCEDENCIA = Server.CreateObject ("ADODB.RecordSet")
sub lista_dinamica(c,r,tabla,sel)
dim SQL
SQL="SELECT * FROM " &tabla& " ORDER BY descripcion ASC"
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
%>
Hago el llamado de esta funcion de la siguiente manera:
call lista_dinamica(oConn,RS_PROCEDENCIA,CAT_PROCEDENCI A,procedencia)
el problema aqui es que me marca un error que no logro encontrar es el siguiente:
Microsoft OLE DB Provider for SQL Server (0x80040E14)
Sintaxis incorrecta cerca de la palabra clave 'ORDER'.
/captura.asp, línea 221
la linea 221 es la que tiene :Set r = c.Execute(SQL)
segun yo esta bien pero no encuentro el error. Me pueden ayudar porfavor.
