Internett: www.wis.no E-post: wis@wis.no
Tlf: 7245 0190 Fax: 7245 0191

Startsiden | Produkter | Drift | Markedsføring | Ta kontakt | Gå til
Søk:
Logg innLogg inn 

WIS blogg


Angi unikt felt for linkede tabeller i Access
Av: Ove Halseth Mandag 14.04.2008 (23:20)

På grunn av at Sybase ikke liker Primary Key og Unique constraint på samme felt så droppet vi Unique constraint på alle PK i alle tabeller.

(For mer info sjekk: http://www.sybase.com/detail?id=1032350)

 

Noe som gjorde at når vi linket tabellene i Access så visste ikke Access lengre hvilket felt som var unikt. => Access spør for hver tabell som skal linkes inn hvilket felt som er unikt.

Om en skipper og angi hvilket felt som er unikt så blir tabellen skrivebeskyttet.

 

Så det sier seg selv at med 400+ tabeller og ditto 400+ forekomster av denne dialogen:

Access: Velg en entydig postidentifikator

Så begynte det å bli litt pes og linke tabellene på nytt.

Etter mye googling fant jeg omsider denne løsningen: http://www.mrexcel.com/forum/showthread.php?t=33366&page=2

 

Som ga denne funksjonen:

Function BuildTableLink(strDSNName as String,strTableName as String, strExternalTableName as String, strUniqueFieldName as String)

  Dim db As Database
  Dim tdf As TableDef
  Dim strDDL As String

 

  Set db = CurrentDb

  'Create linked table
  Set tdf = db.CreateTableDef(strTableName)
  tdf.Connect = "ODBC;DSN=" & strDSNName

  tdf.SourceTableName = strExternalTableName
  db.TableDefs.Append tdf

 

  'Set unique information

  strDDL = "CREATE UNIQUE INDEX _uniqueindex ON " & _
           strTableName & " (" & strFieldName & ")" & _
           "WITH PRIMARY;"

  db.Execute strDDL

End Function

 

Ove B-)

 

--Emner: Access, Sybase
Kommentarer: 0


 
 Nye poster
Fixing missing (30.05.2012)
Redirect dll us (30.05.2012)
Laste ned passo (11.05.2012)
Bare si "Nei ti (12.12.2011)
Posten er slett (16.11.2011)
 Søk
 
 Populære emner
Access  Ajax  Ansatte  Brannmur  Database/SQL  Debugging  Delphi  FortiClient  Fortigate  GSI  Hjemmet  Html  Internett  iPhone  iPhone Apps  Java  JavaScript  JVM  Nerdehumor  Nettverk  Operativsystem  Palm  Servere  Skrivere  Sybase  Utvikling  VBA  Vista  VPN  Web 2.0  Windows  WinXP  WIS  Wis Tiltak  WisWeb 1  WisWeb 2  Word  XML
 Vis måned
Mai 2012 (3)
Desember 2011 (1)
November 2011 (1)
September 2011 (2)
August 2011 (1)
 Vis fra forfatter
Ove Halseth (46)
Dag Waade (9)
Stig Runar Vangen (7)
Svein Waade (6)
Inge Valaas (1)
Inger Berg (1)
Kristian Ljøkelsøy Vitsø (1)