![]() |
|
Модераторы: Akina |
![]()
|
|
| Hamlet |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 3.10.2002 Репутация: нет Всего: нет |
1. Как передать по сети файл? 2. Как передать по сети картинку (типа скриншот) 3. Как передать по сети звук (Он-лайн) |
|||
|
||||
| Max |
|
|||
|
Unregistered |
Используй PostData
Я бы сделал так: Открывай нужный файл: dim a as byte dim i,n as integer dim s as string n=0:s="" open FILE_NAME for binary as #1 for i=1 to LOF(1) n=n+1 if n=256 then n=0 postdata s ' посмотри параметры в хэлпе Васика s="" end if get#1,i,a s=s+chr$(a) next ' создавай пачки (например по 255 символов [переменная S]) close#1 |
|||
|
||||
![]()
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |