title image


Smiley Re: abfrage aus anderer datenbank
Naja, in etwa stand das doch auch dort. Oder???Private Sub TestAbfrage()

Dim db As DAO.Database, s As String



Set db = CurrentDb

s = "INSERT INTO Daten (KST, ÜST)" _

& " SELECT KST, ÜST" _

& " FROM Überstunden IN 'C:\Überstunden.mdb'"

db.Execute s, dbFailOnError

MsgBox "Es wurden " & db.RecordsAffected & " Datensätze angefügt."



db.Close

Set db = Nothing

End Sub




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: