Fa تغییر متن فایل تکست

[Singular]

سلام به همه دوستان



فرض فایل تکستی با متن زیر داریم

45
4545-44-44-
54444444
5445

چطور میتونم بگم خط دوم فایل را اون متن 44 سومی را به 0000 تغییر بده و ذخیره کنه

یعنی بشه این

45
4545-44-0000-
54444444
5445


نکته : 44 ثابت نیست..ممکنه چیز دگ باشه

 

[amin2dpr]

[/COLOR]code$='-4545-44-44-'
code$=StrDel(code$,10,99)
code$=code$+'0000'
[COLOR=#333333]

البته این کد بنا به نوع متغییر عددی که دارید ممکنه تغییر کنه.
​

 

[MahmoodM30]

خب اگه اون سطر مورد نظر ثابت باشه و همیشه سطر دوم باشه میتونید با استفاده از همون تابع StrFromFile به راحتی سطر مورد نظر رو فراخوانی کنید. بعد از اینکه فراخوانی کردید میتونید با استفاده از تابع GetArrayItem و بر اساس جدا ساز - داده اول و دوم رو بدست بیارید و بعد با 0000 جمع کنید و بعد تو یه متغییر دیگه ذخیره کنید و بعدش با استفاده از تابع StrToLine تو خط مورد نظر از فایل تکست ذخیره کنید.

 

[Singular]

خب اگه اون سطر مورد نظر ثابت باشه و همیشه سطر دوم باشه میتونید با استفاده از همون تابع StrFromFile به راحتی سطر مورد نظر رو فراخوانی کنید. بعد از اینکه فراخوانی کردید میتونید با استفاده از تابع GetArrayItem و بر اساس جدا ساز - داده اول و دوم رو بدست بیارید و بعد با 0000 جمع کنید و بعد تو یه متغییر دیگه ذخیره کنید و بعدش با استفاده از تابع StrToLine تو خط مورد نظر از فایل تکست ذخیره کنید.

من میخوام روی همون فایل تکست و روی همون خط ذخیره بشه...یعنی اون خط ویرایش بشه...

نه که اون خط باشه ی خط دگ هم اضافه بشه


با توجه به گفته شما...یه همچین حالتی در میاد....
45
4545-44-44-
54444444
5445
----------------------------------
45
4545-44-44-
4545-44-0000-
54444444
5445


من اینطوری میخوام ویرایش بشه


45
4545-44-44-
54444444
5445
----------------------------------
45
4545-44-0000-
54444444
5445

 

[MahmoodM30]

اونطوری که شما میخوایید هم میشه شما کد هاتون رو اشتباه نوشتین

filename$='c:\users\mahmoodm30\desktop\m.txt'
StrFromFile$=StrFromFile(filename$,2,1)
GetArrayItem1$=GetArrayItem(StrFromFile$,'-',1)
GetArrayItem2$=GetArrayItem(StrFromFile$,'-',2)
GetArrayItem$=GetArrayItem1$+'-'+GetArrayItem2$+'-'+'0000'
StrToLine=StrToLine(filename$,GetArrayItem$,2,1)