Parsi Coders

نسخه‌ی کامل: حل مشکل باز نشدن فایل های space دار و رفع پیغام file not found
شما در حال مشاهده نسخه آرشیو هستید. برای مشاهده نسخه کامل کلیک کنید.
درود
این مبحثی که میزارم تا جایی که دیدم در هیچ فرومی روش بحث نشده یا توضیحی داده نشده
حتی تو فروم های خارجی هم خیلی این سوال ساده رو پرسیدن ...
خدا رو شکر بیشتر وبلاگ ها فروم ها کارشون کد copy paste کردن هست
متاسفانه وقتی بخواهیم فایلی رو به این اسم باز کنیم
کد:
C:\Amin Mansouri\parsa.txt
فایل شناسایی نمیشه ولی این ادرس در اکسپلور ویندوز نمیاش داده میشود اما چرا این فایل باز نیمشود ؟
در واقع بین کلمه amin و منصوری عبارت فاصله با همون Back Space نیست کد اسکی 0 هست یا همان
کد:
chr(0)
هست برای حل این مشکل باید از این تابع به این صورت زیر استفاده کنیم
کد:
Public Function StripNulls(OriginalStr As String) As String
     If (InStr(OriginalStr, Chr(0)) > 0) Then
         OriginalStr = Left(OriginalStr, InStr(OriginalStr, Chr(0)) - 1)
     End If
     StripNulls = OriginalStr
End Function

با تابع StripNulls مشکلمون حل میشه و میتونیم ادرس های که دارای back space هستن رو باز کنیم .

نویسنده مطلب : امین منصوری
موفق باشید