Método de copia ASP()

El método de copia ASP se utiliza para copiar un archivo o carpeta específicos de un lugar a otro. El atributo de sobrescritura se puede especificar para evitar o permitir la sobrescritura de archivos durante la operación de copia.

Sintaxis:

• Para objeto de archivo: 

  FileObject.Copy(destination, overwrite)

• Para objeto de carpeta:

  FolderObject.Copy(destination, overwrite)

Parámetros: este método tiene dos parámetros, como se mencionó anteriormente y se analiza a continuación:

• destino: Especifica la ruta de destino donde se copiará el archivo o la carpeta. Esto permite caracteres comodín. Este es un parámetro requerido.
• overwrite: Contiene un valor booleano que indica si un archivo o carpeta existente se puede sobrescribir o no. El valor predeterminado es verdadero. Este es un parámetro opcional.

Los siguientes ejemplos demuestran el método de copia ASP .

Ejemplo 1: El siguiente código demuestra el método ASP File.Copy.

<%
dim fs,f,ts
set fs=Server.CreateObject("Scripting.FileSystemObject")
  
'Getting the file to be copied
set f=fs.GetFile("d:\GFG.txt")
  
'Reading the contents of the file
set ts=f.OpenAsTextStream(1)
Response.Write("Original File Content: " & ts.ReadAll)
ts.Close
  
'Copying the file to the given path
'f.Copy("d:\geeks.txt", false)
  
Response.write("<br>" & "File is Copied!" & "<br>")
  
'Getting the copied file
set f=fs.GetFile("d:\geeks.txt")
  
'Reading the contents of the copied file
set ts=f.OpenAsTextStream(1)
Response.Write("Copied File Content: " & ts.ReadAll)
ts.Close
  
set f=nothing
set fs=nothing
%>

Producción:

Original File Content: This is a GeeksforGeeks example
File is Copied!
Copied File Content: This is a GeeksforGeeks example 

Ejemplo 2: El siguiente código demuestra el método ASP Folder.Copy.

<%
dim fs,f,ts
set fs=Server.CreateObject("Scripting.FileSystemObject")
  
'Getting the folder to be copied
set f=fs.GetFolder("d:\GFG")
  
'Copying the folder to the given path
f.Copy("d:\newfolder\GFG")
  
Response.write("Folder is Copied!")
  
'Getting the copied folder
set f=fs.GetFolder("d:\newfolder\GFG")
  
Response.write("<br>" & "Folder successfully accessed")
  
set f=nothing
set fs=nothing
%>

Producción:

Folder is Copied!
Folder successfully accessed