
25/06/2002, 18:13
|
| | Fecha de Ingreso: enero-2002
Mensajes: 2
Antigüedad: 23 años, 4 meses Puntos: 0 | |
como pasar variables entre paginas Deseo recuperar esta variable "estado" desde la pagina "deaful.asp" y estoy en validaus.asp En visual basic existen variables publicas que son vistas desde cual quier parte del proyecto,existe algo asi en asp. y como se logra
<%@ Language=VBScript %>
<!-- #include file="adovbs.inc" -->
<!-- #include file="db.asp" -->
<!-- #include file="funciones.inc" -->
<%
response.buffer = true
dim pass,usua,estado
pass=Request.Form("password1")
usua=Request.Form("text1")
if pass <> "" and usua <> "" then
'Conectar a base de datos
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
'Consulta de usuario
sql="select * from usuarios where user='"
sql=sql & usua & "' and pasword ='"
sql=sql & pass & "';"
'ejecuta la consulta
Response.Write sql
Set rs= Conn.Execute(sql)
if not rs.EOF THEN
'variable para validación en la compra
estado="Conectado"
Mipagina="default.asp"
else
'Mandar al formulario de registro
estado="Desconectado"
Mipagina="default.asp"
end if
Response.clear
Response.Redirect Mipagina
Response.End
end if
%> |