PDA

View Full Version : مشکل عجیب باخواندن ازفایل



mohandess le
شنبه 20 فروردین 1390, 23:56 عصر
سلام دوستان خسته نباشید
من یک برنامه نوشتم که درآن اطلاعات کاربر رادر یک فایل متنی می نوشتم وازآن هم به راحتی میخواندم
(بدرستی عمل میکرد )اماوقتی همان کدها رو روی لپ تاپ باویندوز7نوشتم زمانیکه فایل راجداازبرنامه ،خودم باnotpadبازکنم ژاپنی نشون میده اگرباwordبازکنم درست نشون میده ودربرنامه ام باmessageboxازش میخوام یوزرنیم رو که ازفایل خونده نشونم بده کادر خالی ظاهر میشه !بنظرشما مشکل ازکجاست؟اینم کد خواندن ازفایل




Dim a As String








Dim b As String








Dim filenum As Integer








Dim user1 As user




filenum = FreeFile()


FileOpen(filenum,



"F:\project\myprojec\myproject\user.txt", OpenMode.Random)



user1 =



New user




FileGet(filenum, user1, 1)


a = user1.username


b = user1.password


FileClose()






MessageBox.Show(a)

bhasoft
یک شنبه 21 فروردین 1390, 15:24 عصر
دوست عزيز حتما بايد فايل شما يك فايل تكست باشه؟
براي چه چيزي از اين فايل استفاده ميكنيد؟
به جاي ديتا بيس؟
اگه براي پايگاه داده از اين فايل استفاده ميكنيد بايد بگم اصلا اصولي نيست.بهتره از ديتابيس استفاده كنين.مانند access ، SQl ، Oracle و امثال اينها.
كاري هم نداره استفاده از اين پايگاهها.
اگه بخواين يك نمونه برنامه كوچك براتون ميزارم تا كدهاشو ياد بگيرين.هم دستور آپديت.درج.حذف و جستجو...
اگه موافق بودين اطلاع بدين.

HackersKing
یک شنبه 21 فروردین 1390, 15:59 عصر
سلام دوستان خسته نباشید
من یک برنامه نوشتم که درآن اطلاعات کاربر رادر یک فایل متنی می نوشتم وازآن هم به راحتی میخواندم
(بدرستی عمل میکرد )اماوقتی همان کدها رو روی لپ تاپ باویندوز7نوشتم زمانیکه فایل راجداازبرنامه ،خودم باnotpadبازکنم ژاپنی نشون میده اگرباwordبازکنم درست نشون میده ودربرنامه ام باmessageboxازش میخوام یوزرنیم رو که ازفایل خونده نشونم بده کادر خالی ظاهر میشه !بنظرشما مشکل ازکجاست؟اینم کد خواندن ازفایل




Dim a As String








Dim b As String








Dim filenum As Integer








Dim user1 As user




filenum = FreeFile()


FileOpen(filenum,



"F:\project\myprojec\myproject\user.txt", OpenMode.Random)



user1 =



New user




FileGet(filenum, user1, 1)


a = user1.username


b = user1.password


FileClose()






MessageBox.Show(a)


با سلام شما دستور IO.File.ReadAllText رو امتحان کردی ؟

koorosh-soft
یک شنبه 21 فروردین 1390, 17:58 عصر
کجا کار نداره ما که پیر شدیم تو .net نفهمیدیم این دیتا بیسش چی به چیه!

mohandess le
یک شنبه 21 فروردین 1390, 19:34 عصر
ممنون دوست عزیز ازراهنماییتون:لبخندساده: فقط برای این ازفایل استفاده کردم که کاربری که توی فرم اولlogin کرده اطلاعات مختصری از اون روبریزم توی فایل تادر فرمهای بعدی بتونم بشناسمش،بادیتابیسم خوبم وکل کارم بادیتابیس است شاید نظرتون اینه که بجای فایل توی یک دیتابیس دیگه ذخیره کنم؟اگه راه بهتری برام سراغ دارید ممنون میشم راهنماییم کنید .
راستی اینم بگم که کل کدهاروپاک کردم جابجاکردم مشکل حل شد،ازاینکه به سوالم توجه کردیدممنون