Foros del Web » Programando para Internet » ASP Clásico »

urgente problema con formulario en dreamweaver mx

Estas en el tema de urgente problema con formulario en dreamweaver mx en el foro de ASP Clásico en Foros del Web. alguien me ayude, estoy creando una busqueda sencilla en dreamweaver Mx y no me muestra los resultados, estoy utilizando un solo parametro, y si ejecuta ...
  #1 (permalink)  
Antiguo 25/05/2006, 14:14
 
Fecha de Ingreso: mayo-2006
Mensajes: 7
Antigüedad: 19 años
Puntos: 0
urgente problema con formulario en dreamweaver mx

alguien me ayude, estoy creando una busqueda sencilla en dreamweaver Mx y no me muestra los resultados, estoy utilizando un solo parametro, y si ejecuta pero no muestra nada...



ayudenme por fa
  #2 (permalink)  
Antiguo 25/05/2006, 14:16
Avatar de ElAprendiz  
Fecha de Ingreso: enero-2002
Ubicación: Maipu, Chile
Mensajes: 3.706
Antigüedad: 23 años, 3 meses
Puntos: 2
si pusieras parte del codigo, podriamos ayudarte mejor
  #3 (permalink)  
Antiguo 25/05/2006, 14:31
 
Fecha de Ingreso: mayo-2006
Mensajes: 7
Antigüedad: 19 años
Puntos: 0
gracias amigo, actualmente me sale este error:
Tipo de error:
ADODB.Field (0x800A0BCD)
El valor de BOF o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual.
/equipos/prueba2.asp, línea 36
  #4 (permalink)  
Antiguo 25/05/2006, 14:32
 
Fecha de Ingreso: mayo-2006
Mensajes: 7
Antigüedad: 19 años
Puntos: 0
este es el codigo de la pagina de busqueda donde hay solamente un textfield y un boton:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/Us.asp" -->
<%
Dim Rslo__MMColParam
Rslo__MMColParam = "1"
If (Request.Form("Form1") <> "") Then
Rslo__MMColParam = Request.Form("Form1")
End If
%>
<%
Dim Rslo
Dim Rslo_numRows

Set Rslo = Server.CreateObject("ADODB.Recordset")
Rslo.ActiveConnection = MM_Us_STRING
Rslo.Source = "SELECT * FROM Site WHERE Site_cod = '" + Replace(Rslo__MMColParam, "'", "''") + "'"
Rslo.CursorType = 0
Rslo.CursorLocation = 2
Rslo.LockType = 1
Rslo.Open()

Rslo_numRows = 0
%>





<table border="3">
<tr>
<td>Site_cod</td>
<td>Site_Nam</td>
<td>Country_cod</td>
</tr>
<tr>
<td><%=(Rslo.Fields.Item("Site_cod").Value)%></td>
<td><%=(Rslo.Fields.Item("Site_Nam").Value)%></td>
<td><%=(Rslo.Fields.Item("Country_cod").Value)%> </td>
</tr>
</table>

<p>&nbsp;</p>

<%
Rslo.Close()
Set Rslo = Nothing
%>
  #5 (permalink)  
Antiguo 25/05/2006, 14:39
Avatar de ElAprendiz  
Fecha de Ingreso: enero-2002
Ubicación: Maipu, Chile
Mensajes: 3.706
Antigüedad: 23 años, 3 meses
Puntos: 2
eso es por que estas haciendo referencia a un registro que no existe.
antes de mostrar la tabla debes evaluar si encontro algun registro.

ej.
<%
if not Rslo.eof then%>
<table border="3">
<tr>
<td>Site_cod</td>
<td>Site_Nam</td>
<td>Country_cod</td>
</tr>
<tr>
<td><%=(Rslo.Fields.Item("Site_cod").Value)%></td>
<td><%=(Rslo.Fields.Item("Site_Nam").Value)%></td>
<td><%=(Rslo.Fields.Item("Country_cod").Value)%> </td>
</tr>
</table><%
else
response.write "no se encontro el registro"
end if

%>
  #6 (permalink)  
Antiguo 25/05/2006, 16:50
 
Fecha de Ingreso: mayo-2006
Mensajes: 7
Antigüedad: 19 años
Puntos: 0
Aprendiz, muchas gracias, creo que todo esta correcto, te aviso luego
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:37.