Ben versem
csv dosyaları her satırda bir kayıt berlitir ve alanlar virgül ile ayrılır.
Örnek:
Kod:
Janberka,Mersin,1234
Dhilgul,Kocaeli,5678
Bu şekilde bir kayıt tuttuk diyelim.
absconder'ın örneğinden yola çıkarak yazıyorum:
Kod:
<%dim fso, file, ts
Set fso = server.CreateObject("scripting.FileSystemObject")
Set file = fso.GetFile(server.mappath("dosya.txt"))
Set ts = file.OpenAsTextStream(1)
do while not ts.AtEndOfStream
response.write("Kayıt:"&vbcrlf)
str = ts.ReadLine
arr = split(str, ",")
For i = 0 to CLng(UBound(arr))
Response.Write "Alan: "&arr(i)&vbcrlf
Next
loop
ts.Close%>
Şeklinde kullanabilirsiniz.
Not: Split komutu verilen string i girilen ayraça göre parçalara ayırır ve array döndürür.
Csv dosyaları ile ilgili daha fazla bilgi için
wiki