База коммутатор

Тема в разделе "Lotus - Программирование", создана пользователем -, 23 ноя 2009.

Статус темы:
Закрыта.
  1. Гость

    Создаю новую форму в которую занашу информацию о БД

    Не работают строчки

    Код (Text):
    Call main.ReplaceItemValue( "Forms", db.Forms)
    Поле Forms не получает значения Items БД в чем проблема помогите

    Вот полны

    Код (Text):
    Sub AddDatabase (db As NotesDatabase)
    Dim wspace As New NotesUIWorkspace, uid As NotesUIDocument
    Dim Form As String
    Form = "Database"
    Dim main As notesDocument
    Dim session As New NotesSession
    Set main = New NotesDocument(session.CurrentDataBase)    
    main.form = Form     

    Call main.ReplaceItemValue( "ReplicaID", db.ReplicaID)
    Call main.ReplaceItemValue( "Address", db.FilePath)
    Call main.ReplaceItemValue( "Template", db.TemplateName)    
    Call main.ReplaceItemValue( "Forms", db.Forms)

    Call main.ReplaceItemValue( "Views",    db.Views)  
    Call main.ReplaceItemValue( "Agents",   db.Agents)  

    Call main.ReplaceItemValue( "Title",    db.Title)  
    Call main.ReplaceItemValue( "Categories",   db.Categories)  
    Call main.ReplaceItemValue( "Design",   db.DesignTemplateName)  
    Call main.Save( False, False )

    End Sub
     
  2. RAJ

    RAJ Well-Known Member

    Регистрация:
    17 янв 2007
    Сообщения:
    440
    Симпатии:
    0
    хелп вам в помощь
    Код (Text):
    Sub Initialize
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Set db = session.CurrentDatabase
    Forall form In db.Forms
    Messagebox form.Name
    End Forall
    End Sub
     
  3. TIA

    TIA :-)
    Lotus team

    Регистрация:
    15 май 2009
    Сообщения:
    790
    Симпатии:
    0
    Посмотри в хелпе, какого типа данные возвращают св-ва db.Forms, db.Agents, db.Views. Они возвращают массивы объектов, а не строк.
     
  4. hosm

    hosm * so what *

    Регистрация:
    18 май 2009
    Сообщения:
    2.450
    Симпатии:
    7
    И не забыть проверочку на их наличие: If Not Isempty (db.Forms) Then
     
  5. ToxaRat

    ToxaRat Чёрный маг
    Lotus team

    Регистрация:
    6 ноя 2007
    Сообщения:
    3.047
    Симпатии:
    18
    оу, еще немного и сюда весь код БР выложут ;)
     
  6. Гость

    Ну не весь конечно т.к. всего нет, тогдабы не пришлось изобретать. ;) но кусочек я от туда взял.
    Спасибо все разобраля.
     
  7. Akupaka

    Akupaka А че я?.. О.о

    Регистрация:
    4 окт 2007
    Сообщения:
    3.373
    Симпатии:
    2
    ай-я-яй. и кто же тебе разрешил распространять в сети код коммерческой системы?
    а вдруг тут есть... уши... и кто-то заинтересуется, сотрудники чьей компании распространяют в сети тайную информацию...
    поаккуратнее надо быть ;)
     
Загрузка...
Похожие Темы - База коммутатор
  1. anna
    Ответов:
    3
    Просмотров:
    269
  2. Shandrik
    Ответов:
    13
    Просмотров:
    660
  3. odyssey
    Ответов:
    3
    Просмотров:
    544
  4. iivvnn
    Ответов:
    15
    Просмотров:
    953
  5. anna
    Ответов:
    7
    Просмотров:
    964
Статус темы:
Закрыта.

Поделиться этой страницей