Rabu, 08 Januari 2014

RE: [MS_AccessPros] Locating wrong paths for linked tables.

James,

Consider creating a new standard module and adding this DAO code:
Function GetConnections()
    Dim td As DAO.TableDef
    Dim qd As DAO.QueryDef
    Dim db As DAO.Database
    Dim strConnect As String

    Set db = CurrentDb
    For Each td In db.TableDefs
        If Len(td.Connect)> 1 Then
            Debug.Print td.Name & "   " & td.Connect
        End If
    Next
    For Each qd In db.QueryDefs
        If Len(qd.Connect)> 1 Then
            Debug.Print qd.Name & "   " & qd.Connect
        End If
    Next
    Set td = Nothing
    Set qd = Nothing
    Set db = Nothing

End Function

You can then open the debug window (press Ctrl+G) and enter:
?GetConnections()

You will get a display of all your table and query connection strings.

Duane Hookom MVP
MS Access


________________________________
> From: forums01@james-mc.com
>
>
> James
> www.james-mc.com<http://www.james-mc.com>
> Words To Live By
>
> I'm using Access 2010 and have a number of linked tables (mostly Excel
> files but at least one Access file). I've made some changes in
> directory structure, and that broke the links to several of the linked
> tables. I can visually spot a bad one by hovering the mouse cursor over
> a table's icon in the sidebar, which pops up the path, but I'm
> wondering if there's a better way to identify which ones have broken
> links since there's no error given when I run the a query that involves
> the linked table.
>
> I've been fixing the broken links (with the linked table manager) as I
> find them but would appreciate suggestions for a more efficient way to
> handle that as well.
>
> Hopefully this is clear.
>
> Thanks for any pointers.

------------------------------------

Yahoo Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/MS_Access_Professionals/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/MS_Access_Professionals/join
(Yahoo! ID required)

<*> To change settings via email:
MS_Access_Professionals-digest@yahoogroups.com
MS_Access_Professionals-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
MS_Access_Professionals-unsubscribe@yahoogroups.com

<*> Your use of Yahoo Groups is subject to:
http://info.yahoo.com/legal/us/yahoo/utos/terms/

Tidak ada komentar:

Posting Komentar