컴퓨터2007. 2. 1. 19:23
스크립트는 다음과 같습니다.
Dim fso, Myfile, FileName
FileName = "c:\makedFile.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile(FileName , True)
MyFile.WriteLine("테스트입니다.")
MyFile.Close


문법 : object.CreateTextFile( filename [, overwrite [, unicode]] )

Dim fso, Myfile, FileName
=> 변수를 선언합니다.
FileName = "c:\makedFile.txt"
=> 만들 파일명을 지정합니다.
Set fso = CreateObject("Scripting.FileSystemObject")
=> 개체를 생성합니다.
Set MyFile = fso.CreateTextFile(FileName , True)
=> CreateTextFile 를 이용해서 기존파일이 있으면 덮어씌우는 것을 기준으로 Myfile 에 할당합니다.
MyFile.WriteLine("테스트입니다.")
=> 글을 줄단위 기준으로 작성을 합니다.
MyFile.Close
=> 사용한 Myfile 의 사용을 닫습니다.
Posted by Zasfe

댓글을 달아 주세요