redirect variabile dopo login

[zeweb]

ho diverse pagine in cui ho un link ADMIN che mi porta a un pannello di controllo dove modifico i campi del DB cge vengono stampati in queste pagine, solo che volevo applicare un indirizzamento alla pagina di login che a seconda da dove arrivo mi porta alla pagina del ilnk

Questo è il link

<% response.write "Admin" 
end if %>

Se non ho fatto il login mi manda nella pagina del login

<%
	if request.form("func") = "Login" then

	uname = trim(request.form("uname")) 
	pword =  trim(request.form("pword")) 
	
	Set Con = Server.CreateObject("ADODB.Connection")
	Con.Open strCon
	sql = "Select uname, pword from settings WHERE  uname = '"& uname & "' AND pword = '"& pword & "'"
	set rec = Con.execute(sql)
		if rec.eof then
			response.write "<span class='testoavviso'>Errore!</span>"
			else
			Session("site_username") = rec("uname")
			Session("site_password") = rec("pword")
			response.redirect "traveller.asp"
end if
end if	
%>

Quindi qui vorrei sostiuire il response.redirect con quello del link di arrivo...diverso ogni volta a seconda dalla pagina di provenienza !

Mi aiutate ? Grazie

[asdfgasdfg]

nella pagina di login :
arrivo = Request.ServerVariables("HTTP_REFERER")
......
response.redirect arrivo

[zeweb]

Scritto così ora no mi accetta più il login !

<%
	arrivo = Request.ServerVariables("HTTP_REFERER") 
	if request.form("func") = "Login" then

	uname = trim(request.form("uname")) 
	pword =  trim(request.form("pword")) 
	
	Set Con = Server.CreateObject("ADODB.Connection")
	Con.Open strCon
	sql = "Select uname, pword from settings WHERE  uname = '"& uname & "' AND pword = '"& pword & "'"
	set rec = Con.execute(sql)
		if rec.eof then
			response.write "<span class='testoavviso'>Errore!</span>"
			else
			Session("site_username") = rec("uname")
			Session("site_password") = rec("pword")
			response.redirect arrivo
		end if
	end if	
%>

[zeweb]

mi dite dove sbaglio ?

[Roby_72]

fatti stampare la variabile "arrivo".

Roby

[zeweb]

così ?

<%
	arrivo=Request.ServerVariables(HTTP_REFERER)
	if request.form("func") = "Login" then
	uname = trim(request.form("uname")) 
	pword =  trim(request.form("pword")) 
	
	Set Con = Server.CreateObject("ADODB.Connection")
	Con.Open strCon
	sql = "Select uname, pword from settings WHERE  uname = '"& uname & "' AND pword = '"& pword & "'"
	set rec = Con.execute(sql)
		if rec.eof then
			response.write "<span class='testoavviso'>Errore!</span>"
			else
			Session("site_username") = rec("uname")
			Session("site_password") = rec("pword")
			response.write "arrivo"
			'response.redirect arrivo
		end if
	end if	
%>

[zeweb]

mi da questo

Request object, ASP 0102 (0x80004005)
The function expects a string as input.
/admin/login.asp, line 41

[zeweb]

ho corretto così

arrivo = Request.ServerVariables("HTTP_REFERER")

e mi stampa

arrivo

[zeweb]

perfetto OK !

Grazie!

[zeweb]

ho cantato troppo presto, facendo così la prima volta che arrivo nell pagina login da quella del link mi accetta i dati ma mi resta su quella.
Se torno indietro (loggato) e clicco sul link allora mi salta il login e mi va nella pagina giusta ????