ошибка "type Mismatch"

Тема в разделе "Lotus - Программирование", создана пользователем -, 2 фев 2007.

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

    в документе текущем есть поле числовое, по умолчание значение 0,

    Пишу вот такой код:

    Dim ws As New NotesUIWorkspace
    Dim uidoc As NotesUIDocument
    Dim doc As NotesDocument


    Set uidoc = ws.CurrentDocument
    Set doc = uidoc.Document


    If doc.isSended= 0 Then - вот здесь выпадает с сообщением об ошибке....

    Может надо метод какой-нибудь испльзовать....

    Код написан в событии QueryClose()
    Помогите пожалуйста, почему не хочет работать :-(((
     
  2. Гость

    Эх, все решилось вот таким образом:

    Dim flag As Variant


    flag = doc.GetItemValue("isSended")
    If flag(0) = 0 Then


    Если кто знает другие варианты, то прошу сообщите, заранее благодарю...
     
  3. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Вот так:
    <!--QuoteBegin-Светлана1342+2:02:2007, 08:06 -->
    <span class="vbquote">(Светлана1342 @ 2:02:2007, 08:06 )</span><!--QuoteEBegin-->If doc.isSended(0) = 0 Then
    [snapback]54762" rel="nofollow" target="_blank[/snapback]​
    [/quote]
     
  4. oshmianski

    oshmianski Гость

    и вот так можно :)

    Код (Text):
    If doc.GetItemValue("isSended")(0) = 0 Then
     
  5. pbnoob

    pbnoob Well-Known Member

    Регистрация:
    25 авг 2006
    Сообщения:
    135
    Симпатии:
    0
    да хоть так :)
    Код
    If Cstr(doc.isSended(0)) = "0" Then
    [snapback]54791" rel="nofollow" target="_blank[/snapback]​
     
  6. Гость

    Спасибо огромное всем, за поддержку...
     
Загрузка...
Статус темы:
Закрыта.

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