5/16/2007 12:29 PM | |
Joined: 9/27/2005 Last visit: 11/27/2007 Posts: 1398 Rating: (151)
|
Just add a .WriteLine after each row. e.g. While Not obj_rs.Eof For col_number = 0 To obj_rs.Fields.Count - 1 If col_number = 0 Then obj_stream.Write obj_rs.Fields(col_number) Else obj_stream.Write "," & obj_rs.Fields(col_number) End If Next obj_rs.movenext Wend Salma |
10/18/2018 3:21 PM | |
Joined: 8/7/2013 Last visit: 4/23/2024 Posts: 10 Rating: (0) |
I've tried this code but it gives mi a TLG-API error, line 389, what does it mean? |
Follow us on