Mensaje de Error "Se eseraba un identificador"... Tengo el siguiente problema, resulta que en una pantalla tengo que capturar los datos del PROVEEDOR pero esto lo hago mediante un boton que abre una ventana emergente, en esa ventana emergente hago una busqueda que me arroja datos de acuerdo a la coincidencia que yo ingrese, el problema esta en que a la hora de dar click al REGISTRO INDICADO me marca un error que dice "Se esperaba un identificador",, creo saber por donde va el error pero exactamente no sé qué hacer... si yo no hago busqueda de registros,, es decir,, que al abrir la ventana emergente se carguen los registros de la tabla, y si yo doy click al registro correspondiente los datos si me los pasa ala pantalla original... supongo entonces el problema esta a la hora de hacer la búsqueda...
Anexo el código que estoy usando:
Con esta parte invoco ala ventana emergente mediante una funcion en Javascript:
Código HTML:
function proveedor()
{
window.open('buscaproveedor.asp?form=frmcompras&nombr=nombr&nombre=nombre&direccion=direccion&tipo=tipo','','toolbar=no, location=no, directories=no, status=no, menubar=no, scrollbars=yes, resizable=no, width=740, height=450, left=250, top=150');
}
Código HTML:
<table> <tr> <td> <table background="img/Barratabla1.gif" border="0" cellpadding="0" cellspacing="0" width="695" height="33"> <tr> <td class="barras3"> Búsqueda de Proveedores</td> </tr> </table> <table align="center"> <tr><td height="2"></td></tr> <tr> <td height="3" bgcolor="#003399" width="690"></td> </tr> </table> <table align="center" width="650"> <tr><td height="7"></td></tr> <form name="buscaproveedor" method="post" action="buscaproveedor.asp"> <tr> <td class="interfaz" align="center"> <input style="height:18; width:200;" type="text" class="interfaz" name="buscar"/> <input style="height:20;" class="btn3" type="submit" value="[ Buscar ]" /> </td> </tr> </form > <tr><td height="7"></td></tr> </table> <table background="img/Barratabla1.gif" border="0" cellpadding="0" cellspacing="0" width="695" height="33"> <tr> <td class="barras3"> Resultados de la búsqueda:</td> </tr> </table> <table width="690" border="0" cellpadding="0" cellspacing="0" align="center"> <tr><td height="10"></td></tr> <tr> <td width="50" height="20" bgcolor="#003399" class="barras2" align="left"> ID</td> <td width="240" height="20" bgcolor="#003399" class="barras2" align="left"> Nombre/Razón Social</td> <td width="230" height="20" bgcolor="#003399" class="barras2" align="left"> Dirección: Ciudad</td> <td width="170" height="20" bgcolor="#003399" class="barras2" align="center">Teléfono</td> </tr> </table> <table width="690" border="0" cellpadding="0" cellspacing="0" align="center"> <% set rs=createobject("adodb.recordset") termino=request("buscar") if termino="" then %> <table width="690" border="0" cellpadding="0" cellspacing="0" align="center"> <% for i=1 to 10 if (i mod 2)=1 then color="#FFFFFF" else color="#CCCCCC" end if response.Write("<tr><td colspan='4' bgcolor='" & color & "' align='center' class='alerta' height='18'> ") if i=5 then response.Write("Especifique un criterio de búsqueda") end if response.Write("</td></tr>") next %> </table> <table> <% else '---- INICIO DE LA BUSQUEDA ---- strSQL = "SELECT id,nombre,poblacion,telefono,direccion,tipo FROM proveedores WHERE id LIKE '%" & request("buscar")&"%' OR nombre LIKE '%"&request("buscar")&"%'" rs.open strSQL,conexion if not rs.EOF then do while not rs.EOF i=i+1 if (i mod 2)=1 then color="#FFFFFF" else color="#CCCCCC" end if %> <tr> <td width="50" height="20" bgcolor="<%response.Write(color)%>" class="interfaz3" align="left"> <a style="cursor:pointer;" onclick="javascript:window.opener.<%response.Write(request("form"))%>.<%response.Write(request("nombr"))%>.value='<%response.Write(rs("id"))%>';window.opener.<%response.Write(request("form"))%>.<%response.Write(request("nombre"))%>.value='<%response.Write(rs("nombre"))%>';window.close();"> <%response.write(rs("id"))%></a> </td> <td bgcolor="<%response.Write(color)%>" width="290" height="20" class="interfaz3"><%response.write(rs("nombre"))%></td> <td bgcolor="<%response.Write(color)%>" width="250" height="20" class="interfaz" align="left"><%response.write(rs("poblacion"))%></td> <td bgcolor="<%response.Write(color)%>" width="100" height="20" class="interfaz" align="left"><%response.write(rs("telefono"))%></td> </tr> <% rs.movenext loop i=i+1 if i<10 then for a=i to 10 if (a mod 2)=1 then color="#FFFFFF" else color="#CCCCCC" end if response.Write("<tr><td colspan='4' align='center' bgcolor='" & color & "'> </td></tr>") next end if else for i=1 to 10 if (i mod 2)=1 then color="#FFFFFF" else color="#CCCCCC" end if response.Write("<tr><td colspan='4' bgcolor='" & color & "' align='center' class='alerta' height='18'> ") if i=5 then response.Write("No se encontraron coincidencias") end if response.Write("</td></tr>") next end if rs.close set rs=nothing conexion.Execute(strSQL) conexion.close set conexion=nothing end if %> </table> <table align="center"> <tr><td height="1"></td></tr> <tr> <td height="3" bgcolor="#003399" width="690"></td> </tr> </table> <table align="center"> <tr> <td> <input style="height:20;" class="btn4" type="button" value="Salir" onclick="javascript:window.close();"/> </td> </tr> </table> </td> </tr> </table>
Saludos y gracias por cualquier idea...
y de mucho indagar, adecue el código de esta manera:
