ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Winsock - SendData и GetData
1 сообщений из 1, страница 1 из 1
Winsock - SendData и GetData
    #36165697
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
timtim
Участник
Пытаюсь передать файл через Winsock.
Отправляю одно количество байт, а принимается другое(большее количество).



Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Open FileN For Binary Access Read As # 1 
        Get # 1 , , retStr
Close # 1 
WinsockSrv.SendData retStr '   retStr-соответствует размеру файла


'приём
Dim retStr As String
Winsock.GetData retStr
Open App.Path & "\Прием.emf" For Binary Access Write As # 1 
    Put # 1 , , retStr' -Сдесь retStr-больше примерно в 6,5 раз
Close # 1

Подскажите пожалуйста в чём засада.
...
Рейтинг: 0 / 0
27.08.2009, 11:49
| Ответить | Цитировать | Написать  
1 сообщений из 1, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Winsock - SendData и GetData
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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