/ Register

По аксесу 2 вопроса

Discussion in 'Программирование' started by Vasya, Sep 4, 2005.

  1. Sep 4, 2005 #1
    Vasya

    Vasya Читатель

    2,172
    1
    1) Можно ли сделать так чтобы элементы списка (ListBox)имели разный цвет? Может быть есть другой аналогичный элемент управления с такой функциональностью?

    2) Как получить координаты щелчка (двойного щелчка) мышью относительно верхнего левого угла формы?

    Спасибо.
     
  2. Sep 6, 2005 #2
    Vasya

    Vasya Читатель

    2,172
    1
    3) Как с помощью запроса на добавление добавить запись в таблицу с ключевым полем (счетчик) на основе данных содержащихся в форме?
    Выдает ошибку "... не добавлено в таблицу следующее число записей - 1 (нарушение уникальности ключа)"

    текст запроса:
    INSERT INTO clients ( full_name, first_name, mobile_phone, email )
    SELECT Forms![001_GetOrder]!FullName AS full_name, Forms![001_GetOrder]!FirstName AS first_name, Forms![001_GetOrder]!MobilePhone AS mobile_phone, Forms![001_GetOrder]!mail AS email;

    в таблице clients есть ключевое поле id_order не знаю как его правильно включить в запрос (если надо включать)
    Хелп ми! Плс!
     
  3. Sep 7, 2005 #3
    AlTk

    AlTk Читатель

    10,685
    1
    1. очень сильно подозреваю, что нет, так как для этого надо перехватывать стандартный "отрисовщик" Windows.
    2.
    3. как сделать не знаю, но очень сильно не рекомендую использовать всякие там счетчики.
     
  4. Sep 9, 2005 #4
    Lover

    Lover Участник

    122
    0
    Forms![001_GetOrder]!MobilePhone а это поле? Уверен что данные получаються из этого поля?

    Счетчики добавлять в insert не надо... Все работает автоматически на то они и счетчики
     
  5. Sep 9, 2005 #5
    Vasya

    Vasya Читатель

    2,172
    1
    Это поле в форме. Данные берутся именно из него.
     
  6. Sep 11, 2005 #6
    Lover

    Lover Участник

    122
    0
    данные точно приходят из поля...
    Попробуй сделать проверку через переменные, может что то приходит не то, вообще скопируй суда весь запрос из того что ты написал я лично не вижу повода для работы
     
  7. Oct 24, 2005 #7
    Vasya

    Vasya Читатель

    2,172
    1
    Прошел месяц... НИЧО не делал, но все заработало...
    Теперь еще один вопрос: Как, используя VB, определить открыта ли какая-то форма или нет?
     
  8. Oct 30, 2005 #8
    firefly

    firefly Активный участник

    1,955
    0
    Vasya, можно попробовать смотреть на свойство Visible формы. Vasya
     
  9. Oct 30, 2005 #9
    Welcome

    Welcome Читатель

    5,409
    0
    Низя. Если форма закрыта скажет:
    Run-time error '2450'
    Приложению 'Microsoft Acess' не удается найти форму указанную в выражении макроса или в программе Visual Basic
    :(
     
  10. Nov 21, 2005 #10
    CrazyLord

    CrazyLord Гость

    Public Function FormIsOpened(Name As String) As Boolean
    Dim frm As Form
    Dim i As Integer

    ' Ïåðåáèðàåò êîìïîíåíòû ñåìåéñòâà Forms.
    On Error GoTo Err
    If Forms.COUNT > 1 Then
    For Each frm In Forms
    ' Âûâîäèò èìÿ ôîðìû.
    If frm.Name = Name Then
    FormIsOpened = True
    Exit For
    Else
    FormIsOpened = False
    End If
    Next frm
    Else
    Err:
    FormIsOpened = False
    End If
    End Function
     
amd ryzen 7 5700x купить | Измельчитель-шредер бензиновый CHAMPION SC2818 | проекты в стиле барнхаус | Сергей Катышев продюсер | vilmann vl-d20 преобразователь частоты мануал