par Jérôme Deniau » 16 Jan 2014 à 17:26
Dim fullname as variant
dim doc as notesDocument 'récup du doc faite avant
dim employeeid as string
fullname = doc.getItemvalue("Fullname")
employeeId = doc.getItemValue("EmployeeId")(0)
if employeeid <> "" then
redim preserve fullname(ubound(fullname +1))
fullname(ubound(fullname)) = employeeid
call doc.replaceitemvalue("Fullname",fullname)
end if
Dernière édition par
Jérôme Deniau le 16 Jan 2014 à 17:45, édité 3 fois.