| Вопрос: Как Открыть порт? | Добавлено: 17.09.07 14:43 |
Автор вопроса:  Димас | Web-сайт: hackerportal.clan.su/ | ICQ: 368665548 |
|
Народ как открыть TCP порт с помощью Winsock
И закрыть |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа:  Millenium ICQ: 629966 Вопросов: 118 Ответов: 903 |
Web-сайт: Профиль | | #1 | Добавлено: 17.09.07 15:47 |
|
Гаечным ключём! Если его не заварили сваркой джидаи, то и лазером можно!!!
Ты чайник заварной!!! Смотри раздел примеры и справки читай!!! А вот пример 'SCK1 - Soxcket SCK1.Port=80 '80 - Http SCK1.LISTEN 'tvorim chudo SCK1.CLOSE SCK1.Listen |
||
|
Номер ответа: 2 Автор ответа:  StuartВопросов: 5 Ответов: 152 |
Профиль | | #2 | Добавлено: 17.09.07 18:10 |
 )
|
||
|
Номер ответа: 3 Автор ответа: Димас ICQ: 368665548 Вопросов: 13 Ответов: 37 |
Web-сайт: Профиль | | #3 | Добавлено: 17.09.07 18:37 |
| Спасибо, но гайки крути сам | ||
|
Номер ответа: 4 Автор ответа: ДимасICQ: 368665548 Вопросов: 13 Ответов: 37 |
Web-сайт: Профиль | | #4 | Добавлено: 18.09.07 13:19 |
|
Немного не так выразился
Нужно проверить, открыт ли он если открыт то делаем то если закрыт то другое |
||
|
Номер ответа: 5 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #5 | Добавлено: 18.09.07 16:29 |
|
on error goto e
SCK1.Port=80 SCK1.LISTEN SCK1.CLOSE msgbox "порт закрыт" exit sub e: msgbox "порт открыт" End sub |
||
|
Номер ответа: 6 Автор ответа: MilleniumICQ: 629966 Вопросов: 118 Ответов: 903 |
Web-сайт: Профиль | | #6 | Добавлено: 18.09.07 22:11 |
|
Почему так занудно?
Вот тебе пример: 'tcpClient - Socket (тот-же SCK1) If tcpClient.State = sckConnected Then 'Творим чудо (тоест пишем код. 'Например: tcpClient.SendData "beep" 'значит что то опять-таки надо делать! Else 'То что надо делать |
||
|
Номер ответа: 7 Автор ответа: MilleniumICQ: 629966 Вопросов: 118 Ответов: 903 |
Web-сайт: Профиль | | #7 | Добавлено: 18.09.07 22:15 |
|
А вот тебе мой-же пример с ЭТОГО-же сайта! ВОт почему тебе говорил гаечным ключем. Т.е. смотреть раздел примеры надо:
Вот ссылка: http://www.vbnet.ru/samples/download.aspx?id=663 (Прямая ссылка на файл архива: http://www.vbnet.ru/samples/zip/Remote_PC_Millenium.rar) Раздел примеры: http://www.vbnet.ru/samples/showgroup.aspx?id=7 |
||
Страница: 1 |