VBNet - Форум - Проверка существования файла.....

Вопрос: Проверка существования файла..... Добавлено: 17.02.03 15:16

Автор вопроса: STEAM | ICQ: 276847102

Подскажите , плиз, как проверить существование файла (VB)
if xz.txt существует then
??????????

Ответить

Ответы Всего ответов: 10

Номер ответа: 1 Автор ответа: Silver Flamingo ICQ: 116970115 Вопросов: 27 Ответов: 49	Профиль \| \| #1	Добавлено: 17.02.03 15:18
	Полазь на этом сайте в разделе "Работа с файлами/директориями" там помоему я встречал что-то подобное. Ответить

Номер ответа: 2
Автор ответа:

Silver Flamingo

ICQ: 116970115

Вопросов: 27
Ответов: 49

Профиль | | #2

Добавлено: 17.02.03 15:27

Держи, я даже сам нашёл это.

Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
Public Function DoesFileExist(ByVal strPath As String) As Boolean
DoesFileExist = PathFileExists(strPath)
End Function

Private Sub Command1_Click()
MsgBox DoesFileExist("c:\autoexec.bat")
End Sub

Ответить

Номер ответа: 3 Автор ответа: STEAM ICQ: 276847102 Вопросов: 33 Ответов: 12	Профиль \| \| #3	Добавлено: 17.02.03 15:32
	СПАСИБО, Silver Flamingo Ответить

Номер ответа: 4
Автор ответа:

Alex3

ICQ: 9481061

Вопросов: 18
Ответов: 132

Профиль | | #4

Добавлено: 17.02.03 15:50

if Dir("c:\xz.txt") <> "" then

Ответить

Номер ответа: 5 Автор ответа: vig11 ICQ: 213777061 Вопросов: 21 Ответов: 159	Профиль \| \| #5	Добавлено: 17.02.03 18:23
	Alex3 всё правильно только сравнивать нужно не с "" , а с переменной vbnullstring. Иначе при каждом сравнении занимается ячейка памяти для пустого String-а "". А при использовании vbnullstring такого не происходит. Ответить

Номер ответа: 6
Автор ответа:

Alex3

ICQ: 9481061

Вопросов: 18
Ответов: 132

Профиль | | #6

Добавлено: 17.02.03 18:44

Ну, раз пошла такая пьянка, то давай вот так еще поправим, чтобы преобразования типа не было :-)

If Dir$("c:\xz.txt") <> vbNullString Then

Ответить

Номер ответа: 7 Автор ответа: sanap Вопросов: 0 Ответов: 1	Профиль \| \| #7	Добавлено: 25.12.07 17:16
	Вопрос, а маску файла сюда применить можно? Сможет ли вот так: If Dir$("c:\x*.txt" <> vbNullString Then С уважением. Ответить

Номер ответа: 8 Автор ответа: Programmer Вопросов: 71 Ответов: 246	Профиль \| \| #8	Добавлено: 25.12.07 19:07
	Да, можно использовать маску. Вообще-то это надо узнавать эксперементальным путем... Рекомендую еще так: If Dir$("c:\x*.txt", vbNormal or vbReadOnly or vbHidden or vbSystem or vbArchive) <> vbNullString Then Ответить

Номер ответа: 9 Автор ответа: Mr.Smile ICQ: 427682013 Вопросов: 14 Ответов: 464	Профиль \| \| #9	Добавлено: 26.12.07 18:24
	vbNormal or vbReadOnly or vbArchive - зачем? Ответить

Номер ответа: 10 Автор ответа: DMG Вопросов: 3 Ответов: 7	Профиль \| \| #10	Добавлено: 15.01.09 20:57
	как в комбобокс загрузить все файлы например с такой маской? Ответить

Страница: 1 |