FileSystemObject를 사용하여 쿼리 출력을 텍스트 파일에 작성

Question

FileSystemObject를 사용하여 텍스트 파일에 쿼리 출력을 작성하는 방법이 있습니까?

Answer 1

쿼리 결과의 형식은 무엇입니까? 단순한 문자열이라면 이런 식으로 할 수도 있고 필요한 비트를 추출해야 할 수도 있습니다.

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