ASP에서 텍스트 파일 내용 읽고 쓰기

출처 : http://blog.naver.com/withakiss?Redirect=Log&logNo=140009536877
직접적인 출처는 위에 썼지만, 실제 출처는 코리아점컴일 거 같다.


ASP에서 텍스트 파일 내용 읽고 쓰기

저자: Ryan S. |  날짜: 2001년 08월 16일

이 강의는 ASP에서 텍스트 파일에 있는 내용을 읽어 들이거나, 텍스트 파일에 어떤 내용을 기록하고자 하는 사람들이 알아야 할 내용을 다룬 글이다. 이 강의를 읽기 전에 다음 글을 먼저 읽으면 도움이 될 것이다.

• FileSystemObject(FSO)의 모든 것

파일 시스템에 접근하려면 우선 다음과 같이 FSO 객체를 생성해야 한다.

set FSO = Server.CreateObject("scripting.FileSystemObject")

다음으로 아무 것도 들어 있지 않는 텍스트 파일을 하나 만들려면 다음과 같이 하면 된다.

set myFile = fso.CreateTextFile("C:\test.txt", true)

CreateTextFile은 지정해 준 경로의 파일 이름으로 빈 파일을 하나 만들어 준다. 이 메쏘드의 첫 번째 파라미터는 생성될 파일의 경로이고, 두 번째 파라미터는 지정해준 파일이 존재하지 않을 경우 파일을 생성할 것인지 아닌지를 결정해주는 불린 값이다.

다음으로 만들어진 파일에 어떤 내용을 기록해 보도록 하자. 다음과 같은 코드를 작성해 보도록 하자.

myFile.WriteLine("코리아인터넷닷컴에 오신 것을") myFile.WriteLine("환영합니다!!!")

.WriteLine 메쏘드는 지정된 텍스트 파일에 텍스트 내용을 기록한다.

파일의 내용을 다 기록했다면 열려진 파일을 닫아야 한다. 파일을 닫는 작업은 다음과 같이 해준다.

myFile.Close

이제 텍스트 파일의 내용을 읽어 들이는 작업을 해보도록 하자. 이 작업을 하기 전에 먼저 다음과 같은 상수를 먼저 선언해 두도록 하자.

Const ForReading = 1, ForWriting = 2, ForAppending = 8

이 상수들은 텍스트 파일을 열 때에 어떤 모드로 열어야 할지를 알려주는 역할을 한다.

텍스트 파일에서 텍스트 내용을 읽어들일 때도 만찬가지로 먼저 FSO 객체를 다음과 같이 생성해야 한다.

set fso = server.CreateObject("Scripting.FileSystemObject")

이제 접근하고자 하는 파일에 대한 접근 권한을 다음과 같이 얻어보도록 하자.

set f = fso.GetFile("C:\test1.txt")

이제 이 파일을 다음과 같이 텍스트 스트림으로 열도록 한다.

set ts = f.OpenAsTextStream(ForReading, -2)

이제 열려진 파일에서 한 줄씩 텍스트 내용을 읽어들여 보도록 하자.

TextStreamTest = ts.ReadLine

이 내용을 기본으로 하여 텍스트 파일의 모든 내용을 읽어들이고자 한다면 어떻게 하면 좋을까? 방법은 다음과 같이 해주면 된다.

Do While not ts.AtEndOfStream      myText = myText & ts.ReadLine & vbCrLf Loop

위의 코드는 텍스트 내용이 있을 때까지 한 줄씩 읽어들여 라인 브레이크를 끝에 붙인 다음 myText란 변수에 저장하는 것이다.

지금까지 작업한 내용을 테스트 해보고 싶다면 저장하고 싶은 텍스트 내용을 아래 텍스트 박스에 기록한 다음 아래 링크를 클릭해 보기 바란다.

• 아래 내용을 텍스트 파일로 저장하기

텍스트 파일에 기록하고 싶은 내용을 이 곳에 기록하세요.