Fa خواندن از فایل متنی

[Ehssan_it]

سلام
بنده یک فایل متنی دارم که شامل حدود 350 خط می باشد هر خط شامل 6 رقم که با کاراکتر % از هم جدا شدند مانند

2:30%6:30%12:00%5:01%8:10%12:00

می خواهم هر کدام از این اعداد رو در 6 خط در پروژه نمایش دهم
یعنی عدد اول در خط اول و همینطور تا عدد اخری
مثل
2:30
6:30
.
.
.


هر کدوم از عزیزانی که همچین مثالی میتونه برام درست کنه ممنون میشم

 

[MahmoodM30]

میتونید به این شکل عمل کنید

arrayofstrings$='2:30%6:30%12:00%5:01%8:10%12:00%'
L$=CHR(13)+CHR(10)
For i=1 To 6
  GetArrayItem$=GetArrayItem(arrayofstrings$,'%',i)
  ST$=ST$+L$+GetArrayItem$
Next i
LoadText("Paragraph","ST$")

 

[Ehssan_it]

ممنون محمود جان
این مثالی که شما اوردی برای موقعی که یک یا چند خط از اعداد رو داریم خوبه
ولی من حدود 365 تا از اون رشته اعداد رو دارم
برای همین می خوام از یک فایل متنی خونده بشن
اگه برای این هم یک نمونه بزاری ممنون میشم


------------------------

می خوام یک متعیر متنی text ( که با یک اسکریپت مقدارش مشخص میشه ) رو بخونه و با توجه به اون عدد یکی از اون رشته اعداد فراخوانی بشن
به ترتیب هم از یک شروع میشه تا 365

یعنی اگه اون تکست 1 بود خط اول فایل متنی فراخوانی میشه
اگه 2 بود خط دوم
و . . .

 

[MahmoodM30]

اگه دقیق متوجه بشم منظورتون رو میتونید با یک حلقه اول سطر به سطر فایل متنی که میگید رو بخونید اون سطری که مد نظرتون هست و بعدش با همون کدی که نوشتم کار تون رو راه بندازید

البته باز اگه درست منظورتون رو متوجه شده باشم

 

[Ehssan_it]

خوب میشه اگه یک مثال برام بزارین
روش کار کردم ولی به نتیجه نرسیدم

 

[MahmoodM30]

این کد رو تست کنید

filename$='<SrcDir>\File.txt'
nol=NOL(filename$)
For i=1 To nol
  StrFromFile$=StrFromFile(filename$,1,i)
  **-------------------------------------------------------
  arrayofstrings$=StrFromFile$+'%'
  L$=CHR(13)+CHR(10)
  For j=1 To 6
    GetArrayItem$=GetArrayItem(arrayofstrings$,'%',j)
    ST$=ST$+L$+GetArrayItem$
  Next j
  LoadText("Paragraph","ST$")
Next i

 

[Ehssan_it]

تو این کدی که شما قرار دادی بنده خیلی دست بردم
یک فایل متنی با 6 خط برای نمونه ایجاد کردمه جای For i=1 To nol

سعی کردم به جای یک از یک cbk عدد رو بگیره ولی اصلا جواب نداد مثلا اگر خط چهارم رو نشان داده میشد 6 بار نمایش داده میشد در پاراگراف

از صبر و شکیبایی که در پاسخ به اینجانب خرج می کنید سپاسگذارم

 

[MahmoodM30]

اون فور دوم برای جدا کردن اون اعداد هست شما نمونتون رو بزارید من رفع ایراد کنم

 

[Ehssan_it]

پروژه ای که بنده مد نطر دارم برای ماه مبارک اماده کنم رو براتون پیوست کردم
می خوام ساعاتی که در فایل متنی قرار داده شده بنا بر روزی که توش هستیم ( شمسی ) در برنامه نمایش دادهع بشه

همچنین در فایل پیوست برنامه ای که تعداد روز های رد شده از سال ( که برای بدست اوردن شماره خط ) می خوام استفاده کنم رو قرار دادم
http://up.persianscript.ir/uploads/6c64-Desktop.rar

با تشکر

 

[MahmoodM30]

قبلا در این مورد من نمونه مثال ساختم و توی انجمن گذاشتم یه سرچی بکنید حتما کمکتون میکنه
در کل کار خلی آسونی هست فقط من وقط ندارم به خاطر امتحاناتم برای این نمیرسم نمونه بسازم

 

[Ehssan_it]

قبل اینکه سوالم رو بپرسم کل انجمن رو گشتم ولی برای نمونه خودم چیزی پیدا نکردم اگه ادرس مطلب خودتون رو که اشاره فرمودین بزاری شاید بهتر باشه

 

[Singular]

سلام
دوست عزیز .
فرض بر اینکه یک فایل تکست دارید و می خواهید با کد فایل متنی را به صورت ستونی بنویسید . ؟؟؟

و اینکه بعد داخل برنامه اگر 1 بود ردیف 1 بخونه

اگر 2 بود ردیف 2 را از فایل تکست بخونه؟؟؟



آیا همچین چیزی می خواهید؟؟؟؟

 

[MahmoodM30]

شما اوقات شرعی رو یه سرچی بزنی هست اصلا پلاگینشم هست که خود من ساختم

 

[Ehssan_it]

سلام
دوست عزیز .
فرض بر اینکه یک فایل تکست دارید و می خواهید با کد فایل متنی را به صورت ستونی بنویسید . ؟؟؟

و اینکه بعد داخل برنامه اگر 1 بود ردیف 1 بخونه

اگر 2 بود ردیف 2 را از فایل تکست بخونه؟؟؟



آیا همچین چیزی می خواهید؟؟؟؟

بله من یک کد دارم که تعداد روزهای گرشته از سال رو برای بدست اوردن شماره روز و شماره خط رو دارم
حالا می خوام با توجه به شماره ای که این کذ میده همون خط رو برام اظلاعاتش رو نشون بده
نمونه ای رو که مذ نظرم هست در صفحه اول پیوست کردم

 

[MahmoodM30]

من یه نمونه ساختم ببینید متوجه میشید

 

[Ehssan_it]

با تشکر از شما برای زحمت این کار
ولی من هر کار کردم چیزی نشون نمیده!
خروجی هم گرفتم ولی فایده ای نداشت

 

[MahmoodM30]

شما باید برید داخل پوشه فایل بعد اون فایل های تکست رو به تعداد ماه ها که 12 تا هست داخلش رو باز کنید و برای هر ماه که 30 روز و 31 روز دارند داده وارد کنید تا نشون داده بشه