Как изменить поле информации о пользователях IBM Lotus и название компании

Question

У меня есть один список пользователей от excel. Наш пользователь имеет общий идентификационный номер сотрудника в системе. Я хочу сравнить идентификатор сотрудника и, если совпадают с идентификатором сотрудника, он обновляет информацию о компании, название и отдел из списка excell. мне нужен один Лотоса скрипт, пожалуйста, помогите мне :)

Answer 1

Первое, что вам нужно сделать, это добавить новый вид, который индексируется Сотрудника ID в каталоге Domino Directory. Назовем его «Сотрудники по ID». Затем вам нужно будет написать код, который открывает базу данных каталога Domino:

dim s as new NotesSession 
dim myDb as new NotesDatabse("yourServer","names.nsf") 
myView = myDb.GetView("Employees by ID") 

После этого, ваш код будет читать записи из таблицы в переменные theEmployeeId, theDepartment и Thecompany, а затем код, как это:

dim doc as NotesDocument 
doc = myView.GetDocumentByKey(theEmployeeId) 
if not doc is nothing then 
    doc.ReplaceItemValue("Title",theTitle) 
    doc.ReplaceItemValue("Department",theDepartment) 
    doc.ReplaceItemValue("CompanyName",theCompany) 
    doc.Save(true,false,false) 
end if