Ciao a tutti,
per piacere qualcuno sà dirmi dove cavolo sbaglio??
<%@LANGUAGE="VBSCRIPT"%>
<%
response.addheader "pragma","no-cache"
response.Expires = -1440
response.Buffer = true
session("profilo")=request("profilo")
response.Write(session("profilo"))
if session("profilo")="3" then
response.redirect("ana1.asp")
elseif session("profilo")="5" then
response.Redirect("preventivo1.asp")
end if
%>
Mi compare pagina bianca!! senza errori o altro.
Grazie 10000
Leftist
Ti appare pagina bianca?
E se da browser clicchi su Visualizza / HTML cosa vedi?
Leggo:Originariamente inviato da Mems
Ti appare pagina bianca?
E se da browser clicchi su Visualizza / HTML cosa vedi?
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1252"></HEAD>
<BODY></BODY></HTML>
In pratica nulla!!
Nella confusione totale in cui mi trovo mi sono dimenticato di dire che questo file si trova in una directory diversa, mentre il log principale nella cartella primaria.
In pratica, sperando di essere un pochino chiaro, accedo al db tramite il file log, il quale verifica il profilo, lavoro sulla cartella primaria, ma se voglio accedere a dei script che si trovano in una sottocartella qui perde la session!!
Ecco perchè se ho profilo 3 deve vedere la pag. ana1.asp
mentre 5 preventivo1.asp.
Help me please!!
Leftist
Prova così, per testare:
codice:<%@LANGUAGE="VBSCRIPT"%> <% response.addheader "pragma","no-cache" response.Expires = -1440 response.Buffer = true response.write "questa è la request di profilo: " & " session("profilo")=request("profilo") response.Write "questa è la session di profilo: " & session("profilo") & " " if session("profilo")="3" then response.redirect("ana1.asp") elseif session("profilo")="5" then response.Redirect("preventivo1.asp") end if %>
Originariamente inviato da Mems
Prova così, per testare:
codice:<%@LANGUAGE="VBSCRIPT"%> <% response.addheader "pragma","no-cache" response.Expires = -1440 response.Buffer = true response.write "questa è la request di profilo: " & " session("profilo")=request("profilo") response.Write "questa è la session di profilo: " & session("profilo") & " " if session("profilo")="3" then response.redirect("ana1.asp") elseif session("profilo")="5" then response.Redirect("preventivo1.asp") end if %>Mi dispiace ma non và!!!
Gentilissimo
Leftist
Non appaiono nemmeno i response.write col testo statico?
E se modificassi il log principale, visto che il profilo 5 prima o poi dovrà avere un accesso diverso con diverse funzioni.
Nel log principale definisco i diversi accessi in base ad un carattere da apporre prima della login:
"if left(username,1)="$" then
response.Redirect("logdealer.asp")
elseif left(username,1)="@" then
response.Redirect("logaccount.asp")"
Ho provato qui ad aggiungere:
elseif left(username,1)="£" then
response.Redirect("log5.asp")
Ovviamente ho creato il file log5.asp, il file di accesso e la tabella associata. Ovviamente non funziona, per carità, fortuna zero!!
Posto lo script, se puoi aiutarmi te ne sarei moltooooo grato
<%@LANGUAGE="VBSCRIPT"%>
<%
Sql_stato = "SELECT * FROM stato_db "
set rs_stato=conn.execute(Sql_stato)
if rs_stato("stato")<>"si" then
response.Write(rs_stato("descrizione"))
response.end()
end if
username=Request.Form("username")
userpwd=Request.Form("userpwd")
if instr(username, "or ")>0 then
response.redirect("http://www.sitoweb.it")
response.End()
end if
if instr(userpwd, "or ")>0 then
response.redirect("http://www.sitoweb.it")
response.End()
end if
dim varlog (2)
varlog (0)= username
varlog (1)= userpwd
session ("varlog")=varlog
if left(username,1)="$" then
response.Redirect("logdealer.asp")
elseif left(username,1)="@" then
response.Redirect("logaccount.asp")
else
data = date()
Sql = "SELECT * FROM tana where username='"&username&"' and password='"&userpwd&"'"
set rs=conn.execute(Sql)
%>
<%
if not rs.eof then
Session("UserLoggedIn") = "true"
Session("UserLoggedIn1") = "true"
session("nominativo")=rs("cognome")&" "&rs("nome")
session("profilo")= rs("profilo")
session("filiale")= rs("filiale")
session("preventivo")= rs("preventivo")
session("numero_tel")=rs("numero_tel")
session("logincorso")= username
Sqldel = "delete from logincorso where login='"&username&"' "
set rsdel=conn.execute(Sqldel)
Sqlup = "insert into logincorso (login, data) values ('"&session("logincorso")&"', '"&date()&"') "
set Sqlup=conn.execute(Sqlup)
response.redirect ("accesso.asp")
else response.redirect ("index.asp")
end if
end if
%>
Leftist
Esce impossibile visualizzare la paginaOriginariamente inviato da Mems
Non appaiono nemmeno i response.write col testo statico?
Leftist
Dalle opzioni avanzate di Explorer TOGLI la spunta dalla voce Mostra messaggi di errore HTTP brevi.
Ecco l'errore, scusami, ho fatto copia e incolla del tuo script:Originariamente inviato da Mems
Dalle opzioni avanzate di Explorer TOGLI la spunta dalla voce Mostra messaggi di errore HTTP brevi.
response.write "questa è la request di profilo: " &
"
Perdona l'ignoranza ma come volevi che lo scrivessi?
response.write: " &
" ???
Leftist
Permessi di invio
Rispondi quotando