Devo tirare il valore del giacimento del testo “passwordvar„ da questa forma. Prima che aggiunga la caratteristica di inizio attività ha funzionato benissimo ma ora non fa. Come potete dire dal codice dovrebbe scrivere il valore di Request.Form () alla parte superiore della pagina. Può chiunque dire perché questo non sta funzionando? l'esempio del
Thanks
An della pagina è qui: il rel= " nofollow "„ del _blank„„ del target= " di http://www.glowfishtw.com/TOD/admin/login2.asp del href= del
TOD/admin/login2.asp
and di http://www.glowfishtw.com/ qui è il codice:
<%@LANGUAGE= " VBSCRIPT„ CODEPAGE= " 1252 " %>
and.asp„ --logintest_numRows
Set del logintest
Dim del >
<%
Dim più logintest = Server.CreateObject (“ADODB.Recordset")
logintest.ActiveConnection = MM_ondemand_STRING
logintest. La fonte = “SELEZIONA * A PARTIRE " da
logintest.CursorType = 0
logintest.CursorLocation = 2
logintest.LockType = 1
logintest. () Il
logintest_numRows/>%>
<%
'convalida la richiesta di entrare a questo site.
MM_LoginAction = "" allora MM_LoginAction = MM_LoginAction del
If Request.QueryString<> di Request.ServerVariables (“URL„) +„? “+ Server.HTMLEncode (Request.QueryString)
MM_valUsername=CStr (Request.Form (“uservar„))login2.asp del
MM_redirectLoginSuccess= " TODadmin_category.asp "
MM_redirectLoginFailed= " del "" di Then
MM_fldUserAuthorization= del "" del <> del
If MM_valUsername? fail=yes "
MM_flag= " ADODB.Recordset "
MM_rsUser = Server.CreateObject stabiliti (MM_flag)
MM_rsUser.ActiveConnection = MM_ondemand_STRING
MM_rsUser.Source =
se "" del <> di MM_fldUserAuthorization allora MM_rsUser.Source = MM_rsUser.Source &„, “& MM_fldUserAuthorization
MM_rsUser.Source = MM_rsUser.Source &„ da usersvar DOVE uservar='" & sostituisce (MM_valUsername,„ ““,„ '' ") &„„ E passwordvar='" & sostituisce (Request.Form (“passwordvar„), „ “„, “'' ") & “„ “
MM_rsUser.CursorType = 0
MM_rsUser.CursorLocation = 2
MM_rsUser.LockType = 3
MM_rsUser.Open
se non MM_rsUser.EOF o Non MM_rsUser.BOF allora del
'il username e la parola d'accesso abbinano - questa è una sessione valida del user
(“di MM_Username„) = MM_valUsername
se ("" del <> di MM_fldUserAuthorization) sessione di Then
(“MM_UserAuthorization„) = CStr (MM_rsUser.Fields.Item (MM_fldUserAuthorization). Sessione di Value)
Else
(“MM_UserAuthorization„) = estremità If
del
del "" se CStr (Request.QueryString (“accessdenied„)) "" Del <> e
End If
%>
< di If
MM_rsUser.Close
Response.Redirect (MM_redirectLoginFailed) di conclusione del
di If
MM_rsUser.Close
Response.Redirect (MM_redirectLoginSuccess) di conclusione del vero
di Then
MM_redirectLoginSuccess = di Request.QueryString (“accessdenied„)! PUBBLICO„ - //W3C//DTD XHTML 1.0 Transitional//EN " “rel= " nofollow " del HTML„ di DOCTYPE del _blank„„ del target= " di http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd del href= di rel= " nofollow "„ del _blank„„ del target= " di http://www.w3.org/1999/xhtml del href= di Soddisfare-Tipo testo/HTML„ del http-equiv= del >
999/xhtml " di http://www.w3.org/1 del content= "; charset=iso-8859-1„ pvar
Untitled Document
<%
Dim/>pvar = action= " il name= " il id= " uservar„ il name= " uservar il id= " passwordvar„ type= " " dell'ALBERINO„„ del method=„ del name= " form1 del id= " form1 del pvar
%>
response.write di Request.Form () del
del >
di <%=MM_LoginAction%> " del testo„„ del type= del
del
di/>
del testo„„ del type= del
del
di/>
" passwordvar presentano„ il name= " presentano„ il value= " presentano„/>
