di

identificazione nascosta/>> ", usrid, pswd
usrid=Request.Form„ del align=center>
<%
dim del >

<%
%>






if del userid")

pswd=Request.Form (“userpassword„) o then
Response.Redirect “default.asp del "" dello pswd=? msg=1 " il
'function del if
del
Response.End
end autentica (usrid, pswd) il
'Create l'oggetto di COMDirectory: riassunto Next
Dim SearchObject, PersonObject, PersonObject2, PersonDN, check
Set SearchObject = server.CreateObject (“MSDotNet.COMDirectory di errore del
'On. Search„) il
'//InitIISEnvironment è che preferred sopra InitVBEnvironment
'//InitIISEnvironment richiede/usa usi P di //InitVBEnvironment di AFS (\ \ spettrografia di massa \ dist \) ':
SearchObject.InitIISEnvironment

SearchObject.ConnectFWD2 “, ou=ldapids, o=y„, “L0t0fWork "
'check se l'identificazione usuario è correct
Set PersonObject =
gon (usrid)/>PersonDN = SearchObject.GetPersonDN (errore end1
'Response.Write err.number &„ **** “then
Response.Redirect “default.asp di PersonObject)
'On del "" del persondn= del
if? msg=2 "
Response.End
else
SearchObject.ConnectFWD2 PersonDN, pswd
'persondn di Response.Write & "„ & PersonObject.LogonID & un persondn & “11111111„ & PersonObject2.LogonID & “222222 " un
del
stabilito PersonObject2 = SearchObject.GetPersonByDn (PersonDN) di/>
'Response.Write del authenticate=persondn
'authenticate=PersonObject2.LogonID
“/> “Response.End
id=PersonObject2.LogonID
se then
Response.Redirect “default.asp del "" = di identificazione? msg=3 " if
dell'estremità del
Response.End
„ //This haved alzato che un errore, o if
%>
<%

authentication del function
end dell'estremità del
del succeeded
Response.Write err.number & “del _„ & “….il

'if ha autenticato allora: rst= server.createobject (“ssql= del =fname

set di sessione del =lname
di sessione del =eml
di sessione del then
eml=PersonObject2.emailaddress
lname=PersonObject2.surname
fname=PersonObject2.givenname
del "" del id<> del =id

if del
session (“identificazione„) (“eml„) (“lname„) (“fname„) del
del adodb.recordset") " selezionano * a partire dai temployees dove ldapid=„„ & identificazione & “„ “rst del
del
. Aprire lo ssql, i connett., il
di 2,2
se richiesta (“tipo„) = risposta del then
" del usr„. Riorientare “usrReqDetails.asp? Riorientare “devReqDetails.asp? Riorientare la risposta altra del
del
“di usrdefault.asp ". Riorientare il if
%>

del
end del if
else
Response.Redirect “default.asp " dell'estremità del
“di devdefault.asp " class= del

„ del align= " del width= " 70% del
"; colspan=„ un width= " " di 2 " del >
1„ height= " 1„ vspace= " 1 " width= " " del bgBlueDark del class=„ del di >

730 >
%> "„ del value= " " del reqid„ di NAME=„ di ID= " Text3 del type= " del


Questione : Come la transizione è fatta fra 2 pagine classiche di asp?

Sto provando a capire il flusso delle dichiarazioni fra 2 asp classico pages.

In osservando le seguenti pagine nominate default.ASP e B.ASP, potrebbe voi spiegare il flusso delle pagine di asp. Come è quello dopo default.ASP è eseguito inizialmente ed allora B.ASP è eseguito fino ad un punto ed allora default.ASP è eseguito per visualizzare il username ed i campi di parola d'accesso ed allora B.ASP esegue ed infine devdefault.asp executes.

default.ASP
----------


SOX - firmare il leftmargin= del ><br/></HEAD><br/><br/><BODY " " del href= " onelook.new.css " dello stylesheet " del rel= di in


del del >
" del bgBlueDark " " del class= 42 " width= " " dello src= " le immagini/hdr_morganstanley_logo.gif 152 "
" del align= " del width= " 70% del
"; " del width= " 730 del di

un width= " " di 2 " del >
1 " height= " 1 " vspace= " 1 " colspan= " 2 " " del width= " 730 " " del bgBlueDark del class= del di >

> class= " bgBlueDark " del
> del


  concentrare del > del
del

<%
dim action= " B.asp " " del signin„„ del name= " dell'alberino del method= del
%>
del msg
msg=request colspan= (“msg„)il align=center>
> del >









You " del txtnote " del class= del
<%if msg=1 then%>
del align=center del >



 " di immagini/transpix.gif dello src= " del
di immagini/transpix.gif„ dello src= " di CLASS=lineBlueDark WIDTH=290>
di immagini/transpix.gif„ dello src= " di CLASS=lineBlueDark ROWSPAN=12 WIDTH=1> di

td>


41„   di CLASS=bgYellowlight>
; border=
The " del txtnote " del class= del

<%elseif msg=2 then%>
avete fornito è non valida! la parola d'accesso che del >The " del txtnote " del class= del

<%elseif msg=3 then%>
avete digitato è non valida! la sessione del >Your " del txtnote " del class= del

<%elseif msg=4 then%>
ha espirato! il >Please " dell'intestazione " del class= del


<%end if%>
digita la vostre identificazione e parola d'accesso: 		di width=1>
" 0„ width= " 100%„ cellspacing= " 0„ cellpadding= " 0 >Username„ del align= " del width= " 40% del

del >
„ di ID= " Text1: il size= " " di userpassword„ del name=„ " di parola d'accesso del type= del >d>
19 value= del type=submit di width=1>


del >
„ di ID= " Table3 " giusti ": size= "„ del name= " userid " del testo„ del type= del >d>
19 >Password " di destra "„ del align= " del width= " 40% del
del




B.ASP
del ******** del del ********** del del ********** del del ********** del del ********** del del ********** del del ********** del del ********** del del ********** del del ************************** del >





----------rst
%>
< del conn
dim del next
dim del riassunto di errore del
<%on! --file= " dbstringFSNet.asp„ del #include--leftmargin= del >


>



SOX
  concentrare del >

 del


bgBlueDark " > del width= " 730„ del
del

Risposta : Come la transizione è fatta fra 2 pagine classiche di asp?

potete usare la notazione associativa di allineamento anziché valutate () nella maggior parte dei casi.

supporre che abbiate giacimenti text1, text2 del testo,…, textN nella vostra forma. allora alla pagina di azione potete accedere loro all'interno di un cfloop come questo senza valuta () la funzione:


#form [“testo„ & x] #


se inviate il vostro codice che gli usi valutano (), quindi possiamo mostrargli come cambiarlo alla notazione di allineamento di uso.

tutti i detti di cui sopra, valutano () non sono difettosi quanto ha usato per essere in cf6 e prima che… sia appena che ci sono realmente molto pochi casi dove uno deve usarlo.

Azadi
Altre soluzioni  
 
programming4us programming4us