VB 生成CSV文件解决方法
VB 生成CSV文件
从ACCESS数据库里查询出一些数据，需要创建一个CSV文件，将这些数据写入到CSV文件里。具体该怎么做？
希望能给出代码 谢谢！
------解决方案--------------------
dim f as integer
f=freefile()
open "dat.csv" for output as #f
print #f,CStr(1)+","+Chr(34)+"str"+Chr(34)
close #f
'以上代码产生一个dat.csv文件，里面有一行数据
1,"str"
即一个数字1和字符串str
------解决方案--------------------
假定你查出的数据在记录集 rs 中：
Dim tmp
tmp = rs.GetString(, , ",", vbCrLf)
Open "c:\test.csv" For Output As #1
Print #1, tmp
Close #1
------解决方案--------------------
------解决方案--------------------
顶个...学习了...
从ACCESS数据库里查询出一些数据，需要创建一个CSV文件，将这些数据写入到CSV文件里。具体该怎么做？
希望能给出代码 谢谢！
------解决方案--------------------
dim f as integer
f=freefile()
open "dat.csv" for output as #f
print #f,CStr(1)+","+Chr(34)+"str"+Chr(34)
close #f
'以上代码产生一个dat.csv文件，里面有一行数据
1,"str"
即一个数字1和字符串str
------解决方案--------------------
假定你查出的数据在记录集 rs 中：
Dim tmp
tmp = rs.GetString(, , ",", vbCrLf)
Open "c:\test.csv" For Output As #1
Print #1, tmp
Close #1
------解决方案--------------------
------解决方案--------------------
顶个...学习了...