AYUDA EN LÍNEA
 WINDEVWEBDEV Y WINDEV MOBILE

Este contenido se ha traducido automáticamente.  Haga clic aquí  para ver la versión en inglés.
Ayuda / WLanguage / Funciones WLanguage / Comunicación / Funciones Lotus Notes / Funciones Notes
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReportes y ConsultasCódigo de Usuario (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Código Navegador
WINDEV Mobile
AndroidWidget Android iPhone/iPadIOS WidgetApple WatchMac CatalystUniversal Windows 10 App
Otros
Procedimientos almacenados
Extrae un archivo adjunto a un artículo del actual Document en Lotus Notes. Este archivo se copia automáticamente en la ubicación especificada.
Ejemplo
// Open the connection
ConnectionID is int
ConnectionID = NotesOpenConnection("Password", "MarsServer", ...
"C:\Users\Julia\AppData\Local\Lotus\Notes\Data\user.id")
// Specify the Lotus Notes database to use
DatabaseID is int
DatabaseID = NotesOpenDatabase(ConnectionID, "julia.nsf")
...
// Read the first document
NotesDocumentFirst(DatabaseID)
...
// Attach a file to the current document
FileNum is int
FileNum = NotesAddAttachment(DatabaseID, "MyLotusNotesItem", ...
"C:\MesDocuments\MyFile.TXT")
...
// Extract this file
NotesExtractAttachment(DatabaseID, "MyLotusNotesItem", FileNum, "D:\MyFiles\FileA.TXT")
// Open the connection
ConnectionID is int
ConnectionID = NotesOpenConnection("Password", "MarsServer", ...
"C:\Users\Julia\AppData\Local\Lotus\Notes\Data\user.id")
// Specify the Lotus Notes database to use
DatabaseID is int
DatabaseID = NotesOpenDatabase(ConnectionID, "julia.nsf")
...
// Read the first document
NotesDocumentFirst(DatabaseID)
...
// List the files attached to the Lotus Notes item named "MyLotusNotesItem"
FileList is string
FileList = NotesListAttachment(ConnectionID, "MyLotusNotesItem")
...
// For each attached file
AFile is string
i is int = 1
FOR EACH STRING AFile OF FileList SEPARATED BY CR
// Copies the attached file into the project directory
NotesExtractAttachment(DatabaseID, "MyLotusNotesItem", i, fExeDir() + ["\"] + AFile)
i++
END
Sintaxis
<Result> = NotesExtractAttachment(<Session identifier> , <Lotus Notes item> , <File index> , <Location of copied file>)
<Result>: booleano
  • True si se extrajo el archivo,
  • False en caso contrario. Si se produce un error, la variable ErrorOccurred se pone en True.
    Para obtener más información sobre el error, utilice la función ErrorInfo con la constante errMessage.
<Session identifier>: Integro
Identificación de la sesión que se va a utilizar. Este identificador es devuelto por EmailStartNotesSession o NotasOpenDatabase.
<Lotus Notes item>: Cadena de caracteres
Nombre del elemento "Texto enriquecido" de Lotus Notes al que se adjunta el archivo. En la mayoría de los casos, este control corresponde al control "CUERPO".
Para conocer el nombre y el tipo de los elementos de las notas actuales Document, utilice NotesListItem.
<File index>: Integro
Índice del archivo a extraer. Este índice corresponde al rango del archivo en la lista de archivos del elemento de Lotus Notes (por ejemplo, el índice del tercer archivo adjunto será 3).
Atención: Los índices de los archivos se modifican cuando se elimina un archivo.
<Location of copied file>: Cadena de caracteres
Nombre y ruta completa del archivo a extraer.
Observaciones
Cada elemento de un Document de notas puede contener hasta 256 archivos adjuntos.
Componente: wd290mess.dll
Versión mínima requerida
  • Versión 11
Esta página también está disponible para…
Comentarios
Haga clic en [Agregar] para publicar un comentario

Última modificación: 27/05/2022

Señalar un error o enviar una sugerencia | Ayuda local