کنترل اینکه یک فایل در یک آدرس مشخص موجود هست یا نه

[ali_1234]

سلام دوستان من یه سوال داشتم و اونم اینکه چطوری می شه فهمید که یک فایل مثلا" data.db در یک آدرس مشخص موجود هست یا نه.
با تشکر..............:متفکر:

[aryasoft2872]

Function File_Exists(ByVal PathName As String, Optional Directory As Boolean) As Boolean
If PathName <> "" Then
If IsMissing(Directory) Or Directory = False Then
File_Exists = (Dir$(PathName) <> "")
Else
File_Exists = (Dir$(PathName, vbDirectory) <> "")
End If
End If

End Function
از این فانکشن می تونی استفاده کنی که نیازی به توضیح نداره.

[M.T.P]

از تابع Dir استفاده کن اگه فایل موجود باشه خروجی تابع میشه اسم فایلت در غیر اینصورت خروجی برابرست با nullstring یا همون "":چشمک:




Dim FilePath as string
FilePath = "C:\Data.db"
Msgbox Dir(FilePath)

[ali_1234]

سلام دوست عزیز aryasoft2872 روم سیا:خجالت: فکر کنم اگه یکم توضیح بدی خیلی خوب بشه
ممنون:متفکر:.......

[ali_1234]

سلام دوست عزیز persianlord مشکلم تقریبا" حل شد. فقط یه سوال داشتم اونم اینکه چطور می شه فهمید که زبان فارسی در ویندوز نصب هست یا نه.
دوست عزیز aryasoft2872 از شما هم تشکر می کنم که به سوالات من جواب می دین.:بوس:
ممنون...................

[xxxxx_xxxxx]

سلام، پیش از ایجاد تاپیک جستجو کنید.
تشخیص وجود فایل (http://barnamenevis.org/forum/showthread.php?t=168663)
http://barnamenevis.org/forum/showpost.php?p=837570&postcount=4


فقط یه سوال داشتم اونم اینکه چطور می شه فهمید که زبان فارسی در ویندوز نصب هست یا نه.

طبق قوانین سایت هر سؤال بایست در یک تاپیک مطرح شود.