Консультация № 76584
20.02.2007, 12:03
0.00 руб.
0 3 3
Как в Access на VBA написать программку на определение наличия файла в определенном месте?

Обсуждение

давно
Профессионал
848
1596
20.02.2007, 13:37
общий
это ответ
Здравствуйте, Dariola!
-----------------------
If Dir$("c:\pagefile.sys", vbSystem + vbHidden + vbReadOnly) = "" Then
MsgBox "File not exist"
End If
------------------------
Неизвестный
20.02.2007, 14:00
общий
это ответ
Здравствуйте, Dariola!

Dim a As String
a = InputBox("введи директорию проверки и имя файла с расширением")
If dir(a) <> "" Then
MsgBox ("Такой файл существует")
Else
MsgBox ("Такой файл не существует")
End If
Неизвестный
20.02.2007, 19:40
общий
это ответ
Здравствуйте, Dariola!
Добавьте в Ваш код строку подобную следующей:
If Dir$(strPathAndFile) = "" Then .... (File not found)
Удачи.
Евгений.
Форма ответа