Método ASP CreateTextFile()

El método ASP CreateTextFile se utiliza para crear un nuevo archivo de texto en la carpeta o directorio actual. Devuelve un objeto TextStream que se puede utilizar para realizar operaciones en el archivo.

Sintaxis:

• Para objeto de carpeta:

  FolderObject.CreateTextFile(filename, overwrite, unicode)

• Para el objeto del sistema de archivos:

  FileSystemObject.CreateTextFile(filename, overwrite, unicode)

Parámetros: esta propiedad tiene tres parámetros, como se mencionó anteriormente y se describe a continuación:

• filename: Especifica el nombre del archivo de texto que se creará nuevamente.
• overwrite: Contiene un valor booleano que indica si se puede sobrescribir un archivo existente. El valor verdadero indica que el archivo se puede sobrescribir y el falso indica que no se permite sobrescribir. El valor por defecto es verdadero. Es un parámetro opcional.
• unicode: contiene un valor booleano que indica si el archivo se crea como un archivo Unicode o ASCII. El valor verdadero indica que el archivo se crea como un archivo Unicode y un valor falso indica que se crea como un archivo ASCII. El valor predeterminado es falso. Es un parámetro opcional.

Los siguientes ejemplos muestran el método CreateTextFile de ASP .

Ejemplo 1: El siguiente ejemplo demuestra el método ASP Folder.CreateTextFile.

<%
dim fs,fo,tfile
Set fs=Server.CreateObject("Scripting.FileSystemObject")
  
'Getting the folder where the file has to be created
Set fo=fs.GetFolder("d:\GFG")
  
'Creating a new text file
Set tfile=fo.CreateTextFile("GFG.txt",false)
  
'Writing a line to the file
tfile.WriteLine("Hello Geeks!")
  
'Closing the file
tfile.Close
  
Response.write("A new textfile has been created!")
  
'Reading the new text file
Set tfile=fs.OpenTextFile("d:\GFG\GFG.txt", 1)
Response.Write("<br>The File Contents are: " & tfile.ReadAll)
tfile.Close
  
set tfile=nothing
set fo=nothing
set fs=nothing
%>

Producción:

A new textfile has been created!
The File Contents are: Hello Geeks! 

Ejemplo 2: El siguiente ejemplo demuestra el método ASP FileSystemObject.CreateTextFile.

<%
dim fs,txtfile
set fs=Server.CreateObject("Scripting.FileSystemObject")
  
'Creating the text file at the given path
set txtfile=fs.CreateTextFile("D:\gfg.txt")
  
'Writing a line to the file
txtfile.WriteLine("Hello World!")
  
'Closing the file
txtfile.Close
  
Response.Write("The new text file has been created!")
  
'Reading the new text file
Set txtfile=fs.OpenTextFile("d:\GFG.txt", 1)
Response.Write("<br>The File Contents are: " & txtfile.ReadAll)
txtfile.Close
  
set txtfile=nothing
set fs=nothing
%>

Producción:

The new text file has been created!
The File Contents are: Hello World!