Мне нужно вытянуть значение поля текста «passwordvar» от этой формы. Прежде чем я добавил характеристику имени пользователя он работал отлично но теперь он не делает. По мере того как вы можете сказать от Кодего они должны написать значение Request.Form («passwordvar " ) вверху страница. Может любое сказать почему это не работает? пример
Thanks
An страницы здесь: rel= " nofollow "» _blank»» target= " http://www.glowfishtw.com/TOD/admin/login2.asp href=
TOD/admin/login2.asp
and http://www.glowfishtw.com/ здесь будет Кодий:
<%@LANGUAGE= " VBSCRIPT» CODEPAGE= " 1252 " %>
and.asp» --logintest_numRows
Set logintest
Dim >
<%
Dim logintest = Server.CreateObject («ADODB.Recordset")
logintest.ActiveConnection = MM_ondemand_STRING
logintest. Источник = «ВЫБИРАЕТ * ОТ usersvar "
logintest.CursorType = 0
logintest.CursorLocation = 2
logintest.LockType = 1
logintest. Открытое ()
logintest_numRows = 0
%>
<%
' утверждает запрос logon к этому site.
MM_LoginAction =
If Request.QueryString<> Request.ServerVariables («URL») "" после этого MM_LoginAction = MM_LoginAction +»? «+
MM_valUsername=CStr Server.HTMLEncode (Request.QueryString) (Request.Form («uservar»))login2.asp
MM_redirectLoginSuccess= " TODadmin_category.asp "
MM_redirectLoginFailed= " "" Then
MM_fldUserAuthorization= "" <>
If MM_valUsername? fail=yes "
MM_flag= " ADODB.Recordset " = Server.CreateObject (MM_flag)/> = MM_ondemand_STRING
MM_rsUser.Source = «ОТБОРНОЕ uservar, passwordvar "
если "" <> MM_fldUserAuthorization после этого MM_rsUser.Source = MM_rsUser.Source &», «& MM_fldUserAuthorization
MM_rsUser.Source = MM_rsUser.Source &» ОТ usersvar ГДЕ uservar='" & заменяет ть (MM_valUsername,» ««,» '' ") &»» И passwordvar='" & заменяет ть (Request.Form
установленное
MM_rsUser.ActiveConnectionwordvar»), » «», «'' ") & «» «
MM_rsUser.CursorType = 0
MM_rsUser.CursorLocation = 2
MM_rsUser.LockType = 3
MM_rsUser.Open
если Не MM_rsUser.EOF или не MM_rsUser.BOF после этого
'username и пароль сопрягают - это будет действительная встреча user
(«MM_Username») = MM_valUsername
если ("" <> MM_fldUserAuthorization) встреча Then
(«MM_UserAuthorization») = CStr, то (MM_rsUser.Fields.Item (MM_fldUserAuthorization). Встреча
Else
Value) («MM_UserAuthorization») = конец If
"" если CStr, то (Request.QueryString («accessdenied»)) "" <> и
End If
%>
< If
MM_rsUser.Close
Response.Redirect конца
If
MM_rsUser.Close
Response.Redirect конца поистине
Then
MM_redirectLoginSuccess = Request.QueryString («accessdenied») (MM_redirectLoginSuccess) (MM_redirectLoginFailed)! ПУБЛИКА» - //W3C//DTD XHTML 1.0 Transitional//EN " «rel= " nofollow " HTML» DOCTYPE _blank»» target= " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd href= rel= " nofollow "» _blank»» target= " http://www.w3.org/1999/xhtml href= Содержани-Тип текст» http-equiv= >
999/xhtml " http://www.w3.org/1 content= "/HTML; charset=iso-8859-1» pvar
Untitled Document
<%
Dim/>pvar =
response.write Request.Form («passwordvar " ) action= " name= " uservar id= " uservar» name= " passwordvar id= " passwordvar» type= " " СТОЛБА»» method=» name= " form1 id= " form1 pvar
%>