|
|
|
Как проверить создан файл mdb или нет?
|
|||
|---|---|---|---|
|
#18+
Создаю программным способом несколько БД . При попытке заново создать теже БД с теми же именами вылетаю по ошибке, что такой файл уже создан. Хочу вставить правильную проверку, а не просто обход с помощью On Error GoTo ErrorHandler. Помогите придумать . ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.08.2008, 16:38 |
|
||
|
Как проверить создан файл mdb или нет?
|
|||
|---|---|---|---|
|
#18+
Извеняюсь - поспешил..:) Придумал сам уже. Если кому-нибудь надо, то вот код: Dim fileExist As String fileExist = Dir(App.Path & "\Total.mdb") If fileExist = vbNullString Then cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\мойфайл.mdb" Else MsgBox "Файл уже был создан" End If ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.08.2008, 16:55 |
|
||
|
|
start [/forum/topic.php?fid=60&msg=35504852&tid=2161922]: |
0ms |
get settings: |
10ms |
get forum list: |
20ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
99ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
47ms |
get tp. blocked users: |
2ms |
| others: | 247ms |
| total: | 449ms |
| 0 / 0 |
