Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вопрос по I/O / 2 сообщений из 2, страница 1 из 1
20.01.2004, 13:42
    #32381643
rbt
rbt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вопрос по I/O
как создать файл, и залить туды бинарную инфу (String преобразованный в binary, в ВБА есть же такая функция преобразования) ?

можно пожалуста с примером.

Спасибо за помощь!
...
Рейтинг: 0 / 0
20.01.2004, 16:32
    #32381983
PA
PA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вопрос по I/O
Держи примерчик:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
    Dim intFile As Integer
    Dim tmp() As Byte
    
    Const TEST_STRING As String =  "test string" 
    
    ReDim tmp(Len(TEST_STRING) -  1 )
    CopyMemory tmp( 0 ), ByVal TEST_STRING, Len(TEST_STRING)
    intFile = FreeFile
    Open  "D:\test.txt"  For Binary Access Write As intFile
    Put #intFile, , tmp
    Close intFile
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вопрос по I/O / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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