Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/01/2005, 14:32
daenor
 
Fecha de Ingreso: diciembre-2004
Mensajes: 197
Antigüedad: 20 años, 4 meses
Puntos: 1
Pregunta Error al tener un campo vacio del form (Form>ASP>DB), que puedo hacer?

Buenas buenas!!
Si, he buscado en el foro, pero las respuestas o no funcionan o no las entiendo...

Tengo un formulario de un solo campo, que debe ser llenado para que se comunique con este ASP:

<html>
<head><title>Paginar resultados de consulta</title></head>


<%
DNI = Request.Form("DNI")

'Conexion a tu base de datos
StrConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("database/userREG.mdb")

SQL="SELECT DNI, CGarantia, Cliente, DirCliente, TelCliente, Fecha FROM userVENTA Where DNI='" & DNI & "'"

'Configurar aqui los registros por página
num_registros = 20

'actualizamos la pagina actual
if (request.queryString("pag") <> "") then
pagina_actual = request.queryString("pag")
else
pagina_actual = 1
end if

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open StrConn
Set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open sql,oConn,3,1

RS.pageSize = num_registros
RS.absolutePage = pagina_actual
cantidad_campos = RS.Fields.Count
%>

<body>
<div align="center">
Página actual: <b><%= pagina_actual %></b><br>
Cantidad de páginas: <b><%= RS.PageCount %></b><br>
Registros por página: <b><%= RS.PageSize %></b><br>
Registros totales: <b><%= RS.RecordCount %></b>
</div>
<br><br>

<table cellspacing="2" cellpadding="2" border="1" align="center">
<tr>
<%
For campo = 0 to cantidad_campos - 1 %>
<td align="center"><%=RS(campo).Name%></td>
<% Next %>
</tr>
<%
registros_mostrados = 0
While (Not RS.eof And registros_mostrados < num_registros)
registros_mostrados = registros_mostrados +1
%>
<tr>
<%For campo=0 to cantidad_campos - 1 %>
<td align="center"><%=RS(campo)%></td>
<%Next%>
</tr>
<%
RS.MoveNext
Wend
%>
<tr>
<td colspan="<%=cantidad_campos%>" align="center">
<%
i=1
Do While i < RS.PageCount
%>
<b><a href="verBASE.asp?pag=<%=i%>"><%=i%></a></b>
<%
i=i+1
Loop
%>
</td>
</tr>
</table>
<%
'Limpiamos los objetos (SIEMPRE)
RS.Close
Set RS = Nothing
oConn.Close
Set oConn = Nothing
%>
</body>
</html>


para que luego me de los detalles de una base de datos.

Si el campo es llenado correctamente, no hay problemas . Pero si se llena mal (con datos erroneos) o no se llena, me da un error y no puedo dirijir al usuario a ningun lugar aceptable , como sea nuevamente la pagina del formulario u otra que me diga que hay un error y me haga volver.

Alguna idea?

para mas info, la manera de llegar a este asp, como podran imaginar es con un simple formulario, se llena, se envia y se comunica con el ASP, para que este verifike si los datos son correctos o no en la base de datos...

bien, gracias por cualquier idea... y ahi arriba esta el codigo con solo este problemita :P