Suche | Statistiken | Benutzerliste | Access-FAQ | Datenschutz Foren
donkarl Forum
donkarl Forum ->  Themen -> Access -> Diskussion ansehen

Du bist als Gast eingelogt. ( Anmelden | Registrieren )
  • accde : Vermutlich fehlende verweise auf dem zielr...
  • drnicolas05.05.23 12:13
  • #Gelöscht in ListBox
  • drnicolas30.04.23 17:39
       └ RE: #Gelöscht in ListBox wilo05.05.23 08:33
  • Dutzende Timeouts nach Umzug des SQL-Servers
  • drnicolas15.04.23 12:25
       └ RE: Dutzende Timeouts nach Umzug des SQL-Servers PeterDoering15.04.23 15:19
  • Input unterscheiden nach Quelle: Tastatur oder USB...
  • kridon31.03.23 16:06
       └ RE: Input unterscheiden nach Quelle: Tastatur od... PeterDoering02.04.23 19:58
          └ RE: Input unterscheiden nach Quelle: Tastatur ... kridon11.04.23 17:34
             └ RE: Input unterscheiden nach Quelle: Tastatu... PeterDoering12.04.23 16:56
  • Access Stammtisch München am 13.04.2023 (Do)
  • StefanWirrer11.04.23 10:45
  • Objekt oder Klasse unterstützt diese Ereignismenge...
  • HansSakowski28.03.23 16:48
       └ RE: Objekt oder Klasse unterstützt diese Ereigni... Karl Donaubauer28.03.23 18:14
  • VBA 32 / 64 bit, long / longptr
  • Mario Nestelberger13.03.23 15:07
       └ RE: VBA 32 / 64 bit, long / longptr PhilS20.03.23 12:24
          └ RE: VBA 32 / 64 bit, long / longptr Mario Nestelberger20.03.23 21:08
             └ RE: VBA 32 / 64 bit, long / longptr Karl Donaubauer20.03.23 23:39
                └ RE: VBA 32 / 64 bit, long / longptr Mario Nestelberger21.03.23 03:22
  • Kreuztabelle ohne Zahlen
  • ThomasWolf20.03.23 15:39
  • temporäres Formular entfernen
  • waholin09.03.23 11:17
       └ RE: temporäres Formular entfernen PeterDoering09.03.23 12:44
          └ RE: temporäres Formular entfernen waholin09.03.23 13:26
             └ RE: temporäres Formular entfernen PeterDoering09.03.23 14:06
                └ RE: temporäres Formular entfernen waholin09.03.23 14:11
                   └ RE: temporäres Formular entfernen Karl Donaubauer09.03.23 15:37
                   └ RE: temporäres Formular entfernen PeterDoering09.03.23 15:40
                      └ RE: temporäres Formular entfernen waholin10.03.23 08:58
       └ RE: temporäres Formular entfernen waholin09.03.23 13:28
  • Listenfeld-Eintrag oben platzieren
  • waholin07.03.23 16:50
       └ RE: Listenfeld-Eintrag oben platzieren PeterDoering08.03.23 00:23
          └ RE: Listenfeld-Eintrag oben platzieren waholin08.03.23 18:48
  • Access Stammtisch München am 09.03.2023 (Do)
  • StefanWirrer07.03.23 09:10
  • Tabellenverknüpfung will nicht mehr
  • StefanWirrer02.03.23 11:53
       └ RE: Tabellenverknüpfung will nicht mehr PeterDoering02.03.23 22:43
          └ RE: Tabellenverknüpfung will nicht mehr StefanWirrer03.03.23 09:16
             └ RE: Tabellenverknüpfung will nicht mehr PeterDoering04.03.23 10:36
       └ RE: Tabellenverknüpfung will nicht mehr StefanWirrer03.03.23 15:02
       └ RE: Tabellenverknüpfung will nicht mehr Karl Donaubauer03.03.23 16:35
          └ RE: Tabellenverknüpfung will nicht mehr StefanWirrer06.03.23 11:23
  • GUIDs als Namen ändern?
  • Andrea20.02.23 14:14
       └ RE: GUIDs als Namen ändern? PeterDoering20.02.23 17:20
          └ RE: GUIDs als Namen ändern? Andrea20.02.23 17:40
       └ RE: GUIDs als Namen ändern? Andrea21.02.23 06:39
          └ RE: GUIDs als Namen ändern? PeterDoering21.02.23 16:17
             └ RE: GUIDs als Namen ändern? Andrea23.02.23 10:05
  • Einladung zum 12. virtuellen Access-Stammtisch Han...
  • KlausWerther14.02.23 21:29
  • Tabelle enthält zu viele Indizes
  • Ulrich6309.02.23 15:44
       └ RE: Tabelle enthält zu viele Indizes Ulrich6309.02.23 17:11
    StefanWirrer
    Gesendet: 02.03.23 11:53
    Betreff: Tabellenverknüpfung will nicht mehr


    Veteran

    Beiträge: 283
    100100252525
    Ort: München

    Hallo,

    wir wollen das Backend updaten ... leider will Access da nicht so mitspielen.

    Der Testcode:
    Dim dbs As DAO.Database
    Dim tdf As DAO.TableDef
    Dim dbsODBC As DAO.Database
    Dim tdfODBC As DAO.TableDef
    Dim strLocalName As String
    Const ODBCConnect = "ODBC;Driver={PostgreSQL Unicode};Server=srvxxx;Port=5432;Database=dbtest;Uid=db;Pwd=geheim;"

    ' Lokale Datenbank
    Set dbs = CurrentDb()
    ' ODBC-Datenbank in Jet öffnen
    Set dbsODBC = DBEngine.OpenDatabase("DSNNAME", dbDriverNoPrompt, True, ODBCConnect)

    dbsODBC.TableDefs.Refresh
    ' Alle Tabellen verknüpfen
    For Each tdfODBC In dbsODBC.TableDefs
       strLocalName = Mid(tdfODBC.Name, InStr(1, tdfODBC.Name, "." ) + 1)
       If strLocalName = "tbl_anschreiben" Then
          Set tdf = dbs.CreateTableDef(strLocalName & "__", 0&, tdfODBC.Name, dbsODBC.Connect)
          dbs.TableDefs.Append tdf ' <--- Fehler
       End If
    Next tdfODBC
    dbs.TableDefs.Refresh

     

    Fehlermeldung:

    3146  ODBC-Aufruf fehlgeschlagen.

     1     Error while executing the query

     

    Mit der produktiven DB funktioniert das (PG9.6). Auf dem Testserver ist PG14.

    Access 2016, PostgeSQL

     

    Die Verbindung wird hergestellt, aber bei dbs.TableDefs.Append tdf kommt der Fehler.

    Hat jemand eine Idee was das Problem ist?

     


    -----
    Grüße aus München
    Stefan
    Top of the page Bottom of the page


    Seite: < 1 2 3 4 5 6 7 8 9 10 ... >
    Suche in diesem Forum
    Druckfreundliche Version
    (Alle Cookies von dieser Seite löschen.)