Hola a todos:
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');
}
Este es el código de la ventana emergente, donde realizo la busqueda y trato de asignar los valores buscados a la pagina original...
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> Ojala puedan ayudarme... no sé que hacer para que funcione bien...
Saludos y gracias por cualquier idea...