سلام دوستان
چطوري ميتونم بررسي كنم فايلي در مسيري مشخص وجود داره يا نه ؟
مثلا ميخوام بگم اگه c:\Boot.in وجود نداشت Print "Yes" در غير اين صورت Print "No" ؟
ممنون
با استفاده از عنصر FileSystemObject و دستور FileExist
سلام
میتونید از راهی که جناب didi گفتند استفاده کنید.
یه راه شاید ساده تر هم وجود داره و اون هم تابع Dir است این تابع یک پارامتر میپذیرد و مقداری را برمی گیرداند اگر مقداری که برمیگرداند چیزی غیر از null بود یعنی فایل وجود دارد که در این صورت نام خود فایل را برمی گرداند و اگر فایل وجود نداشت رشته null برگردانده می شود.
بنا بر این مثالی که شما زدید بصورت زیر است :
کد php:
If Dir("c:\Boot.ini") = vbNullString Then
MsgBox "not found"
Else
MsgBox "Found"
End If
از فایل اگزیست استفاده کنی بهتره هر اسمی که فایل مورد نظر داره رو بهش میدی و تو یه ایف میذاریش
سلام دوستان عزیز .
فکر میکنم مطمئن ترین و ساده ترین روش استفاده از تابع PathFileExists هست .
مثال :
کد:
Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
Private Sub Form_Load()
Me.AutoRedraw = True
Me.Print CBool(PathFileExists("c:\windows\TASKMAN.exe"))
End Sub
موفق باشید .
(۰۲-بهمن-۱۳۸۹, ۲۱:۳۱:۳۱)1120 نوشته است: [ -> ]سلام دوستان عزیز .
فکر میکنم مطمئن ترین و ساده ترین روش استفاده از تابع PathFileExists هست .
مثال :
کد:
Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
Private Sub Form_Load()
Me.AutoRedraw = True
Me.Print CBool(PathFileExists("c:\windows\TASKMAN.exe"))
End Sub
موفق باشید .
آقا با این روش اگه فایل هم هـ ـاید یــا سیستمی باشه ، بازهم جواب میده ؟
سلام.
بله هیدن و سیستمی رو هم نشون میده.