---

Jeg prøver at ændre indstillingerne for en linket tabel på denne måde:

Public Sub Test1(strTable As String)
CurrentDb.TableDefs(strTable).Connect = ";DATABASE=C:\import.mdb"
CurrentDb.TableDefs.Refresh
End Sub

Det giver dog ikke den ønskede effekt.

Er der nogen, der kan gennemskue, hvad der er galt med min kode?

/Søren

---

hmm - jeg er lidt i tvivl om hvad test1 skal gøre: Er det en allerede eksisterende linket tabel, som du vil ændre linket på?
Så skal du først fjerne det gamle link og derefter appende den nye.
Koden nedenfor er diminutiv, og bør naturligvis have passende kode til at håndtere fejl (hvis ikke tabellen findes i forvejen, hvis ikke filen findes osv), men den virker (her!). Hvis du skal have mere hjælp, så smid endelig en kommentar :)

Public Sub Test1(strTable As String)
CurrentDb.TableDefs.Delete (strTable)
Dim tbd
Set tbd = CurrentDb.CreateTableDef(strTable)
tbd.Connect = ";DATABASE=C:\import.mdb"
tbd.SourceTableName = strTable
CurrentDb.TableDefs.Append (tbd)
End Sub

mvh
MouseKeeperX

---

Hej MouseKeeperX.

Tak for dit hurtige svar.

Det er en eksisterende linket tabel, som jeg vil have ændret, så jeg tror den kode du har sendt virker. Jeg kontrollerer koden i morgen og vender tilbage.

/Søren

---

Hej MouseKeeperX.

Nu har jeg testet og det virker - Tak igen.

Har du nogen ide til, hvorfor refreshlink ikke virker. Jeg har fundet den kode, jeg postede i spørgsmålet, i en access97 bog. I bogen påstår de, at man på den måde kan ændre på en eksisterende linket tabel.

Mvh.
Søren

Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.