Load

Descripción

Escribe el contenido del objeto en el archivo especificado.

Puede utilizar este método para extraer un archivo adjunto de la base de datos y guardarlo en el sistema de archivos local. Si ya existe un archivo con el mismo nombre en la vía de acceso especificada en el parámetro del nombre de archivo, el archivo se debe poder escribir y el contenido existente se reemplaza. El archivo extraído no es un archivo temporal; persiste una vez que ha terminado el proceso que utiliza esta API.

Sintaxis

VBScript

attachment.Load filename 

Perl

$attachment->Load(filename); 
Identificador
Descripción
attachment
Un objeto Attachment que representa el archivo de datos adjuntos de un archivo en un registro.
fileName
Un valor String que contiene el nombre de vía de acceso del archivo que se desea escribir. Este nombre de vía de acceso puede ser una vía de acceso absoluta o relativa.
Valor de retorno
Un valor Boolean cuyo valor es True si el operación es satisfactoria y, de lo contrario, es False.

Ejemplos

VBScript

' This example assumes there is at least 1 attachment field 
' and 1 attachment associated with the record. 
set currentSession = GetSession
set attachFields = AttachmentFields 
set attachField1 = attachFields.Item(0) 
set theAttachments = attachField1.Attachments 
x = 1
For each attachment in theAttachments 
   thefileName = "C:\attach" & x & ".txt" 
   x=x+1
'  Write the file
   status = attachment.Load (thefileName)
Next 

Perl

# This example assumes that there is at least 1 attachment
# field associated with the record. Otherwise, 
# GetAttachmentFields won't return anything interesting 
# and an error would be generated

# Get the collection of attachment fields
$attachfields = $entity->GetAttachmentFields();

# Get the first attachment fields
$attachfield1 = $attachfields->Item(0)

# Now get the collection of attachments from the attachments field
$attachments = $attachfield1->GetAttachments();

# Retrieve the number of attachments for the for loop
$numattachments = $attachments->Count();

for ($x = 0 ; $x < $numattachments ; $x++)
 {
 # Retrieve the correct attachment
 $attachment = $attachments->Item($x);

 # Select a filename to write to
 $filename = "C:\\attach".$x.".txt";

 # Write the file
 $status = $attachment->Load($filename);
 } 

Feedback