Perdida de sesion por menu flash

[killoff]

no pero lo que compruebo que este vacio es el formulario que uso para el login, mañana pego el codigo entero mejor, que es que no se explicarme muy bien jeje, lo raro es lo de que si uso los enlaces href para moverme por la pag no pase, en cambio si me muevo por los enlaces del flash la sesión esta dada de alta, pero me muestra el formulario para hacer login otra vez, y si actualizo o pincho en el enlace de la misma pagina pero el href pos ya si me muestra el "hola usuario"

edito con el codigo:

Código:

IF Request.Form("usuario")="" AND request.form("clavelogin")="" AND not Session("validado") = "si" THEN
	
		response.write("<form class='formtexto' name='loginpag' action='"& pag &"' method='post'>")
		response.write(" Usuario:&nbsp; <input name='usuario' type='text' class='TextField' value='' size='10' />&nbsp;&nbsp;&nbsp;&nbsp;")
		response.write(" Contraseña:&nbsp;<input type='password' class='TextField' name='clavelogin' maxlength='8' size='10' >&nbsp;&nbsp;&nbsp;&nbsp;")
		response.write("<input class='submit' type='submit' name='Submit' value='Entrar' />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp")
		response.write("<input class='submit1' type='button' name='Registrar' value='Registrar' onClick='javascript:reg()' />") 

		if request("verif") = 1 then
			response.write "<br><br>El usuario no existe en la base de datos, para registrarse <a href='regpag.asp'>pinche aquí </a>"
		else
			 if request("verif") = 2 then
				response.write "<br><br>Clave incorreta, si desea recuperar su contraseña <a href='recuperar.asp?tip=clave'>pinche aquí </a>"
			 else
				if request("verif") = 3 then
					response.write "<br><br>Su cuenta no esta activada, si quiere recibir otro email de activacion <a href='recuperar.asp?tip=mail'>pinche aquí </a>"	
				end if
			end if
		end if
	
		response.write "</form>"
else 

		if session("validado") = "si" then
			if BuscaLetra (trim(pag),"?") = 0 then
				response.write "Hola " & session("nombre") & "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href='"& pag &"?salirp=1'>Cerrar sesion</a>"
			else
				response.write "Hola " & session("nombre") & "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href='"& pag &"&salirp=1'>Cerrar sesion</a>"
			end if
		else	
			mySQLnom= "Select NOMBRE from FORUSU WHERE NOMBRE = '" & request.form("usuario") &"'"
			set rsnom=objConn.Execute(mySQLnom)
			if (not rsnom.eof) then
				mySQLu= "Select CLAVE from FORUSU WHERE NOMBRE = '" & request.form("usuario") &"'"
				set rsusu=objConn.Execute(mySQLu) 
				if not trim(rsusu.fields("CLAVE")) = trim(request.form("clavelogin")) then
					response.redirect ""& pag &"?verif=2"
				else
					mySQLes= "Select ESTADO from FORUSU WHERE NOMBRE = '" & request.form("usuario") &"'"
					set rsusu=objConn.Execute(mySQLes) 
					if trim(rsusu.fields("ESTADO")) = "S" then
						response.redirect ""& pag &"?verif=3"
					end if
				end if
			else
				if not Request.Form("usuario")="" then
				mySQLn= "Select NOMBRE from FORUSU WHERE NOMBRE = '" & request.form("usuario") &"'"
					set rsnom=objConn.Execute(mySQLn) 
						if rsnom.eof then
							response.redirect ""& pag &"?verif=1"
						end if	
				end if
		   end if
	       session("nombre") = request.form("usuario")
		   response.write "Hola2 " & session("nombre") & "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href='"& pag &"?salirp=1'>Cerrar sesión</a>"
		   Session("validado") = "si"
	    end if
end if