วิธี CreateTextFile ของ ASP

คู่มืออ้างอิง Folder Object

คำนิยามและวิธีใช้

วิธีการ CreateTextFile สร้างแฟ้มข้อความใหม่ในไดเรกทอรีปัจจุบัน และกลับคืนตัวแปล TextStream ที่สามารถเขียน/อ่านแฟ้มได้

รูปแบบ

FileSystemObject.CreateTextFile(filename[,overwrite[,unicode]])
FolderObject.CreateTextFile(filename[,overwrite[,unicode]])
ตัวแปร คำอธิบาย
filename จำเป็น. ชื่อแฟ้มที่ต้องการสร้าง
overwrite เลือกตั้งได้. ชี้ว่าจะทำการปกปิดแบบ True หรือ False. True หมายถึงจะปกปิดได้ และ False หมายถึงจะไม่ปกปิดได้ โดยเริ่มต้นค่าเป็น True。
unicode เลือกตั้งได้. ชี้ว่าจะสร้างแบบ Unicode หรือ ASCII โดย True ชี้ว่าจะสร้างแบบ Unicode และ False ชี้ว่าจะสร้างแบบ ASCII โดยเริ่มต้นค่าเป็น False。

ตัวอย่าง

เพื่อตัวแปล File

<%
dim fs,tfile
set fs=Server.CreateObject("Scripting.FileSystemObject")
set tfile=fs.CreateTextFile("d:\somefile.txt")
tfile.WriteLine("Hello World!")
tfile.close
set tfile=nothing
set fs=nothing
%>

เพื่อตัวแปล Folder

<%
dim fs,fo,tfile
Set fs=Server.CreateObject("Scripting.FileSystemObject") 
Set fo=fs.GetFolder("d:\test") 
Set tfile=fo.CreateTextFile("somefile.txt",false)
tfile.WriteLine("Hello World!")
tfile.Close
set tfile=nothing
set fo=nothing
set fs=nothing
%>

คู่มืออ้างอิง Folder Object