как получить запись в форме доступа с помощью текстового поля, если есть несколько записей с другой датой - PullRequest
0 голосов
/ 16 апреля 2020

Я хотел бы получить полную запись при поиске по номеру мобильного телефона и последней дате

с кодом ниже, я могу получить запись, но не так условно, как дата, как я ищу и делаю ' не знаю, как применить мое условие, чтобы получить результат. при попытке запроса sql получить ошибку при использовании условия.

Здесь имя таблицы: Service_MasterData, имя столбца: [Номер мобильного телефона], Service_Registration_Number, Дата

prefixtext = txt_mbno.Text
     DoCmd.ShowAllRecords
     DoCmd.GoToControl ("[Mobile Number]")
     DoCmd.FindRecord prefixtext

    Service_Registration_Number.SetFocus
    assetidref = [Mobile Number]
    [Mobile Number].SetFocus
    strSearch = [Mobile Number].Text

    If assetidref = strSearch Then
         MsgBox " !!! Welcome Back "

Отредактировано в соответствии с предложением ..

    Dim strCriteria As String
    Dim rst As DAO.Recordset

    Set rst = Me.RecordsetClone
    DoCmd.ShowAllRecords
    DoCmd.GoToControl ("[Mobile Number]")

    strCriteria = "[Mobile Number] = " & Me![txt_mbno]
    rst.FindFirst strCriteria ' here shows data type error
    Me.Bookmark = rst.Bookmark

    Service_Registration_Number.SetFocus
    assetidref = [Mobile Number]
    [Mobile Number].SetFocus
    strSearch = [Mobile Number].Text
    Me.Service_ID.Value = ""
    Me.Service_Token_No.Value = ""
    Me.Engine_Power.Value = ""

    If assetidref = strSearch Then
         MsgBox " !!! Welcome Back "
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...