Глава 1. Теоретическая часть. Пользователи сети Интернет.
1.1. Понятие сети Интернет
Интернет - всемирная компьютерная сеть, объединяющая десятки тысяч сетей всего мира. Её назначение - обеспечить любому желающему постоянный доступ к любой информации. Интернет предлагает практически неограниченные информационные ресурсы, полезные сведения, учёбу, развлечения, возможность общения с компетентными людьми, услуги удалённого доступа, передачи файлов, электронной почты и многое другое. Интернет обеспечивает принципиально новый способ общения людей, не имеющий аналогов в мире.
Благодаря сети стал доступен (бесплатно или за умеренную плату) огромный объём информации. Так, пользователь в любой стране может связаться с людьми, разделяющими его интересы, или получить ценные сведения в электронных библиотеках, даже если они находятся на другом конце света.
Нужная информация окажется в его компьютере за считанные секунды, пройдя путь по длинной цепочке промежуточных компьютеров, по кабелям и по радио, через горы и моря, по дну океана и через спутник.
Интернет финансируется правительствами, научными и образовательными учреждениями, коммерческими структурами и миллионами частных лиц во всех частях света, но никто конкретно не является её владельцем. Управляет сетью "Совет по архитектуре Интернет", формируемый из приглашённых добровольцев.
Сеть была создана в 1984 году, и сейчас ею пользуются примерно сорок миллионов человек. Интернет всё время изменяется, поскольку имеет много квалифицированных пользователей, которые пишут программы для себя, а затем распространяют их среди желающих. Постоянно появляются новые серверы, а существующие обновляют свой "репертуар". Стремительно растут информационные потоки.
Принципы, по которым строится Интернет, впервые были применены в сети ARPANET, созданной в 1969 году по заказу американского агентства DARPA. Используя наработки ARPANET, в 1984 году Национальный научный фонд США создал сеть NSFNET для связи между университетами и вычислительными центрами. В отличие от закрытой ARPANET подключение к NSFNET было достаточно свободным и к 1992 году к ней подключились более 7500 мелких сетей, включая 2500 за пределами США. С передачей опорной сети NSFNET в коммерческое использование появился современный Интернет.
1.2. История сети Интернет
История Интернета началась с разработки компьютеров в 1950-х годах и появления научных и прикладных концепций глобальных вычислительных сетей почти одновременно в разных странах, в первую очередь в научных и военных лабораториях в США, Великобритании и Франции.
Существуют практически непреодолимые проблемы в создании историографии раннего развития Интернета. Процесс оцифровки представляет собой вдвойне сложную задачу для историографии в целом и для исторического исследования связи в частности. Разработчик Дуг Гейл так говорил о трудностях с документированием событий раннего этапа истории Интернета, которые привели к его возникновению:
Концепция обмена данными — передачи данных между двумя разными местами через электромагнитную среду, например радио или электрический провод — предшествовала появлению первых компьютеров. Такие системы связи, как правило, ограничивались двухточечной связью между двумя конечными устройствами. Предвестниками такого вида связи можно считать телеграфную связь и телексы (телетайпы). В конце XIX века телеграф стал первой полностью цифровой системой связи.
В начале XX века была проведена фундаментальная теоретическая работа в области передачи данных и теории информации, авторами которой были Клод Шеннон, Гарри Найквист и Ральф Хартли.
Первые компьютеры имели центральный процессор и дистанционные терминалы. По мере развития технологий были разработаны новые системы, позволяющие осуществлять связь на более значительные расстояния (для терминалов) или с более высокой скоростью (для соединения локальных устройств), что было необходимо для создания мейнфреймов. Эти технологии позволили передавать данные, такие как файлы, между удалёнными компьютерами. Однако двухточечная модель связи была ограниченной, поскольку не позволяла осуществлять прямую связь между любыми двумя произвольными системами; было необходимо физическое соединение. Эта технология также считалась опасной при стратегическом и военном использовании по причине отсутствия альтернативных путей передачи данных в случае нападения противника.
1.3. Организация работы пользователя в сети Интернет
Выход пользователя в сеть Интернет осуществляется через провайдера, связь с которым может быть организована одним из следующих способов:
? доступ по коммутируемым телефонным линиям связи (Dial-Up). Благодаря доступности и относительно невысокой стоимости остается самым популярным в России средством выхода в Интернет. При этом устанавливается IP-соединение и модем пользователя через телефонную линию связывается с модемом провайдера. Соединение осуществляется только на период сеанса (по желанию пользователя), после чего связь с Интернет разрывается. Единственным ограничением при работе пользователя (при условии оплаты услуг провайдера) является качество связи, определяемое состоянием линии связи и возможностями модема пользователя. Для данного способа доступа характерны: низкая скорость передачи данных (максимум 56 Кбит/с), что не позволяет принимать из сети и смотреть видеофильм или слушать музыку высокого качества в реальном времени; невозможность приема телефонных звонков из-за занятости линии связи во время сеанса;
? коммутируемое подключение через каналы ISDN. При этом способе связи между клиентом и провайдером обеспечивается цифровая передача данных посредством двух каналов, каждый из которых имеет гарантированную пропускную способность 64 Кбит/с. Для реализации такого соединения необходима прокладка двух цифровых линий связи к помещению клиента, одна из которых будет подключена к компьютеру, а другая к ISDN-телефону (возможно использование обычного телефона при наличии дополнительного ISDN-устройства с аналоговым выходом). ISDN-подключение возможно только через цифровую АТС. Данный вариант подключения менее распространен из-за значительных затрат как на установку оборудования, так и на оплату трафика;
? постоянный (круглосуточный) выход в Интернет по выделенной линии связи. Предполагается, что такая линия, обычно это “витая пара”, обеспечивает высокую скорость передачи данных (до 100 Мбит/с). В связи с высокой стоимостью этот наиболее совершенный режим доступа в Интернет используется средними и крупными структурами для подключения своих локальных вычислительных сетей. В последнее время данный способ стал применяться при организации домашних компьютерных сетей, когда несколько десятков пользователей большого дома подключаются к одному Интернет-каналу и за небольшую плату (общие затраты распределяются между всеми участниками) имеют возможности как для работы в сети Интернет, так и для обмена сообщениями между своими компьютерами;
? несимметричный доступ с использованием спутниковой связи. По статистике провайдеров около 85% информации при работе в сети Интернет является входящей. К исходящей информацией относятся запросы к серверам сети и оправка электронной почты. По исходному проекту DirectPC пользователь, установив у себя спутниковую тарелку с ориентацией на связной спутник, после соединения с провайдером обычным образом через модем, активизирует спутниковый канал на прием данных со скоростью до 400 Кбит/с. Подобную услугу через систему спутникового телевещания в течение ряда лет оказывала компания “НТВ”. В настоящее время такой способ доступа в Интернет с высоким уровнем оплаты предоставляет компания “Омиком”. На Западе большинство занимающихся спутниковым телевидением компаний предоставляют такой доступ к сети Интернет практически за бесценок. На время сеанса работы с сетью телефонная линия занята.
Известен и ряд менее распространенных в настоящее время вариантов доступа к сети Интернет: подключение через радиомодем, использование каналов кабельного телевидения, прменение ADSL-модемов, система HomePNA (два последних варианта базируются на имеющихся телефонных линиях связи) и другие.
1.4. Анализ методов решения задачи в области разработки системы
Сбор данных по учету пользователя в сети позволит вести учет просмотров контента и показов рекламы в российском сегменте интернета.
Разрабатываемая информационная система учета по подключению пользователей в сети Интернет должна помочь решить следующие стоящие перед ней задачи:
? создать базу данных для более эффективного доступа к информации предприятия;
? реализовать многофункциональный поиск информации о пользователях сети Интернет;
? улучшить и упростить доступ к хранимой информации;
? обеспечить удобный интерфейс для обычного пользователя для доступа к хранимой информации;
? обеспечить получение различных видов информации в рамках предметной области;
? обеспечить сопровождаемость системы и надежное применение программного средства;
? улучшить ряд экономических показателей, т.е. уменьшить время поиска необходимой информации и при этом уменьшить число задействованных в поиске других отделов;
? улучшение качества обработки получаемой информации, т.е. повышение достоверности информации, ее соответствия времени получения, ее степени защиты от нежелательного просмотра и так далее.
Входные данные
В качестве входных данных разработанной программы входят личностные данные пользователей:
? ФИО;
? год рождения;
? адрес;
? телефон.
Также в программу входят и паспортные данные пользователей:
? серия и номер паспорта;
? кем выдан;
? дата выдачи.
В качестве данных по подключению к сети Интернет будут использоваться следующие значения:
? дата подключения;
? тип подключения;
? тариф за минуту.
Самыми основными и результирующими данными будут являться данные по пользованию сетью Интернет:
? дата пользования;
? время;
? стоимость.
Выходные данные
Выходными данными разработанной программы будет являться отчет, в который будут внесены все данные.
Отчет – это печатный документ, содержащий данные, аналогичные получаемым в результате выполнения запроса к базам данных.
Выделяют следующие виды отчетов:
? простой отчет;
? отчет с группированием данных;
? составной отчет, объединяющий несколько разных отчетов.
Отчет позволяет просмотреть и сравнить все те данные о пользователях, которые будут скомпонованы воедино. В отчете будет предоставлена информация, как об общих данных пользователя, так и о данных пользования Интернетом.
?
Глава 2. Практическая часть. Разработка системы учета пользователей сети.
2.1. Назначение и цели создания системы
Программа, разрабатываемая в дипломном проекте, предназначена для облегчения работы в сфере учета по подключению в сеть Интернет будущих пользователей. Предполагает легкую систематизацию и четкую группировку входных данных. Программа позволит сократить количество работы, ранее распространявшейся на нескольких пользователей, а также уменьшит время поиска и систематизации всех данных.
Для пользователя разработанная программа очень легка и проста в применении. Предполагает быструю и удобную работу на понятном пользователю языке.
Эта программа позволит быстро вносить конкретные данные.
Программа предполагает ввод данных следующего типа:
? личностных данных (ФИО, год рождения, адрес, телефон);
? паспортных данных (серия и номер паспорта, кем выдан, дата выдачи);
? данных по подключению в сеть Интернет (дата подключения, тип подключения, тариф за минуту);
? данных по пользованию сетью Интернет (дата пользования, время, стоимость).
В программе также предусмотрено добавление, изменение и удаление данных. Благодаря этим функциям можно добавлять новых пользователей, изменять их данные, если есть в этом необходимость, а также удалять пользователей, которые больше не являются пользователями сети Интернет.
Данная программа предоставляет и другие функции: поиск и фильтрацию данных. Благодаря функции «Поиск» можно находить конкретного пользователя из всего списка по следующим данным: по фамилии, по дате рождения, по адресу и по телефону.
Фильтрация помогает отфильтровать из всей таблицы данного нам пользователя с помощью следующих данных: по ФИО, по адресу, по телефону.
2.2. Выбор средств разработки системы
Данная программа разрабатывалась в среде Delphi7.
Рисунок 1. Интерфейс программы Delphi 7
Ниже представлен листинг программного обеспечения
function ConstructOCI8() {
if (($this->select == true) and ($this->from == true))
{
$this->construct = "select $this->select
from $this->from
$this->where
$this->join " ;
return $this->construct;
}
if (($this->inserval == true) and ($this->from == true))
{
$this->construct = "INSERT INTO $this->from
VALUES $this->inserval " ;
return $this->construct;
}
if ($this->delete == true)
{
$this->construct = "DELETE from $this->delete
$this->where " ;
return $this->construct;
}
if ($this->update == true)
{
$this->construct = "UPDATE $this->from
SET $this->update
$this->where " ;
return $this->construct;
}
} unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids, DBGrids, DB, DBTables, ExtCtrls, DBCtrls, Menus;
type
TForm1 = class(TForm)
DataSource1: TDataSource;
Table1: TTable;
DBGrid1: TDBGrid;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
DBNavigator1: TDBNavigator;
Label1: TLabel;
Button5: TButton;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
Button6: TButton;
Button7: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure N5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Button7Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit2, Unit3, Unit5, Unit6, Unit9, Unit10, Unit11, Unit12;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
form3.show;
end;
procedure TForm1.Button3Click(Sender: TObject);
Var i:integer;
Begin
table1.Append;
if form5.showmodal=mrOk then
begin
table1.FieldByName('FIO').AsString:=form5.DBEdit1.text;
if ((Form5.DBEdit1.Text='')or(Form5.DBEdit2.Text='')or(Form5.DBEdit3.Text='')or (Form5.DBEdit4.Text='')) then begin
messagedlg ('Поля не заполнены!'+#13 +'Введите пожалуйста данные!',mtinformation,[mbok],0);
Table1.Cancel;
end
else
table1.Post;
end
else
Table1.Cancel;
end;
procedure TForm1.Button4Click(Sender: TObject);
begin
table1.edit;
if form6.showmodal=mrOk then
begin
if ((Form6.DBEdit1.Text='')or(Form6.DBEdit2.Text='')or(Form6.DBEdit3.Text='')or(Form6.DBEdit4.Text='')) then begin
messagedlg ('Поля не заполнены!'+#13 +'Введите пожалуйста данные!',mtinformation,[mbok],0);Table1.Cancel;
end
else
form1.Table1.Post;
end
else Table1.Cancel;
end;
procedure TForm1.Button5Click(Sender: TObject);
begin
form9.show;
end;
procedure TForm1.N3Click(Sender: TObject);
begin
close;
end;
procedure TForm1.N6Click(Sender: TObject);
begin
form10.show;
end;
procedure TForm1.N5Click(Sender: TObject);
begin
Winhelp(Form1.Handle,'help1.hlp',Help_context,1);
end;
procedure TForm1.Button6Click(Sender: TObject);
begin
form11.show;
end;
procedure TForm1.Button7Click(Sender: TObject);
begin
form12.show;
end;
procedure TForm1.N2Click(Sender: TObject);
begin
Form16.QuickRep1.Preview;
end;
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, Grids, DBGrids, StdCtrls, ExtCtrls, DBCtrls;
type
TForm2 = class(TForm)
DBGrid1: TDBGrid;
Table1: TTable;
DataSource1: TDataSource;
Button1: TButton;
Button2: TButton;
DBNavigator1: TDBNavigator;
Label2: TLabel;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
uses Unit7, Unit8, Unit1;
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
Var
i:integer;
begin
table1.Append;
if form7.showmodal=mrOk then
begin
table1.FieldByName('FIO').AsString:=form7.DBEdit1.text;
if form7.DBEdit1.text=''then table1.Cancel
else
table1.Post; end
else
table1.Cancel;
end;
procedure TForm2.Button2Click(Sender: TObject);
begin
table1.edit;
if form8.showmodal=mrOk then
begin
if form8.DBEdit1.text='' then Table1.Cancel
else
table1.Post; end
else
table1.Cancel;
end;
procedure TForm2.Button3Click(Sender: TObject);
begin
form1.show;
form2.Close;
end;
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, Grids, DBGrids, StdCtrls;
