Содержание
- 2. Состав программного комплекса Скрипт для создания серверной части(SQL) Интерфейс пользователя (HTML) Скрипт для отправки сообщений с
- 3. Скрипт для создания серверной части(SQL) CREATE TABLE T_WORDS ( KEY varchar(50) NOT NULL ); INSERT INTO
- 4. T_USERS CREATE TABLE T_USERS ( N_ID_USER int NOT NULL PRIMARY KEY, C_EMAIL varchar(50) NOT NULL, C_TELEFON
- 5. T_SMS CREATE TABLE T_SMS ( N_ID_SMS int NOT NULL PRIMARY KEY, N_ID_USER int NOT NULL FOREIGN
- 6. Создание последовательностей CREATE SEQUENCE SEQ_USERS INCREMENT BY 1 START WITH 1 ; CREATE SEQUENCE SEQ_SMS INCREMENT
- 7. Создание представления CREATE OR REPLACE VIEW BAD_USERS ( EMAIL, TELEFON, COUNT_SMS, COUNT_BAD ) AS SELECT C_EMAIL,
- 8. Функция вставки нового user (или изменения параметров старого) CREATE OR REPLACE FUNCTION INS_USER (EMAIL varchar2,TELEFON varchar2,
- 9. Текст функции --Вычисляем наличие плохих слов в sms SELECT COUNT(*) into count_bad FROM T_WORDS WHERE INSTR(KEY,SMS)>0;
- 10. Ищем этого юзера в базе -- В n_usr будет кол-во юзеров с таким мылом SELECT count(*)
- 11. Вставляем или обновляем информацию о юзере IF n_usr > 0 THEN UPDATE T_USERS SET N_COUNT_ERR =
- 12. Возвращаем номер юзера SELECT N_ID_USER into n_usr FROM T_USERS WHERE C_EMAIL = EMAIL; RETURN n_usr; END;
- 13. Процедура вставки сообщения в базу CREATE OR REPLACE PROCEDURE NEW_SMS(EMAIL varchar2, TELEFON1 varchar2, TELEFON2 varchar2, SMS
- 14. Интерфейс пользователя Отправка SMS-сообщений через почту Введите ваш email: Введите ваш пароль для email: Введите ваш
- 16. Скрипт для отправки сообщений send sms email = Request.Form("email"); pass = Request.Form("pass"); tel1 = Request.Form("telefon1"); tel2
- 17. objCon = Server.CreateObject("ADODB.Connection"); objCon.Open("intranet", "iren", "iren40"); Server.ScriptTimeout = 1800; cSQL = "begin NEW_SMS('"+email+"', '"+tel1+"', '"+tel2+"', '"+sms+"');
- 18. Set SMS = Server.CreateObject("SMS_Gateway.clsSMS_Gateway") x = SMS.Send_SMS(email, pass,tel1, tel2, sms) objCon.Close(); Set SMS = Nothing; %>
- 19. Скрипт выводит в окно браузера список «плохих» юзеров send sms
- 20. Получаем список objCon = Server.CreateObject("ADODB.Connection"); objCon.Open("intranet", "iren", "iren40"); Server.ScriptTimeout = 1800; cSQL = ""; cSQL =
- 21. Выводим список while (!RecSet.EOF) { Response.write('Пользователь:' + RecSet("EMAIL") ); Response.write('['+RecSet("TELEFON")+']'); Response.write(' проколов: '+ RecSet("COUNT_BAD")); Response.write(' сообщений
- 22. Текст предупреждения Рассылка всем предупреждений Текст предупреждения: RecSet.Close(); objCon.Close(); %>
- 24. Скачать презентацию
 Slaidy.com
 Slaidy.com



















![Выводим список while (!RecSet.EOF) { Response.write('Пользователь:' + RecSet("EMAIL") ); Response.write('['+RecSet("TELEFON")+']'); Response.write(' проколов:](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/427021/slide-20.jpg)
 Развитие парков и общественных пространств
 Развитие парков и общественных пространств Российско-белорусское научное сотрудничество: анализ совместных публикаций по основным библиометрическим индикаторам
 Российско-белорусское научное сотрудничество: анализ совместных публикаций по основным библиометрическим индикаторам Забудьте о том, что Вы слышали и знали о Матрицы, Бинары и Хайпы ! Все это полная чушь! Интернет переполнен всевозможными предложени
 Забудьте о том, что Вы слышали и знали о Матрицы, Бинары и Хайпы ! Все это полная чушь! Интернет переполнен всевозможными предложени Занятие 10
 Занятие 10 Мечеть Скалы в Иерусалиме
 Мечеть Скалы в Иерусалиме Презентация к уроку «Пресмыкающиеся»
 Презентация к уроку «Пресмыкающиеся» Каким должен быть современный учитель
 Каким должен быть современный учитель Балет. Тест
 Балет. Тест Федеративное устройство Российской Федерации
 Федеративное устройство Российской Федерации Деревообрабатывающее производство
 Деревообрабатывающее производство Общая физическая подготовка на занятиях
 Общая физическая подготовка на занятиях Презентация на тему Фрэнсис Бэкон
 Презентация на тему Фрэнсис Бэкон Тема: Особенности природы Австралии. Природные зоны.
 Тема: Особенности природы Австралии. Природные зоны. Шаблон презентации
 Шаблон презентации ОСНОВЫ БОЕВОГО ПРИМЕНЕНИЯ ЧАСТЕЙ И подразделений ЗРВ
 ОСНОВЫ БОЕВОГО ПРИМЕНЕНИЯ ЧАСТЕЙ И подразделений ЗРВ Презентация на тему Дидактические и методические принципы развития слухового восприятия
 Презентация на тему Дидактические и методические принципы развития слухового восприятия Квантовая физика
 Квантовая физика Интернет-УниверситетИнформационных Технологийwww.intuit.ru
 Интернет-УниверситетИнформационных Технологийwww.intuit.ru Характеристика Организационной культуры по Харрису и Морану
 Характеристика Организационной культуры по Харрису и Морану Устанановление пола исполнителя рукописи
 Устанановление пола исполнителя рукописи 20140511_ostrov_sokrovishch
 20140511_ostrov_sokrovishch 6 «А» класс поздравляет всех с Новым Годом! и желает …
 6 «А» класс поздравляет всех с Новым Годом! и желает … Борис Годунов
 Борис Годунов  Искусство Страны восходящего солнца
 Искусство Страны восходящего солнца Реализм как направление в литературе и искусстве
 Реализм как направление в литературе и искусстве Годовщина свадьбы
 Годовщина свадьбы Шесть шляп
 Шесть шляп Оценка ИКТ компетентности
 Оценка ИКТ компетентности