Рекомендуется: ASP 3.0 Advanced Programming (тридцать шесть) Глава 8 Основы ADO В первых 7 главах этой книги она уже говорила о содержании ASP и о том, как ASP привносит динамический контент на веб -сайт. Было видно, что ее программа сценариев позволяет пользовательским веб -страницам, позволяя нам создавать более мощные ASP -страницы. Теперь ASP будет изучен
С разработкой интернет-технологий онлайн-преподавание станет основной формой повторного образования людей и обучения на протяжении всей жизни. В онлайн -школах люди могут выбрать любой курс в любом месте, где угодно, не ограничиваясь временем и пространством. Развитие онлайн -школ выдвинуло неотложные требования для разработки онлайн -экзаменов. Вот система онлайн -экзаменов, которую я реализовал с помощью баз данных ASP и Access. Когда пользователь входит в систему с именем пользователя и паролем, система сначала проверяет, сдал ли пользователь экзамен. Если это так, проводит запрос на счет. В противном случае, извлеките тестовые вопросы из банка вопросов, чтобы пользователь ответил. После того, как пользователь подает лист ответов, система будет оценить и зарегистрировать результаты в базе данных.
один. Дизайн базы данных
Во -первых, создайте упражнение базы данных. MDB, которая включает в себя две таблицы: пользователь и тест. Пользовательская таблица содержит три поля:
Имя поля: Пользователь; Тип поля: текст; Размер поля: 20. хранить имя пользователя
Имя поля: passwd; Тип поля: текст; Размер поля: 20. хранить пароль пользователя
Имя поля: счет; Тип поля: номер; Размер поля: целое число. Хранить результаты пользователя
В таблице испытаний есть пять полей:
Имя поля: Вопрос; Тип поля: текст; Размер поля: 255. Магазин экзаменационных вопросов
Имя поля: A; Тип поля: текст; Размер поля: 100. Ответ с хранением A
Имя поля: B; Тип поля: текст; Размер поля: 100. Опция хранилища B Ответ B Ответ
Имя поля: C; Тип поля: текст; Размер поля: 100. Параметра хранения c Ответ
Имя поля: D; Тип поля: текст; Размер поля: 100. Ответ на вариант хранения D
Имя поля: ANS; Тип поля: текст; Размер поля: 2. хранить правильные ответы
два. Оригинальный программный код
Ниже приведены еще три основных оригинальных программы в системе. Я надеюсь взять на себя роль стимулирования читателей, которые разрабатывают аналогичные системы, и читатели также могут улучшить их для адаптации к своей собственной системе.
| Ниже приведено цитируемое содержание: 'Login.asp исходная программа, убедитесь, является ли пользователь законным < %@ Language = vbscript %> < % name = trim (запрос (имя)) passwd = trim (запрос (passwd)) 'Проверьте, вводит ли пользователь информацию Если имя <> и passwd <> then Установить conn = server.createObject (Adodb.connection) Conn.Open Driver = {Microsoft Access Driver (*.mdb)}; dbq = & Server.mappath (change.mdb) Установить rs = server.createObject (adodb.recordset) SQL = SELECT * из пользователя, где user = '& name & 'и passwd =' & passwd & ' 'Проверьте законность пользователя Установить rs = conn.execute (sql) Если нет (rs.eof), то Проверьте, сдал ли пользователь экзамен. Если так, сделайте запрос на оценку Если rs (счет) <> 0, тогда response.write rs (пользователь) и Оценка теста - & rs (оценка) еще сеанс (проход) = 1 сеанс (пользователь) = имя response.redirect test.asp конец, если еще Response.write Извините, Пользователь или пароль неверный! ! ! конец, если еще конец, если %> <html> <Голова> <Meta name = генератор Контент = Microsoft Visual Studio 6.0> <Название> Проверка пароля пользователя </title> < /Head> <Тело> <Form action = login.asp id = form1 Method = post name = form1> <P title => < /p> <P title => < /p> <P Title = Align = Center> Пользователь: <INPUT ID = TEXT1 NAME = Имя Стиль = высота: 22px; Ширина: 103px> </p> <P Title = Align = Center> Пароль: <INPUT ID = Password1 name = passwd Стиль = высота: 23px; Ширина: 101px type = пароль> </p> <P title = align = center> <Id Input ID = отправить1 name = spect1 type = отправить значение = Enter Style = Font-Size: середина; В стиле шрифта: нормальный; Фонт-вариант: нормальный; Шрифт-вес: жирный заголовок => </p> <P title = align = center> < /P> < /Form> < /Body> < /Html> 'Test.asp исходная программа, извлечь вопросы тестирования из банка вопросов для ответа < %@ Language = vbscript %> < % Если сеанс (проход) <> 1, тогда response.redirect login.asp еще конец, если Установить conn = server.createObject (adodb.connection) Conn.Open Driver = {Microsoft Access Driver (*.mdb)}; dbq = & Server.mappath (change.mdb) 'Извлеките тестовые вопросы SQL = SELECT * из теста Установить rs = conn.execute (sql) %> 'Функция таймера <Сценарий языка = javascript> var isn1 = null; var isn2 = false; Сегодня = новая дата (); функция stopit () { if (isn2) { ClearTimeOut (ISN1); } isn2 = false; } функция startIt () { Stopit (); isnClock (); } функция isnClock () { var теперь = new Date (); var hrs = now.gethours (); var min = now.getminutes (); var sec = now.getSeconds (); document.clckh.disp.value = ((HRS> 12)? HRS-12: HRS); document.clckm.disp.value = ((min <10)? 0 :) min; document.clcks.disp.value = ((sec <10)? 0 :) sec; document.clck.disp.value = (hrs> = 12)? PM: AM; isn1 = settimeout (isnclock (), 1000); isn2 = true; } < /Script> <html> <Голова> <Meta name = генератор Контент = Microsoft Visual Studio 6.0> < /Head> <Body onload = startit () bgcolor = ffffff> <Центр> 'Вызовите функцию времени, чтобы отобразить время <Таблица границы = 2> <Tr> <Td> время < /td> <td> час < /td> <td> min < /Td> <td> sec < /td> <td> < /td> < /Tr> <Tr> <td> < /td> <Td valign = top> <form name = clckh onsubmit = 0> <Input type = text name = disp size = 2 value => < /Form> < /td> <Td valign = top> <form name = clckm onsubmit = 0> <Input type = text name = disp size = 2 value => < /Form> < /td> <Td valign = top> <form name = clcks onsubmit = 0> <Input type = text name = disp size = 2 value => < /Form> < /td> <Td valign = top> <form name = clck onsubmit = 0> <Input type = text name = disp size = 4 value => < /Form> < /td> < /tr> < /center> 'Показать вопросы тестирования для ответа <Form action = result.asp id = form1 Method = post name = form1> <p> < /p> <p> < % i = 1 Rs.MoveFirst делать, пока не рупий%> <p> < % = rs (вопрос) %> < /p> <Таблица Align = Center Border = 1 CellPadding = 1 Cell -Spacing = 1 Ширина = 80%> <Tr> <Td style = ширина: ширина 50% = 50% <Name name = ans < % = i %> type = radio value = a> < % = rs (a) %> < /td> <td> <name name = ans < % = i %> type = radio value = b> < % = rs (b) %> < /td> < /tr> <Tr> <td> <name name = ans < % = i %> type = radio value = c> < % = rs (c) %> < /td> <td> <name name = ans < % = i %> type = radio value = d> < % = rs (d) %> < /td> < /Tr> < /Table> < % я = 1 Rs.movenext петля %> < /P> <p> < /p> <P align = center> <id input = отправить1 name = отправить1 Тип = отправить value = posper> <input id = reset1 name = reset1 type = сбросить значение = сбросить> < /p> < /form> < /Body> < /Html> |
Поделиться: ASP Advanced: Используйте ASP, чтобы сделать статистические круговые диаграммы, барные диаграммы и т. Д. В нашей работе нам часто нужно преобразовать данные в гистограммы, круговые диаграммы и т. Д., Чтобы облегчить и интуитивно понятный анализ данных. Здесь я представлю вам компонент, который изготавливает круговые диаграммы и барные диаграммы в ASP: CSDRAWGRAPH, CSDGT.ZIP. Поскольку это компонент, нам нужно использовать REGSV, прежде чем использовать его.
2 страницы в общей сложности предыдущей страницы 12 Следующая страница