دريافت فايل متني داس در VB6

[feredy]

:گریه: :عصبانی++: من يه فايل txt تحت Dos دارم و مي خوام اونو تو Vb6 دريافت كنم بانك اطلاعاتي من هم Access هست. لطفا راهنمايي كنيد و اگر كدي ارائه دهيد ممنون ميشم.
با تشكر از همه دوستان :قلب:

[reza_mn]

دریافت کنم یعنی چی ؟ میخاین اطلاعات داخل فایل تکست رو بریزین تو بانک اطلاعاتی >؟

[feredy]

با تشكر از شما كه توجه كردين، من فايل txt تحت Dos رو مي خوام در بانك اطلاعاتي Access دريافت كنم از طريق برنامه نويسي Vb6 اما وقتي كه دريافت مي كنم فونتهاي فارسي (اسامي) با كاراكترهاي ديگري ذخيره (مشاهده) ميشن. لطفا راهنمايي كنين، در Vb6 چيكار كنم. خيلي كارم گير كرده. :افسرده: :گریه:

[reza_mn]

دوست عزیز ببین کدوم یک ازلینکها به دردت میخوره
http://www.google.com/cse?cx=010277259273172057471%3Agbud9yj2nhi&q=%D8%AA%D8%A8%D8%AF%DB%8C%D9%84+%D8%A7%D8%B7%D9%8 4%D8%A7%D8%B9%D8%A7%D8%AA+%D8%AF%D8%A7%D8%B3&x=0&y=0

[mohsen002]

سلام دوست عزيز ميتوني از اين دستور استفاده كني:
dim var,lar
open "C:\123.txt" for input as #1
lar=lof(1)
var=input(lar,#1)
text1.text = var
close#1
با اين دستور ميتوني متن يه فايل txt رو به دست بياري.
موفق باشي

[reza_mn]

سلام دوست عزيز ميتوني از اين دستور استفاده كني:
dim var,lar
open "C:\123.txt" for input as #1
lar=lof(1)
var=input(lar,#1)
text1.text = var
close#1
با اين دستور ميتوني متن يه فايل txt رو به دست بياري.
موفق باشي
دوست عزیز ایشون در دریافت و بازخوانی اطلاعات مشکلی ندارن مشکل ایشون تبدیل کاراکترهای فارسی تحت محیط داس به کاراکترهای فارسی ویندوز هست .

[feredy]

لطفا اگه میشه کدی به من بدین تا بتونم از اون تو برنامه استفاده کنم. با vb6 هم باشه. من می تونم دریافت کنم ولی فونتهای فارسی مشکل دارن