19/02/2003, 07:17
|
| | Fecha de Ingreso: diciembre-2002 Ubicación: argentina... de ahí seran veinte cuadras
Mensajes: 382
Antigüedad: 21 años, 11 meses Puntos: 0 | |
buenasss bakanzipp, mira, en respuesta a tu mensaje anterior, hice algunos cambios, pero no encuentro el error:
Error de Microsoft VBScript en tiempo de ejecución error '800a000d'
No coinciden los tipos
/BIBLIOTECA/busquedaprueba4.asp, line 18
if instr(Request.Form("busqueda"),"/") Then
Busqueda=Split(Replace(Request.Form("busqueda"),"' ","''")," ")
vector = split(Busqueda,"/")
response.write ubound(vector) 'LINEA 18
response.end
strsql="SELECT * FROM PRODUCTOS WHERE NOMBRE LIKE '%"&vector(0)&"%' "
If Ubound(vector)>0 Then
For i=1 to Ubound(vector)
strsql=strsql&" OR autor LIKE '%"&vector(i)&"%' "
Next
End If
Else
strsql="SELECT * FROM publicaciones WHERE NOMBRE LIKE '%"&Request.Form("busqueda")&"%' "
SET objRS=objConn.Execute(strsql)
End if
GRACIAS POR ESA MANO DE SIEMPRE!!
__________________ Juan Pablo |