ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / soobshenie na servere
9 сообщений из 9, страница 1 из 1
soobshenie na servere
    #33591510
mehi1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mehi1
Гость
Privet. Mne nado chtobi pri izmenenie v tablitse u klienta (dopustim, pri prodaja kakoqo to produkta) na servere vishla soobshenie ob etom. U menya ne poluchaetsa. Kak mojno eto delat? Podskajite pojalusta.
...
Рейтинг: 0 / 0
10.03.2006, 07:44
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33591517
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав C.
Участник
mehi1Privet. Mne nado chtobi pri izmenenie v tablitse u klienta (dopustim, pri prodaja kakoqo to produkta) na servere vishla soobshenie ob etom. U menya ne poluchaetsa. Kak mojno eto delat? Podskajite pojalusta.
Ну, это просто...
Делается еще одна таблица, куда складываются сообщения.
При проведении какой-либо операции (например, продажа) на станции клиента формируется сообщение и выкладывается в "таблицу сообщений" (insert into...).
Сервер просматривает таблицу (допустим 1 раз в N секунд), отображает новые сообщения, а затем удаляет те, которые уже показаны (очищает запись / delete...).
...
Рейтинг: 0 / 0
10.03.2006, 07:57
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33591934
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
2 Станислав C.

А как и где это прописать на сервере?
...
Рейтинг: 0 / 0
10.03.2006, 10:53
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33592209
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав C.
Участник
Недоходящий2 Станислав C.

А как и где это прописать на сервере?

Хранимая процедура №1 / программа на станции клиента:
При проведении какой-либо операции (например, продажа) на станции клиента формируется сообщение и выкладывается в "таблицу сообщений" (insert into...).

Хранимая процедура № 2 / программа на сервере:
Сервер просматривает таблицу (допустим 1 раз в N секунд), отображает новые сообщения, а затем удаляет те, которые уже показаны (очищает запись / delete...).

Все остальное на Ваше усмотрение...
"Сложность программы растет до тех пор, пока не превысит способности программиста..." (с) народный (компьютерный) фольклор
...
Рейтинг: 0 / 0
10.03.2006, 11:59
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33592895
mehi1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mehi1
Гость
Kakoy to primer mojno pokazat ? A to u menya chto-to ne poluchaetsa.
...
Рейтинг: 0 / 0
10.03.2006, 14:46
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33592940
Недоходящий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Недоходящий
Участник
2 Станислав C.
Да точно, без примера не разобрать.
...
Рейтинг: 0 / 0
10.03.2006, 14:59
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33593047
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав C.
Участник
Недоходящий2 Станислав C.
Да точно, без примера не разобрать.

Ну, не знаю... Видел я такое чудо еще под FPD... Работающего примера нет (так как два года назад уволился с того места), но что-то изобразить попробую... Только предупрежу сразу, что это будет для варианта "файл-сервер".

Итак, имеем таблицу сообщений:
Soob(UserId c(10),Memo С(80))

Процедура на клиенте:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
* Процедура на клиенте формирует сообщение. 
* Например, эта процедура вызывается при продаже части товара
procedure operation
parameter cod_oper
cStr="Проведена операция "
....
do case
...
    case cod_oper=<какой-то код>
    <Вычисление остатка товара на складе>
    cStr=cStr+"продажи товара. Текущий остаток: "+str(ostat)
...
endcase
insert into soob(UserId,Memo) values (MyId,cStr)
return

Процедура на сервере /серверное приложение # клиентское приложение, у них общие только таблицы/:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
* Главная управляющая процедура на сервере
procedure main
....
do while .t.
=show_mess()
...
enddo
...
return

* Отображение сообщений пользователей
procedure show_mess
select * from soob where !deleted() into cursor query

select query
if reccount(query)= 0 
return

select query
go top
do while !eof()
  cStr=query.Memo+chr( 13 )+query.UserId
  wait window nowait cStr
  skip
enddo
select soob
delete all for !deleted();
return

Естественно, что можно эти процедуры "улучшать и улучшать"...
...
Рейтинг: 0 / 0
10.03.2006, 15:23
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33594118
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Hi mehi1!

1) Обычно СЕРВЕР - это такой ящик, без монитора, клавиатуры и прочих внешних
устройств - и соответственно там данные хранятся и обрабатываются, но никак
не "сообщения показываются". Так что будем считать, что сообщение надо
показать просто на каком-то другом компьютере, где так-же работает твоя
программа (неважно точно такая-же, или отдельно написанная - специально для
цели пугания пользователя разными сообщениями).
2) Программа как программа - просто при запуске созадётся экземпляр объекта
Timer (а точнее твоего класса унаследованного от таймера - там как раз в
Timer event и прописан код сканирующий некоторую таблицу, и если там есть
"свежие" сообщения, то показывающий их - т.е. запускающий некоторую форму).
Можно конечно и другими способами сделать - их масса, но с таймером видимо
самый простой будет.

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
11.03.2006, 03:37
| Ответить | Цитировать | Написать  
soobshenie na servere
    #33594193
mehi1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mehi1
Гость
Igor Korolyov,
1) Vi pravi. Etot komp. u menya kak obichniy komp. Prosto u menya baza budet xranitsa v etom kompe.
2) Ochen xatel bi posmotret kod etoqo proqrammi. Prosto mne seychas trudno predstavit sebe kak eto rabotaet.
...
Рейтинг: 0 / 0
11.03.2006, 09:03
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / soobshenie na servere
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&msg=33593047&tid=1592156]:
 0ms
get settings:
 7ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 178ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 57ms
get tp. blocked users:
 2ms
others: 232ms
total:  512ms
созд. / загр.: 512ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]