Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: KrukVN - по первой части можно так:
Dim strName As String strName = Dir("C:\*.gif") Do Until Len(strName) = 0 'Счетчик файлов strName = Dir Loop
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.