Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / traffic router testing помогите оттестировать / 3 сообщений из 3, страница 1 из 1
03.08.2009, 10:36
    #36122684
Mr.Power
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
traffic router testing помогите оттестировать
в старом посте решил не писать, т.к начал всё заново .
помогите проверить программу по обмену трафиком

вот скачать: http://introzorn.ru/fileHOSt/Traffic_ROUTER.rar (исходник)

там исходник. задача такова, производится пингация пользователей. в списке должны появится пользователи.

всем кто поможет большое спасибо
...
Рейтинг: 0 / 0
03.08.2009, 11:31
    #36122828
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
traffic router testing помогите оттестировать
> Автор: Mr.Power
> там исходник. задача такова, производится пингация пользователей. в списке должны появится пользователи.

Привет.
В функции PINGip цикл заканчивается раньше чем изменяется состояние винсокса1, Winsock1.State = 6(sckConnecting). Если
поставить
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Do While True
    DoEvents
    d = Winsock1.State
    If d =  8  Then Exit Function
    If d =  9  Then Exit Function
    If datas = "pong" Then
        datas = ""
        Exit Do
    End If
Loop
то просто висит и пока не вывалился по таймауту


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
06.08.2009, 13:54
    #36129970
Mr.Power
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
traffic router testing помогите оттестировать
я доработал программу и готов к тестированию, протестируйте пожалуйста, кот может!
http://introzorn.ru/fileHOSt/trafic_roter_testmode.rar


p.s. фаирвол может его блокировать(если чё вырубайте его)
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / traffic router testing помогите оттестировать / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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