Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Primärschlüssel wird nicht mit kopiert
Autor: WernerB
Datum: 24.08.06 15:39
Bei der Anwendung Kopiere alle verknüpften Tabelle aus Datenbank "akt. Datenbank" in eine neue Datenbank "Dateineu" fehlen nach dem Kopieren in Datenbank "Dateineu" bei den kopierten Tabellen der Primärschlüssel. Wo liegt der Fehler Anbei der Prgrammteil If DoesFileExist(DateiNeu) Then Kill DateiNeu End If ' Datenbank neu anlegen Set wsp = DBEngine.Workspaces(0) Set db_new = wsp.CreateDatabase(DateiNeu, dbLangGeneral) ' f = dbCopyTable(DateiNeu, "Eingebundene Tabellen") ........ Public Function dbCopyTable(ByVal filename As String, ByVal quelltabelle As String) As Boolean Dim sql As String Dim oDB As DAO.Database Dim dbs As DAO.Database Dim rstEingebundeneTab As Recordset Set oDB = CurrentDb sql = "SELECT [" & quelltabelle & "].* FROM [" & quelltabelle & "]" Set dbs = CurrentDb Set rstEingebundeneTab = dbs.OpenRecordset(sql, dbOpenSnapshot) With rstEingebundeneTab Do While Not .EOF dbCopyTableExtern oDB, !Tabellenname, filename, !Tabellenname .MoveNext Loop End With End Function die Funktion dbcopyTableExtern stammt aus VBarchiv / tips&Tricks / Datenbanken / nr. 69

Primärschlüssel wird nicht mit kopiert	1.176	WernerB	24.08.06 15:39
Re: Primärschlüssel wird nicht mit kopiert	723	WernerB	28.08.06 13:47

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen