![]() |
|
Модераторы: Snowy, MetalFan, bems, Poseidon |
![]()
|
|
| mmik |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 65 Регистрация: 14.10.2008 Репутация: нет Всего: нет |
Всем здрастье. В delphi новичок, но нужно срочно организовать программу-прослоечку по считыванию данных с сервера и киданию их в базу данных Access, где они дальше будут обрабатываться. Соединиться с сервером получилось, но не получается послать запрос. Читаю литературу, но синтаксис везде разный, поэтому в голове каша. У меня delphi 7. Помогите разобраться.
|
|||
|
||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 9 Всего: 133 |
-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| mmik |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 65 Регистрация: 14.10.2008 Репутация: нет Всего: нет |
В том-то и проблема, что не знаю как обратиться к серверу с запросом.
|
|||
|
||||
| Данкинг |
|
|||
![]() Yersinia pestis ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 11 Всего: 130 |
Какой сервер-то хотя бы? -------------------- There's nothing left but silent epitaphs. |
|||
|
||||
| Poseidon |
|
|||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 9 Всего: 133 |
-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| mmik |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 65 Регистрация: 14.10.2008 Репутация: нет Всего: нет |
ddeclientconv1.setlink('spserver','G42')
Сервер должен получить запрос приблизительно такого вида: R(57,13302) |
|||
|
||||
| mmik |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 65 Регистрация: 14.10.2008 Репутация: нет Всего: нет |
Вопрос снят.
procedure TForm1.Button1Click(Sender: TObject); var data: PChar; begin dde1.SetLink('Spserver','G42'); data := dde1.RequestData('R(57,13305)(57,13306)(57,13307)'); edit1.Text := data; end; может кому-нибудь будет полезно |
|||
|
||||
![]()
|
| Правила форума "Delphi: Для новичков" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Для новичков | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |