ASP CreateTextFile ·½·¨

¶¨ÒåºÍÓ÷¨

CreateTextFile ·½·¨¿ÉÔÚµ±Ç°Îļþ¼ÐÖд´½¨ÐµÄÎı¾Îļþ£¬²¢·µ»Ø¿ÉÓÃÓÚ¶Á»òдÎļþµÄ TextStream ¶ÔÏó¡£

Óï·¨£º

FileSystemObject.CreateTextFile(filename[,overwrite[,unicode]])
FolderObject.CreateTextFile(filename[,overwrite[,unicode]])
²ÎÊý ÃèÊö
filename ±ØÐèµÄ¡£Ðè´´½¨ÎļþµÄÃû³Æ¡£
overwrite ¿ÉÑ¡µÄ¡£Ö¸Ê¾ÄÜ·ñ¸²¸ÇÒÑÓÐÎļþµÄ²¼¶ûÖµ¡£True ָʾ¿É¸²¸ÇÎļþ£¬False ָʾ²»Äܸ²¸ÇÎļþ¡£Ä¬ÈÏÊÇ True ¡£
unicode ¿ÉÑ¡µÄ¡£Ö¸Ê¾ÎļþÊÇ×÷Ϊ Unicode »¹ÊÇ ASCII ÎļþÀ´´´½¨µÄ²¼¶ûÖµ¡£True ָʾÎļþ×÷Ϊ Unicode Îļþ´´½¨£¬¶ø False ָʾÎļþ±»×÷Ϊ ASCII Îļþ´´½¨¡£Ä¬ÈÏÊÇ False¡£

Õë¶Ô FileSystemObject ¶ÔÏóµÄʵÀý

<%
dim fs,tfile
set fs=Server.CreateObject("Scripting.FileSystemObject")
set tfile=fs.CreateTextFile("c:\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("c:\test") 
Set tfile=fo.CreateTextFile("test.txt",false) 
tfile.WriteLine("Hello World!")
tfile.Close
set tfile=nothing
set fo=nothing
set fs=nothing
%>
VUE