Forums

ASP

This topic is locked

HELP

Posted 19 Jan 2003 09:06:08
1
has voted
19 Jan 2003 09:06:08 Jaime Romo posted:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<p>Hello there im new with ASP and i wounder if someone can help me please i
get this error </p>
<p>Error Type:<br>
ADODB.Field (0x800A0BCD)<br>
Either BOF or EOF is True, or the current record has been deleted. Requested
operation requires a current record.<br>
/intranet/clientes/busqueda.asp, line 87</p>
<p> </p>
<p><%@LANGUAGE="VBSCRIPT"%><br>
< html><br>
<
link rel=stylesheet href="../1/estilo1.css" type="text/css"><br>
< head><br>
<
title>Welcome to Homepage</title><br>
<
meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><br>
< /head><br>
<
body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"><br>
<
table class="box1" width="50%" border="1" align="center" cellpadding="0" cellspacing="0"><br>
<tr><br>
<td><div align="center">Busqueda de Clientes</div><br>
</td><br>
</tr><br>
< /table><br>
<
p> </p><br>
<
p></p><br>
< %<br>
link = 0<br>
if request(&quot;buscar&quot<img src=../images/dmxzone/forum/icon_smile_wink.gif border=0 align=middle> = 0 then&lt;br&gt;
%&gt;&lt;br&gt;
&lt;
table width=&quot;86%&quot; border=&quot;1&quot; align=&quot;center&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; class=&quot;box2&quot;&gt;&lt;br&gt;
&lt;tr&gt;&lt;br&gt;
&lt;td width=&quot;60%&quot;&gt;Escribe el nombre, mail o telefono del cliente
que deseas&lt;br&gt;
buscar.&lt;/td&gt;&lt;br&gt;
&lt;td width=&quot;49%&quot;&gt;&lt;form action=&quot;busqueda.asp&quot; method=&quot;post&quot; name=&quot;busqueda&quot; id=&quot;busqueda&quot;&gt;&lt;br&gt;
&lt;div align=&quot;center&quot;&gt;&lt;br&gt;
&lt;input name=&quot;busqueda&quot; type=&quot;text&quot; id=&quot;busqueda2&quot; class=&quot;campo1&quot;&gt;&lt;br&gt;
&amp;
nbsp;&amp;nbsp;&amp;nbsp;&lt;br&gt;
&lt;input type=&quot;submit&quot; name=&quot;Submit&quot; value=&quot;Buscar&quot;&gt;&lt;br&gt;
&lt;input name=&quot;buscar&quot; type=&quot;hidden&quot; id=&quot;buscar&quot; value=&quot;1&quot;&gt;&lt;br&gt;
&lt;/div&gt;&lt;br&gt;
&lt;/form&gt;&lt;br&gt;
&lt;/td&gt;&lt;br&gt;
&lt;/tr&gt;&lt;br&gt;
&lt; /table&gt;&lt;br&gt;
&lt;
p&gt;&amp;nbsp;&lt;/p&gt;&lt;br&gt;
&lt; %end if%&gt;&lt;br&gt;
&lt; p&gt;&lt;br&gt;
&lt;
% if request(&quot;buscar&quot<img src=../images/dmxzone/forum/icon_smile_wink.gif border=0 align=middle> = 1 then %&gt;&lt;br&gt;
&lt;
!--#include file=&quot;../Connections/intranet.asp&quot; --&gt;&lt;br&gt;
&lt; %&lt;br&gt;
dim busqueda&lt;br&gt;
busqueda = 0&lt;br&gt;
Dim Recordset_busqueda&lt;br&gt;
Dim Recordset_busqueda_numRows&lt;br&gt;
Set Recordset_busqueda = Server.CreateObject(&quot;ADODB.Recordset&quot<img src=../images/dmxzone/forum/icon_smile_wink.gif border=0 align=middle>&lt;br&gt;
Recordset_busqueda.ActiveConnection = MM_intranet_STRING&lt;br&gt;
Recordset_busqueda.Source = &quot;SELECT * FROM dbo.intranet_clientes WHERE
nombre = '%%busqueda%%' OR apellido LIKE '%%busqueda' OR telefono LIKE
'busqueda%%' OR email LIKE '%%busqueda%%'&quot;&lt;br&gt;
Recordset_busqueda.CursorType = 0&lt;br&gt;
Recordset_busqueda.CursorLocation = 2&lt;br&gt;
Recordset_busqueda.LockType = 1&lt;br&gt;
Recordset_busqueda.Open()&lt;br&gt;
Recordset_busqueda_numRows = 0&lt;br&gt;
%&gt;&lt;br&gt;
&lt; /p&gt;&lt;br&gt;
&lt;
table class=&quot;box2&quot; width=&quot;60%&quot; border=&quot;0&quot; align=&quot;center&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot;&gt;&lt;br&gt;
&lt;tr&gt;&lt;br&gt;
&lt;td&gt;&lt;br&gt;
&lt;table width=&quot;100%&quot; border=&quot;1&quot; cellpadding=&quot;0&quot; cellspacing=&quot;0&quot; bordercolor=&quot;#666666&quot;&gt;&lt;br&gt;
&lt;tr&gt;&lt;br&gt;
&lt;td width=&quot;33%&quot;&gt;&lt;%=(Recordset_busqueda.Fields.Item(&quot;nombre&quot<img src=../images/dmxzone/forum/icon_smile_wink.gif border=0 align=middle>.Value)%&gt;&lt;/td&gt; //*****************this
is line 68*********************//&lt;br&gt;
&lt;td width=&quot;33%&quot;&gt;&amp;nbsp;&lt;/td&gt;&lt;br&gt;
&lt;td width=&quot;34%&quot;&gt;&amp;nbsp;&lt;/td&gt;&lt;br&gt;
&lt;/tr&gt;&lt;br&gt;
&lt;/table&gt;&lt;br&gt;
&lt;/td&gt;&lt;br&gt;
&lt;/tr&gt;&lt;br&gt;
&lt; /table&gt;&lt;br&gt;
&lt;
p&gt;&amp;nbsp; &lt;/p&gt;&lt;br&gt;
&lt; /body&gt;&lt;br&gt;
&lt; /html&gt;&lt;br&gt;
&lt; %&lt;br&gt;
Recordset_busqueda.Close()&lt;br&gt;
Set Recordset_busqueda = Nothing&lt;br&gt;
%&gt;&lt;br&gt;
&lt; %end if%&gt;
&lt;/p&gt;
&lt;/body&gt;
&lt;/html&gt;


Visit my home page
www.cancuncoral.com

Reply to this topic