| Вопрос: Winsock | Добавлено: 13.10.06 18:23 |
Автор вопроса:  Шпион | ICQ: 250543104 |
|
„K„Ђ„t „r„Ќ„t„p„u„„ „p„q„‚„p„{„p„t„p„q„‚„…:
„P„Ђ„}„Ђ„s„y„„„u, „{„„„Ђ „x„~„p„u„„. „H„p„‚„p„~„u„u „q„|„p„s„Ђ„t„p„‚„u„~, „M„y„‡„p„y„|. Sub Print (what) Wscript.Echo what End Sub Dim ws Dim dat Set ws=Wscript.Createobject("MSWinsock.Winsock","WS_") Sub WS_DataArrival(bytesTotal) ws.peekdata dat print dat print bytesTotal print len(dat) End Sub ws.Connect "whois.ripn.net", 43 Wscript.Sleep 300 If ws.State=7 Then ws.Senddata "e1.ru" wscript.Sleep 100 End If [abracadabra] ???????????????????????????????????????????????????????????????????????????????? ??????????????????????????????? 222 111 ???>„©„©?????>„©„©„©?????????„©„©??????????>„©??????????>„©„©?????????????>„©„©„©???????????? „©„©„©??????????????>„©„©???????????„©„©??????????????„©„©??????????>„©„©?????????????„©???? ?????????„©„©??????????>?????????>„©„©??????????????????????????? 443 221 [/abracadabra] |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #1 | Добавлено: 13.10.06 22:03 |
| Они перейдут границу здесь -> (c) Игры разума | ||
|
Номер ответа: 2 Автор ответа: Шпион ICQ: 250543104 Вопросов: 13 Ответов: 118 |
Профиль | | #2 | Добавлено: 16.10.06 12:13 |
|
решение найдено
aspconn 1.5 от serverobjects |
||
Страница: 1 |