Главная страница>Учебник по сетевому программированию>Учебное пособие по ASP

Программа проверки страниц страницы производства ASP

Автор：Eve Cole Время обновления：2025-04-27 10:32:01

Рекомендуется: ADO начинающий
Наиболее распространенным способом отображения данных из набора записей является отображение данных в таблице HTML. Показать имена поля и значения поля У нас есть база данных с именем Northwind, и мы хотим отобразить данные в таблице клиентов (не забудьте сохранить этот файл с .asp в качестве расширения): htmlbody%set conn = server.createObject (

Скрипт проверки входа в систему пользователя, chkpwd.asp

  1.  <%
  2.  '======== Скрипт проверки входа пользователя ===========================
  3.  «Если пройденный объект не был определен, он определяется как false, указывая на то, что он не прошел проверку
  4.  Ifisempty (сессия (прошедший)) тогда
  5.  Сеанс (прошел) = false
  6.  Эндиф
  8.  'Session (пройден) = false, что означает, что информация о проверке, передаваемая из формы, еще не прошла.
  9.  IfSession (прошло) = фальшит
  10.  Username = request.form (имя пользователя)
  11.  Userpwd = request.form (userpwd)
  13.  Ifusername = then
  14.  Errmsg = tip: введите свое имя пользователя и пароль
  15.  Еще
  16.  '=============================================================================
  17.  SetConn = server.createObject (adodb.connection)
  18.  Conn.connectionString = Driver = {SQLServer}; Server = 192.168.1.3; UID = SA; Pwd =; Database = ZCMRS
  19.  Conn.open
  20.  '=========================== Читать данные пользователя из журнала таблицы =============================================
  21.  'Определите объект записи
  22.  Setrs = server.createObject (adodb.recordset)
  23.  'Установить ConnectionString объекта соединения
  24.  Setrs.activeconnection = conn
  25.  'Установите тип курсора
  26.  Rs.cursortype = 3
  27.  'Open Record Set
  28.  Rs.openselectusername, PasswordfromerpuserwhereUserName = '& username &'
  29.  '=============================================================================
  30.  Ifrs.eoftthen
  31.  Errmsg = tip: пользователь не существует, или пароль неверен
  32.  Еще
  33.  Ifuserpwd <> rs.fields (пароль) затем
  34.  Errmsg = tip: вход в систему не удалось! Ошибка пароля?
  35.  Else'login успешно
  36.  Errmsg =
  37.  Session (пройден) = true
  38.  Session (имя пользователя) = Rs.fields (имя пользователя)
  39.  'Идентифицировать сеанс разрешений пользователей (userId) = rs.fields (userId)
  40.  Эндиф
  41.  Эндиф
  42.  Эндиф
  43.  Эндиф
  44.  'После сбоя входа в систему будет нарисована форма входа в систему
  45.  Ifnotsession (прошло) = Truethen
  46.  %>
  48.  <html>
  49.  <Head> <Title> Design Home_dwww.cn </title>
  50.  <styletype = text/css>
  51.  <!-
  52.  .Style1 {font-size: 12px; font-weight: bold; margin-left: 120px; upline: double}
  53.  ->
  54.  </style>
  55.  <styletype = text/css>
  56.  <!-
  57.  .Style2 {font-size: 12px; font-weight: bold; ounline: double; цвет:#ff3333}
  58.  ->
  59.  </style>
  60.  </head>
  62.  <bodyleftmargin = 0topmargin = 0marginheight = 0marginwidth = 0bgcolor =#000000>
  63.  <divid = parentStyle = высота: 300; ширина: 450; граница стиль: твердый; пограничный цвет: #fffff; маржинальный-стоп: 80px; маржа-лето: 25%; правая маржи: 25%; фоновая колодка: #fffff>
  65.  <divid = denglustyle = font-size: 12px; font-weight: жирный;
  66.  <formaction = <%= request.servervariables (path_info)%> method = postname = myformid = myform>
  67.  <pclass = style1> имя пользователя: <inputname = usernametype = textId = userNamesize = 18maxLength = 20>
  68.  </p>
  69.  <pclass = style1> пароль: <inputname = userpwdtype = passwordId = userPwdSize = 18maxLength = 20>
  70.  </p>
  71.  <palign = centerclass = style2> <%= errmsg%> </p>
  72.  <p>
  73.  <inputType = purpareign = middlename = pospervalue = система входа в систему>
  74.  <inputname = regetype = buttonalign = middleonclick = location = 'regist.asp'id = regevalue = Register User>
  75.  </p>
  76.  </form>
  77.  </div>
  79.  </body>
  81.  </html>
  82.  <%
  83.  '<pclass = style1> код проверки: <inputname = checkcodeType = textId = checkCodeSize = 6maxLength = 4>
  84.  '<Imgstyle = Right-Right: 40pxalt = src = common/getCode.asp> </p>
  85.  response.end
  86.  Эндиф
  87.  %>

Страница для посещения erp.asp

  1.  <!-#includefile = chkpwd.asp->
  2.  <тело>
  3.  <divstyle = 'font-size: 12px; font-weight: bold; граница: 1pxsolid#001; Padding: 4px; фон: #ffccff; margin-top: 0;'> Добро пожаловать, чтобы использовать систему запросов ERP, текущий регистрированный пользователь-это:
  4.  <%
  5.  IfSession (прошло) = Truethen
  6.  Response.write (сеанс (имя пользователя))
  7.  Эндиф
  8.  %> <ahref = logout.asp> Выйти из системы </a>
  9.  </div>
  10.  </body>

Каждый раз, когда вы открываете Erp.asp, вы сначала выполняете chkpwd.asp (), который может эффективно помешать несанкционированным пользователям получить доступ к указанной веб -странице.

Logout.asp System Exit

  1.  <тело>
  2.  <%
  3.  Сеанс (прошел) = false
  4.  Сеанс (имя пользователя) =
  5.  Response.redirect (index.asp)
  6.  %>
  7.  </body>

Отправить форму, используя картинки

  1.  <formname = form1method = postaction =>
  2.  <tdalign = right> <inputtype = ImageMethod = OpportName = OpiTSRC = Image/LogInin.gifWidth = 70Height = 21alt = posper> </td>
  3.  </form>

Поделиться: ADO начинающий Учебник: ADO Добавить записи
Мы можем использовать вставку SQL в команду для добавления записей в таблицы в базе данных. Добавление записей в таблицы в базе данных мы хотим добавить новую запись в таблицу клиентов в базе данных Northwind. Сначала нам нужно создать форму, которая содержит поля, которые мы хотим выбрать данные: htmlbodyform method = post action = dem

Связанные статьи