2015-10-15 22 views
0

我使用的是在單擊方法上的一個按鈕通過下列VBA - 傳遞到客戶ID查詢表格

Private Sub cmdNewEnquiry_Click() 
Call Command29_Click 
    DoCmd.RunSQL "INSERT INTO tblEnquiry(CustomerID) Values('" & CustomerID & "')" 
    DoCmd.OpenForm "frmEnquiry", acNormal, , "CustomerID = " & CustomerID 
End Sub 

但每當它通過在客戶進入下一個形式,EnquiryID是不是最新的可能它可能會顯示在此之前的記錄。然後,我必須點擊記錄才能找到最新的查詢。

有沒有一種方法可以傳遞這些數據並確保它顯示最新的記錄?

回答

0

您必須以「frmEnquiry」形式更改RecordSource查詢,方法是先排序最新的數據。或者以「frmEnquiry」的形式使用屬性字段OrderBy。不知道「frmEnquiry」的查詢字段,我不能給你一個更準確的答案。

doCmd.OpenForm中的"CustomerID = " & CustomerID部分爲此CustomerID設置了一個過濾器,但不排序任何內容。

+0

感謝它的工作。我將OrderBy設置爲EnquiryID DESC並顯示最新的查詢。這只是將查詢過濾到只有該客戶 – Steevee