Uso de sentencia if en codigo de Dreamweaver

morfeoatm · #1 (**permalink**) 07/05/2009, 12:40

Que tal tengo el siguiente codigo , es una pagina que muestra un juego de registros segun informacion capturada en un formulario en otra pagina, lo que deseo hacer es el usuario no captura algun valor en cualquiera de los 3 campos de texto del formulario mande a otra pagina o de preferencia que en la misma pagina de busqueda muestre una leyenda de que falto algun dato. Y tambien como seria el codigo para chequear una casilla de verifiacion y dependiendo del valor usar un formulario u otro, ya que en la pagina de busqueda tengo 2 formularios. Gracias por su ayuda de antemano y por sus respuestas en otros post.

Hirotaro

nicolyto77 · #2 (**permalink**) 08/05/2009, 15:09

Hola amigo

Una pregunta, y el Codigo? Si nos lo mostras, se nos haria mas facil ayudarte

Con lo segundo que decis, con JavaScript lo podrias hacer bien... Tambien podrias chequear luego de enviar el Form con PHP, pero vos elegis y ambas no van en este Foro.

Saludos

morfeoatm · #3 (**permalink**) 11/05/2009, 08:05

Que gracias por responder , el codigo es el siguiente, Ahi veo que al principio el codigo revisa la info capturada en cada campo de texto con la sentencia if , pero veo que no hace nada si no se caprura algo , lo que necesito es que si en cualquiera de los campos de texto no capturan un dato que mande una leyenda que faltan datos, y otra seria que si en la busqueda no encuentra nada que mande tambien eso, pq si no encuentra nada mando error en la pagina . Gracias de antemano.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%

Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
If (Request.QueryString("fechai") <> "") Then
Recordset1__MMColParam = Request.QueryString("fechai")
End If
%>
<%
Dim Recordset1__Regina
Recordset1__Regina = "1"
If (Request.QueryString("fechaf") <> "") Then
Recordset1__Regina = Request.QueryString("fechaf")
End If
%>
<%
Dim Recordset1__unidadv
Recordset1__unidadv = "1"
If (Request.QueryString("select") <> "") Then
Recordset1__unidadv = (Request.QueryString("select"))
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_mipc_STRING
Recordset1.Source = "SELECT * FROM dbo.final WHERE fechaviaje BETWEEN '" + Replace(Recordset1__MMColParam, "'", "''") + "' and '" + Replace(Recordset1__Regina, "'", "''") + "' and Unidad = '" + Replace(Recordset1__unidadv, "'", "''") + "' ORDER BY fechaviaje"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
Recordset1_numRows = Recordset1_numRows + Repeat1__numRows
%>
<!DOCTYPE html PUBLIC
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Documento sin título</title>
<style type="text/css">

</style>
<meta http-equiv="Refresh" content="60" />
</head>

<body>
<p align="center" class="Estilo4">Bitacoras del Día <%=(Recordset1.Fields.Item("fechaviaje").Value)% ></p>
<p>
<label></label>
</p>
<p align="right"> <strong><a href="ebita.html">Nueva Busqueda</a></strong></p>
<table width="200" border="1">
<tr bgcolor="#CCFFFF">
<th scope="col">Viaje</th>
<th scope="col">Fecha de Viaje </th>
<th scope="col">Unidad</th>
<th scope="col">Producto</th>
<th scope="col">Origen </th>
<th scope="col">Destino</th>
<th scope="col">Llegada a Cargar </th>
<th scope="col">Llegada a descargar </th>
<th scope="col">Salida Vacio </th>
<th scope="col">Peso de Carga 1 </th>
<th scope="col">Peso de Carga 2 </th>
<th scope="col">Peso de descarga </th>
<th scope="col">Folio de Carga 1 </th>
<th scope="col">Folio de Carga 2 </th>
<th scope="col">Folio de descarga 1 </th>
<th scope="col">Folio de Descarga 2 </th>
<th scope="col">Remolque 1 </th>
<th scope="col">Remolque 2 </th>
</tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF))
%>
<tr bgcolor="#E8FFFF">
<td><div align="center"><span class="Estilo3"></span><%=(Recordset1.Fields.Item("id_viaje").Value) %></div></td>
<td><div align="center"><span class="Estilo3"></span><%=(Recordset1.Fields.Item("fechaviaje").Valu e)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Unidad" ).Value)%></div></td>
<td><div align="center"><span class="Estilo3"></span><%=(Recordset1.Fields.Item("Producto").Value) %></div></td>
<td><div align="center"><span class="Estilo3"></span><%=(Recordset1.Fields.Item("Origen").Value)%> </div></td>
<td><div align="center"><span class="Estilo3"></span><%=(Recordset1.Fields.Item("Destino").Value)% ></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Llegada a Cargar").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Llegada Descargar").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Salida vacio").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Peso Carga1").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Peso Carga2").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Peso Descarga").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Folio Carga1").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Folio Carga2").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Folio descarga1").Value)%></div></td>
<td><div align="center"><%=(Recordset1.Fields.Item("Folio Descarga2").Value)%></div></td>
<td><%=(Recordset1.Fields.Item("Remolque1").Value) %></td>
<td><div align="center"><span class="Estilo3"></span><%=(Recordset1.Fields.Item("Remolque2").Value )%></div></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset1.MoveNext()
Wend
%>
</table>
<p> </p>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>