Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Access Datensätze einzeln kopieren einfügen

Frage Entwicklung VB for Applications

Mitglied: Qwertzuiopue

Qwertzuiopue (Level 1) - Jetzt verbinden

18.09.2014, aktualisiert 09:32 Uhr, 808 Aufrufe, 3 Kommentare

Hallo Hallo,

also ich habe eine Datenbank A mit Pfad PfadA und eine Datenbank B mit PfadB. Ich möchte nun die Datensätze aus B einzeln kopieren und an A anhängen. Stehe aber leider etwas auf dem Schlauch, wie ich an so etwas ran gehe.
Momentan ist in B kein Feld ID. Meine Idee war etwas in die Richtung "While File not emtpy ...".
Bin über jegliche Hilfe sehr dankbar.

Cheers
Qwertzuiopü
Mitglied: Qwertzuiopue
18.09.2014 um 09:53 Uhr
Also den untenstehenden Code habe ich bisher, aber das kopieren und einfügen fehlt mir...



Set AccApp = New Access.Application
AccApp.OpenCurrentDatabase PfadA & "A.mdb", False
Set DBA = AccApp.CurrentDb

Set AccApp2 = New Access.Application
AccApp2.OpenCurrentDatabase Pfad & "B.mdb", False
Set DBB = AccApp.CurrentDb

Set RecSet = CurrentDb.OpenRecordset("Tabelle1") 'einlesen
Do While Not RecSet.EOF



RecSet.MoveNext
Loop
RecSet.Close
Bitte warten ..
Mitglied: colinardo
18.09.2014, aktualisiert um 11:24 Uhr
Moin Qwertzuiopü,
mach doch eine INSERT INTO SQL Anfügeabfrage:
INSERT INTO TabelleB IN 'C:\Datenbank_B.accdb' 
SELECT Feld1,Feld2 
FROM TabelleA;
Das ganze kannst du auch via VBA machen:
01.
DoCmd.SetWarnings False 
02.
DoCmd.RunSQL "INSERT INTO ......" 
03.
DoCmd.SetWarnings True
Grüße Uwe
Bitte warten ..
Mitglied: Qwertzuiopue
18.09.2014, aktualisiert um 13:49 Uhr
Moin Uwe,

das war auch mein erster Versuch. Dafür waren nur leider meine Datenbanken zu groß.
Habe es jetzt aber auch hinbekommen. Kopiere jetzt jeden Datensatz einzeln.
Dauert leider lange, aber funktioniert.
Trotzdem Danke!
Bitte warten ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
Heiß diskutierte Inhalte
Router & Routing
gelöst Ipv4 mieten (22)

Frage von homermg zum Thema Router & Routing ...

Windows Server
DHCP Server switchen (20)

Frage von M.Marz zum Thema Windows Server ...

Exchange Server
gelöst Exchange 2010 Berechtigungen wiederherstellen (20)

Frage von semperf1delis zum Thema Exchange Server ...

Hardware
gelöst Negative Erfahrungen LAN-Karten (19)

Frage von MegaGiga zum Thema Hardware ...