حذف اعداد داخل یک فایل متنی

[harem]

سلام دوستان
از طریق چه کدی میشه کاری کرد که اعداد داخل یک فایل متنی حذف شوند؟
برای یک کاراکتر خاص مثل (<) چطور؟

 

[the_king]

سلام دوستان
از طریق چه کدی میشه کاری کرد که اعداد داخل یک فایل متنی حذف شوند؟
برای یک کاراکتر خاص مثل (<) چطور؟

همه کاراکتر هایی که قراره حذف بشوند رو در رشته $remove بنویسید و در $filename مسیر فایل متنی
رو مشخص کنید و سپس کد زیر رو اجرا کنید :

remove$ = '0123456789<>'
filename$ = 'file.txt'
text$ = StrFromFile(filename$, -1, -1)
n = LEN(remove$)
nothing$ = ''
For i = 1 To n
  ch$ = StrGet(remove$, i)
  text$ = StrChange(text$, ch$, nothing$)
Next i
result = StrToFile(filename$, text$, FALSE, FALSE)