如何从SQLserver中读取数据生成一个文本文件

将数据库中的数据按照规定输出到TEXT文件里.文本文件中每一行代表一条数据记录。高分求教!
---------------------------------------------------------------

FSO
---------------------------------------------------------------

先从数据库中把数据读出,然后用fso的writeline方法写入文本就可以,当然这样如果你的数据量很大的话,就不是很理想的了,不过你可以先把它负给一个变量,然后对变量进行处理,最后在用write方法写入,可能会好点!
---------------------------------------------------------------

Set fso = Server.Createobject("FileSystemObject")
Set MyTextFile = fso.CreateTextFile(fPath, True)

If (Not rec.EOF) Then
Do While (Not rec.EOF)
tempstr = "一条记录"
MyTextFile.WriteLine (tempstr)
rec.MoveNext
Loop
End If
---------------------------------------------------------------

数据量再大也可以。
1)先从数据库中把数据读出记录,保存到变量中:
val1=rs("field1")
val2=rs("field2")
...
valn=rs("fieldn")
2)然后用fso的writeline方法写入文本文件:

 1   
 2Set AFileSystemObject = CreateObject("Scripting.FileSystemObject")   
 3Set ATextStream = AFileSystemObject.CreateTextFile("C:\test\test.txt",true)   
 4ATextStream.WriteLine(val1)   
 5ATextStream.WriteLine(val2)   
 6...   
 7ATextStream.WriteLine(valn)   
 8ATextStream.Close   
 9on error resume next   
10if err<>0 then   
11Response.write "错误:"&err.Description   
12else   
13Response.write "数据库写入完毕!"   
14end if   
Published At
Categories with Web编程
Tagged with
comments powered by Disqus