IBM Lotus Symphony


Примеры

Перечисляет несколько примеров исходного кода VBA. Их можно изменить в IDE Lotus® Symphony™ Basic.

Открытие нового документа электронной таблицы и изменение содержимого ячейки

Введите следующий исходный код в редактор:
Private Sub CommandButton1_Click()
    Dim wkb As Workbook
    
    Set wkb = Workbooks.Add
    wkb.Sheets(1).Range("A1") = Now
End Sub

Открытие базы данных Lotus Notes® посредством API VBA COM

Для выполнения этой задачи требуется, чтобы в системе был установлен Lotus Notes®. Введите следующий исходный код в редактор:
Sub OpenNotesDatabase()
	Dim notes_server As String
	Dim notes_database As String
	Dim password As String

	notes_server = "127.0.0.1"
	notes_database = "mail\test.nsf"
	password = "hello"

	Set notes_session = CreateObject("lotus.NOTESSESSION")
	Call notes_session.Initialize(password)
	Set notes_db = notes_session.GETDATABASE(notes_server, notes_database)
End Sub

Комментарии по продукту | Дополнительная документация | Товарные знаки