'Set up the lookup database
    Dim dbs As database
    Dim rst1 As recordset
    Dim rst2 As recordset
    Dim rst3 As recordset
    Dim sheetnum As Integer
    Dim rowss As Integer
        
    Dim strsql1 As String
    Dim strsql2 As String
    
    'These are the variables to store data
    Dim Account As String
    Dim FEIN As String
    Dim Payroll As String
    Dim Backup As String
    Dim ProcCenter As String
    Dim LegalEnt As String
    Dim statecode As String    
    Dim statecount As Integer
    Dim fedcount As Integer
    
    Set dbs = OpenDatabase("S:\FDCStoFLSImport\FLSLookup.mdb")
    
    strsql1 = "Select * from FDCS_SS_ACCTS"
    strsql2 = "Select * from LOOKUP_TABLE"
    strsql3 = "Select * from STATE_CODE"
    
    Set rst1 = dbs.OpenRecordset(strsql1)
    Set rst2 = dbs.OpenRecordset(strsql2)
    Set rst3 = dbs.OpenRecordset(strsql3)

quote:

---

If I'm not guessing your intentions correctly, then please tell me why you posted the topic in the first place, since your code works!

---

In version 2.0 (and earlier (did you know there was a version 2?) ), the security file was an mda. I had to take over for a buch of overpaid consultants, and I get a feeling that this is a holdover. If you look in the workgroup administrator, you will see a filetype of mda available for a selection option. I belive it's backward compatable.

I joined the users to the new location of the mda, and the get the login dialog when going in to the access application.

So I know its referening the mda as the security model (what security?)

Anyway, I can't find in Excel a reference to the file, or the login or password,

Hey at least it works, and hopefully it'll go away soon.

Still, it's bugging the hell out of me.

Brett

8-)