
26/03/2009, 10:33
|
 | Colaborador | | Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 21 años, 6 meses Puntos: 27 | |
Respuesta: redireccionar a pagina segun una variable quisiera ayudarte pero tengo mis dudas si realmente esta haciendo las cosas bien
antes que nada en que estas programando? (Expression web DW o) ?
el navegador cuando pruebas la pagina no te muestra errores ??????
digo si yo trato de ejecutar tu código creo que me tronaría en estas partes
<%
'Para los redireccionamientos
Response.Buffer=True
Dim oConn, rs, SQL, usuario, password
'Recogemos el formulario
nombre=(Request.Form("usuario"))
password=(Request.Form("Password"))
'Si no lo ha enviado, es decir no hay nada en estas variables
'le presentamos el formulario
if nombre="" then
Response.Write("campos en blanco.")
else
'Validamos su identidad
set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open (application("DBConn"))
SQL="SELECT usuario, Password FROM " & _
"Usuarios WHERE (usuario='"&nombre&"' AND Password='"&password&"');"
'Ejecutamos consulta
set rs=oConn.Execute(SQL)
if rs.EOF then %>
Response.Write("NO existe usuario")
response.end
<%
else
Response.Write("SI existe usuario")
response.end
%>
<script language="javascript">window.parent.location.repla ce ('index.htm');</script>
</BODY>
</HTML>
y minimo me diria que falta un end if
__________________ JuanRa Pérez
San Salvador, El Salvador |