Guardar en un txt

[mamon]

Bueno tengo una pregunta, hago una conección a la BD y el resulatdo quiero que me lo guarde en un txt, cómo lo hago??

Gracias de Antemano

Giancarlo Loret de Mola (Mamon)

[wamoretti]

Set Rs = Cn.Execute("select * from TuTabla")
archivo = Server.MapPath("Archivos.txt")
Set fstemp = Server.CreateObject("Scripting.FileSystemObje ct")
Set filetemp= fstemp.CreateTextFile(archivo, True, False)
contador= Rs.Fields.Count-1
For i = 0 to Contador
Cabecera = Cabecera & Rs(i).Name & " "
Next
filetemp.Write Cabecera & vbCrLf
Do Until Rs.EOF
For i = 0 To Contador
If IsNull(Rs(i)) then
texto = texto & "" & Chr(9)
Else
texto = texto & Rs(i) & Chr(9)
End If
Next
filetemp.Writeline texto
texto = ""
Rs.MoveNext
Loop
filetemp.close
Set filetemp = Nothing
Set fstemp = Nothing
Set Rs = Nothing
%>

El chr(9) es igual a usar un TAB, osea que te separa los campos con una tabulacion

Espero te sirva el ejemplo

<OBJECT WIDTH=200 HEIGHT=50><PARAM NAME=movie VALUE="http://www.geocities.com/wamoretti/wamoretti.swf"><PARAM NAME=wmode VALUE=transparent><EMBED src="http://www.geocities.com/wamoretti/wamoretti.swf" wmode=transparent WIDTH=200 HEIGHT=50></EMBED></OBJECT