Запись вывода запроса в текстовый файл с помощью FileSystemObject

Question

Есть ли способ написать вывод запроса в текстовый файл с помощью FileSystemObject?

Answer 1

Каков формат результатов запроса? вы можете сделать что-то вроде этого, если это простая строка, или вам, возможно, придется извлечь нужные вам биты.

Вот код, чтобы записать строку в текстовый файл с помощью FileSystemObject:

Const fsoForAppend = 8 

Dim objFSO 
Dim queryResult 

queryResult = 'OMG no results' 

Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 

'Open the text file 
Dim objTextStream 
Set objTextStream = objFSO.OpenTextFile("C:\path\to\logfile.txt", fsoForAppend) 

'Write the results to the textfile 
objTextStream.WriteLine queryResult 

'Close the file and clean up 
objTextStream.Close 
Set objTextStream = Nothing 
Set objFSO = Nothing