Kod:
Open App.Path & "/xd.txt" For Append As #1

Bu şekil , ' den herşeyine kadar kayıt ediyor

İnput ile okurken "," ve ","' den sonrasını es geciyor

Kod:
Open App.Path & "/xd.txt" For Input As #1

Neden boyle bir sorun yaşıyorum
__________________