sub main()
dim s as new adodb.stream
s.charSet = "utf-8"
s.open
s.loadFromFile("dosya yolu ve adı")
dim txt as string
txt = s.readText
s.close
'aktarma işlemi
end sub
Txt Dosyasından Bilgi Alma
Konuyu Okuyanlar: 1 Ziyaretçi