![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Send ICQ message [D7, Win95/98, WinXP]
Wiz@rd © (2004-04-04 22:33:00)Как послать мессагу на ICQ? Раньше работал такой код:
PUrl := ' http://wwp.icq.com/scripts/WWPMsg.dll?to='+Ptoicqnumber+'&from='+PFrom+'&fromemail='+Pfromemail+'&subject='+PSubject+'& body='+PBody;
StrURL := PUrl;
strRead := '';
hHttpSession := InternetOpen ('GetURL', INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, INTERNET_FLAG_NO_CACHE_WRITE );
InternetQueryOption(hHttpSession , INTERNET_OPTION_CONNECT_TIMEOUT , @nTimeOut , nRead);
nTimeOut := TimeOut;
InternetSetOption(hHttpSession , INTERNET_OPTION_CONNECT_TIMEOUT , @nTimeOut , nRead);
try
hReqUrl := InternetOpenURL (hHttpSession, PChar(StrUrl), nil, 0,0,0);
finally
InternetCloseHandle (hReqUrl);
InternetCloseHandle (hHttpSession);
end;
А щас чё та не работает - видимо линк поменялся
Wiz@rd (2004-04-06 11:14:00) [1]У всех работает - а у него нет!
Покажи пример - может я чё то не так делаю?
(2004-04-05 21:47:00) [2]Удалено модератором
Wiz@rd (2004-04-05 11:32:00) [3]Там есть ICQClient - я знаю - но надо минимум кода для отправки - лучше линк какого-нить скрипта
Wiz@rd (2004-04-05 11:31:00) [4]да знаю я этот сайт - я там уже задал такой же вопрос
Verg (2004-04-05 11:22:00) [5]http://www.cobans.net/
Wiz@rd (2004-04-05 11:20:00) [6]Не неработает...
93028472384 (2004-04-05 00:37:00) [7]шли на мыло xxxxxxx@pager.icq.com, где ххххххх - нумер уйна