1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.

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

Тема в разделе "Программирование", создана пользователем Vasya, 04.09.05.

  1. Vasya

    Vasya Читатель

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

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

    Спасибо.
     
  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. AlTk

    AlTk Читатель

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

    Lover Участник

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

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

    Vasya Читатель

    2.172
    1
    Это поле в форме. Данные берутся именно из него.
     
  6. Lover

    Lover Участник

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

    Vasya Читатель

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

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

    1.955
    0
    Vasya, можно попробовать смотреть на свойство Visible формы. Vasya
     
  9. Welcome

    Welcome Читатель

    5.409
    0
    Низя. Если форма закрыта скажет:
    Run-time error '2450'
    Приложению 'Microsoft Acess' не удается найти форму указанную в выражении макроса или в программе Visual Basic
    :(
     
  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