26/05/2004, 11:51
|
| | | Fecha de Ingreso: mayo-2004
Mensajes: 9
Antigüedad: 21 años Puntos: 0 | |
| esto es lo que tengo
<%
Dim casa
casa = "1"
if (Request.QueryString("palabras") <> "") then casa= Request.QueryString("palabras")
%>
<%
set casa1 = Server.CreateObject("ADODB.Recordset")
casa1.ActiveConnection = MM_portal1_STRING
casa1.Source = "SELECT * FROM tabla1 WHERE UCase(campo2) LIKE '%" + UCase(Replace(casa, "'", "''")) + "%' OR UCase(campo3) LIKE '%" + UCase(Replace(casa, "'", "''")) + "%' OR UCase(campo4) LIKE '%" + UCase(Replace(casa, "'", "''")) + "%' ORDER BY info ASC"
casa1.CursorType = 0
casa1.CursorLocation = 2
casa1.LockType = 3
casa1.Open()
casa1_numRows = 0
%> |