[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Форум » Наш сайт » Visual basic » Проверить существование папки vb (Проверить существование папки vb)
Проверить существование папки vb
ilimДата: Пятница, 04.02.2011, 05:25 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 680
Награды: 17
Репутация: 4
Статус: Offline
Эта функция нужна для проверки существования каталога или файла. Я забыл написать ее в пятой части(там о работе с файлами), а теперь этот шаг туда не помещается. Начнем`с. На форму кинь кнопку, вот код:

Private Sub Command1_Click()
If Dir("c:\1.txt") <> "" Then ' Если файла/папки не существует, то функция возвращает "", если же существует, то функция возвращает имя файла
MsgBox "Файл существует"
Else
MsgBox "Файл не существует"
End If
End Sub

Теперь создай в диске C:\ файл текстовой с именем 1, нажми на кнопку, а потом удали файл, и опять нажми.
Исходник ищи Здесь.

Друние функции

1. FileLen - Узнает длину файла. Пример: Print FileLen("c:\1.txt")
2. FileDateTime - Узнает дату последней модификации файла. Пример: Print FileDateTime("c:\autoexec.bat")


www.ilim.kz
 
Форум » Наш сайт » Visual basic » Проверить существование папки vb (Проверить существование папки vb)
Страница 1 из 11
Поиск: