Parsi Coders
حل مشکل باز نشدن فایل های space دار و رفع پیغام file not found - نسخه قابل چاپ

+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Visual Basic Programming (http://parsicoders.com/forumdisplay.php?fid=39)
+---- انجمن: Visual Basic 6 (http://parsicoders.com/forumdisplay.php?fid=44)
+---- موضوع: حل مشکل باز نشدن فایل های space دار و رفع پیغام file not found (/showthread.php?tid=813)



حل مشکل باز نشدن فایل های space دار و رفع پیغام file not found - Amin_Mansouri - 08-29-2011

درود
این مبحثی که میزارم تا جایی که دیدم در هیچ فرومی روش بحث نشده یا توضیحی داده نشده
حتی تو فروم های خارجی هم خیلی این سوال ساده رو پرسیدن ...
خدا رو شکر بیشتر وبلاگ ها فروم ها کارشون کد 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 هستن رو باز کنیم .

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