Access & Visual Basic

[Minty]

I am trying to change the path of a Access file I have.
It has a bit of VB integrated into it and the part that sticks out the most to me in relation to this is

If strPathToDataFile <> "" Then
        
        DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE * FROM UserList;"
        DoCmd.SetWarnings True
        
        Set db = CurrentDb
        Set rst = db.OpenRecordset("UserList", dbOpenDynaset)
        
        conn.Provider = "Microsoft.Jet.OLEDB.4.0"
        conn.Open "Data Source=" & strPathToDataFile

Can anyone help me
When I run the whole of the code it is telling me that "\\server-03\blah\etc" is an invalid path.
I somehow need to get Access to look at another file rather than the old one.

Can anyone help point me in the right direction?

Thanks

Dan

[Raging.Retard]

Find out whats setting 'strPathToDataFile' ... then change it to something else (ie. the correct path).

That code seems odd to me though ... why would you use Access, to talk to an ODBC driver, to talk back to the same access DB you are calling from?

[Minty]

You're asking me? I am just the n00b who has been asked to link it in with another file.

How do I find out whats setting 'strPathToDataFile' then?
I had a look before I posted here and i still won't have a clue

I am most grateful for any help.

Ta

[Minty]

I believe I have done it.

Nevermind

Thanks

[JetLinus]

    strPathToDataFile = Inpubox("Enter Filename:", "Datafile", strPathToDataFile)

    conn.Provider = "Microsoft.Jet.OLEDB.4.0"
    ...

Insert the line above to be asked for a filename input!