Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: osmor уже забыл все, возможно как-то так
Dim intNF As Integer Dim bytB() As Byte intNF = FreeFile Open "c:/Файл.jpg" For Binary Access Read As #intNF ReDim bytB(FileLen(strFullFileName)) Get #intNF, , bytB Close #intNF Byte -
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.