Рассылка
Описание возможности приложения. Подписка на рассылку, хранение данных. Файл ras.asp, файл ras_A.asp, файл ras_B, файл ras_C. Возможности программирования на языке ASP, который позволяет обрабатывать данные на стороне сервера. Регистрация рассылки.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | курсовая работа |
| Язык | русский |
| Дата добавления | 21.10.2008 |
| Размер файла | 816,5 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
2
Уральский социально-экономический институт
Академии труда и социальных отношений
Кафедра прикладной информатики
Пояснительная записка к курсовой работе
По курсу: "Мировые информационные ресурсы"
На тему: "Рассылка"
Выполнил:
Дружков Павел Анатольевич
Специальность:
Прикладная информатика (в экономике)
Группа: ИД-301
Проверил:
Мадудин Владимир Николаевич
Челябинск 2006
Аннотация
В данном документе представлен отчет по курсовой работе по курсу: "Мировые информационные ресурсы" на тему: "Рассылка". Отчет содержит в себе описание поставленной задачи, этапы выполнения курсовой работы, код на языках программирования: ASP (VBScript, FSO, ADO), JScript, PWS/IIS, а также иллюстрации.
Описание возможности приложения
Подписка на рассылку.
Для подписки на рассылку необходимо обязательно ввести Ваш E-mail. Для регистрации, необходимо нажать на кнопку `OK'. Кнопка `Сброс' очищает все поля. После нажатия вы перейдете на следующую страницу, которая имеет вид:
На форме отображаются Ваш E-mail и темы, на которые вы подписались.
Ввод рассылки.
Пользователю предоставляется возможность выбора темы и ввода сообщения.
Сама же страница выглядит так:
после нажатия кнопки “OK" Вы увидите следующую страничку:
Хранение данных.
Все данные хранятся в базе данных: ”Рассылка" и имеют вид:
Таблица Подписчики:
Таблица Рассылка:
Тестирование программы
Код приложения
Файл ras. asp
<html>
<head>
<title>Курсовая работа</title>
</head>
<script LANGUAGE="JavaScript">
function checkValid () {
var p = document. form;
if (p. Usermail. value == "") {
alert ("Поле [E-mail] - обязательно, заполните его");
p. Usermail. focus ();
return (false);
}
return (true);
}
</script>
<body bgcolor="#eeffee">
<h1 align="center">Рассылка</h1>
<h2 align="center"><b>Подпишитесь на интересующие Вас рассылки: </b></h2>
<hr width=60% align=center>
<form action='ras_A. asp' method="post" name="form" onsubmit="return checkValid ()">
<table align=center>
<tr>
<td>Введите Ваш E-mail: </td><td><input type="Text" name="Usermail">
</tr>
</table>
<br>
<table align=center>
<tr>
<td><img src="picture\car. gif"></td><td><input type="checkbox" name="chk1" value="Автомобили">Автомобили</td>
<td><img src="picture\pc. jpg"></td><td><input type="checkbox" name="chk2" value="Компьтеры">Компьютеры</td>
</tr>
<tr>
<td><img src="picture\sport. gif"></td><td><input type="checkbox" name="chk3" value="Спорт">Спорт</td>
<td><img src="picture\musik. gif"></td><td><input type="checkbox" name="chk4" value="Музыка">Музыка</td>
</tr>
<br>
<tr>
<td><input name="Ok" type="Submit" value=" Ok "></td>
<td><input name="Reset" type="Reset" value= "Сброс"></td>
</tr>
</table>
</form>
</body>
</html>
Файл ras_A. asp
<html>
<head>
<title>Курсовая работа</title>
</head>
<body bgcolor="#eeffee">
<h1><center> подтверждение подписки</h1>
<% Dim Tema1,Tema2,Tema3,Tema4
Response. Write "Вы подписались на следующие рассылки: " & "<br>" & vbCrLf
Response. Write"<b>"
Tema1 = Request. Form ("chk1")
Tema2 = Request. Form ("chk2")
Tema3 = Request. Form ("chk3")
Tema4 = Request. Form ("chk4")
if Tema1 <> "" Then
Response. Write Tema1 & "<br>" & vbCrLf
end if
if Tema2 <> "" Then
Response. Write Tema2 & "<br>" & vbCrLf
end if
if Tema3 <> "" Then
Response. Write Tema3 & "<br>" & vbCrLf
end if
if Tema4 <> "" Then
Response. Write Tema4 & "<br>" & vbCrLf
end if
%>
<br>
<% Dim Result
Response. Write "</b>На почтовый ящик: " & vbCrLf
Response. Write "<b>"
Result = Request. Form ("Usermail")
Response. Write Result & "<br>" & vbCrLf
Dim DBConn,RS,ConnStr,SQL
Set DBConn = Server. CreateObject ("ADODB. Connection")
Set RS = Server. CreateObject ("ADODB. RecordSet")
ConnStr = "Provider=Microsoft. Jet. OLEDB.4.0; Data Source=" & Server. MapPath ("data/Рассылка. mdb")
DBConn. Open ConnStr
RS. ActiveConnection = DBConn
Usermail = Trim (Request. Form ("Usermail"))
chk = Trim (Request. Form ("Tema"))
Usermail = REPLACE (Usermail, "<", "")
Usermail = REPLACE (Usermail, "'", "")
Usermail = REPLACE (Usermail, ">", "")
rs. locktype = 2
rs. open "select * from подписчики"
rs. addnew
rs ("Usermail") = Usermail
rs ("Tema1") = Tema1
rs ("Tema2") = Tema2
rs ("Tema3") = Tema3
rs ("Tema4") = Tema4
rs. update
rs. close
%>
<p>Спасибо за регистрацию. <br>
Ваши данные успешно внесены в список пользователей</p>
<a href="ras. asp">На первую страницу</a>
</form>
</body>
</html>
Файл ras_B
<html>
<head>
<title>Курсовая работа</title>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
</head>
<script LANGUAGE="JavaScript">
function checkValid () {
var p = document. form;
if (p. Message. value == "") {
alert ("Введите пожайлуста [Новость] ");
p. Message. focus ();
return (false);
}
return (true);
}
</script>
<body bgcolor="#eeffee">
<h1 align="center">Рассылка</h1>
<h2 align="center"><b>ввод новостей: </b></h2>
<hr width=60% align=center>
<form action='ras_C. asp' method="post" name="form" onsubmit="return checkValid ()">
<table align=center>
<tr>
<td align=center>выберите тему:
<select name="Tema" size="1">
<option selected="true">Автомобили
<option>Компьютер
<option>Спорт
<option>Музыка
</select>
</td>
<tr>
<td align=center><b>новость: </b></td><tr>
<td><textarea name="Message" cols="70" rows="12"></textarea>
<tr>
<td align="center"><input name="Ok" type="Submit" value=" Ok ">
<input name="Reset" type="Reset" value="Сброс"></td>
</tr>
</table>
</form>
</body>
</html>
Файл ras_C
<html>
<head>
<title>Курсовая работа</title>
</head>
<body bgcolor="#eeffee">
<h1><center> подтверждение </h1>
<%
Dim DBConn,RS,ConnStr,SQL
Set DBConn = Server. CreateObject ("ADODB. Connection")
Set RS = Server. CreateObject ("ADODB. RecordSet")
ConnStr = "Provider=Microsoft. Jet. OLEDB.4.0; Data Source=" & Server. MapPath ("data/Рассылка. mdb")
DBConn. Open ConnStr
RS. ActiveConnection = DBConn
Tema = Trim (Request. Form ("Tema"))
Message = Trim (Request. Form ("Message"))
Message = REPLACE (Message, "<", "")
Message = REPLACE (Message, "'", "")
Message = REPLACE (Message, ">", "")
rs. locktype = 2
rs. open "select * from Рассылка"
rs. addnew
rs ("Tema") = Tema
rs ("Message") = Message
rs. update
rs. close
%>
<p>
Ваша новость была записана в список рассылок</p>
<a href="ras_b. asp">На первую страницу</a>
</form>
</body>
</html>
Заключение
При разработке данного приложения были использованы возможности программирования на языке ASP, который позволяет обрабатывать данные на стороне сервера.
Подобные документы
Разработка консольного приложения, которое обрабатывает входной файл с расширением .pas и транслирует в выходной файл с расширением .cpp или .txt (по выбору пользователя). Синонимичные операторы языков Паскаль и С. Разработка алгоритма решения задачи.
курсовая работа [329,6 K], добавлен 04.06.2013Моделирование сети, состоящей из 2 компьютеров и файл-сервера, соединённых через свитч. Принцип проверки пакетов на статус запрос-ответ. Работа простейшей сети, состоящей из 3х ПК и файл-сервера с HUB-ом и без него. Принцип очередей обработки пакетов.
контрольная работа [326,1 K], добавлен 09.06.2010Функциональный язык программирования. Широкие возможности для работы с файлами. Понятие потока, с которым связан файл символ. Поток - абстрактный объект, с которым можно работать, не углубляясь в аппаратную и программную реализацию работы с данными.
доклад [10,2 K], добавлен 22.09.2008Краткая характеристика интегрированной среды Turbo Pascal. Принципы программирования разветвляющихся алгоритмов, циклических структур, задач обработки символьных данных, множеств. Правила записи данных в текстовый файл. Понятие явной и косвенной рекурсии.
учебное пособие [1,5 M], добавлен 10.12.2010Описание программы, реализующей различные операции над строковыми типами данных, а также методы их обработки для получения заданных в задании результатов. Требования к программному продукту. Процедура проверки сохранения данных программы перед закрытием.
курсовая работа [1,1 M], добавлен 26.02.2015Работа с базами данных в оперативной памяти. Описание файлового домена. Операции чтения-записи в файл. Переадресация ввода-вывода. Особенности работы с базами данных, хранящими данные в файлах на диске. Общие правила работы с файлами на внешних носителях.
учебное пособие [49,3 K], добавлен 27.04.2013Изучение понятия и особенностей построения компьютерной сети с файл-сервером. Проект структурной схемы сети и схемы сети на плане здания. Удаленный доступ и удаленное управление сервером. Сети с шинной топологией. Характеристика требуемого оборудования.
курсовая работа [1,5 M], добавлен 18.03.2013Создание приложения, создающего текстовый файл text1.txt и записывающего в него текст. Разработка приложения, открывающего текстовый файл для чтения и считывающего из него текст в окно Memo. Создание приложения, открывающего текстовый файл дополнения.
лабораторная работа [15,8 K], добавлен 15.07.2009Основные принципы концепции типа данных в языках программирования. Разновидности структур данных. Дискретные и непрерывные скалярные типы. Файл, последовательность, множество. Линейный список. Сложность алгоритмов. Построение рекурсивных подпрограмм.
презентация [2,5 M], добавлен 14.10.2013Разработка программы на языке программирования C++ с функциями считывания словаря в начале работы программы из текстового файла и записи словаря в файл перед завершением работы. Основные элементы программного продукта: данные абонента телефонной сети.
контрольная работа [12,9 K], добавлен 07.04.2015
