![]() | |
![]() |
| | Thread Tools | Display Modes |
#1
| |||
| |||
|
|
Dim l_db As Database, l_msg As String, l_rs As Recordset Set l_db = OpenDatabase("c:\lisa\lisadat.mdb") Set l_rs = l_db.OpenRecordset("SELECT COUNT(AgentsCustomerID) As aCounted FROM QuoteHeaders WHERE AgentsCustomerID=" & Chr$(34) & Me![AgentsCustomerID] & Chr$(34)) |
![]() |
| Thread Tools | |
| Display Modes | |
| |