| |
VB & DatenbankenDatensätze exportieren | | | Autor: lastyle | Datum: 13.10.06 07:21 |
| Hallo,
ich möchte gerne aus einer Access Datenbank jeweils nur die geänderten bzw neu angelegten Datensätze exportieren, und diese dann per Email an zur weiteren bearbeitung verschicken. Die geänderten bzw neu angelegten Datensätze bekommen ein Flag gesetz im Feldnamen AD_Updatet und AD_Updatedby. Anhand dieses Flags möchte ich dann von alle Records die dieses Flag haben den kompletten Index exportieren . Das Dateiformat in das es exportiert wird spielt eine untergeordnete Rolle, das kann Excel,Access oder auch Text sein
Geht sowas ? und wenn ja wie macht man so etwas am besten. Ich habe im Forum leider nichts diesbezügluch gefunden.
Gruß Mario | |
Re: Datensätze exportieren | | | Autor: bfritz | Datum: 13.10.06 21:42 |
| Hallo Mario
Verwende einfach die "SAVE"-Methode von ADO zum speichern mit
folgenden Parameter:
"rst.Save Datei, PersistentTyp"
Dabei kann man aus zwei Formaten wählen.
a:Advanced Data Tablegram (ADTG) (Const adPersistADTG = 0)
b:Extensible Markup Language (XML) (Const adPersistXML = 1)
Beispiel zum Exportieren eines Recordsets mit ADO:
'Verweis auf ADO setzen nicht vergessen!!!
Sub SaveADO_RS
Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Nordwind.mdb;"
rst.Open "SELECT * FROM Kunden WHERE [AD_Updatet]=.........", cnn,
adOpenKeyset,adLockOptimistic
rst.Save "C:\Ausgabedatei.adtg", adPersistADTG
rst.Close
cnn.Close
End Sub m.f.G. bfritz | |
Re: Datensätze exportieren | | | Autor: Prian0815 | Datum: 16.10.06 15:35 |
| für wieviele Tabellen willst du das denn machen?
Da kannst du dann noch ne Schleife drüber bauen.
1. sqlselect aufbauen:STRSQL = "select from deineTabelle where DeineTabelle.AD_Updatet = true or DeineTabelle.AD_Updatedby = true;"
2. Abftrage öffnen Set RS = New ADODB.Recordset
RS.Open stSQL, con, adOpenStatic, adLockOptimistic
3. Recordset auslesen(z.B. in Textdatei oder ähnliches)
4. Recordset schliesen.
Wobei con die aktuelle bzw. auszulesende DB repräsentiert.
Gruß Armin
P.S.: always look on the bright side of Life! | |
Re: Datensätze exportieren | | | Autor: lastyle | Datum: 17.10.06 20:17 |
| Hallo,
das ist immer nur für eine Tabelle, nur bin ich bisher noch nicht dazu gekommen es auszuprobieren, daher noch kein Feedback.
Gruß Mario | |
Re: Datensätze exportieren | | | Autor: Prian0815 | Datum: 18.10.06 11:05 |
| Hi, Hab im select was vergessen, Bitte beachten
. sqlselect aufbauen:STRSQL = "select deinetabelle.ID from deineTabelle where DeineTabelle.AD_Updatet = true or DeineTabelle.AD_Updatedby = true;" | |
| 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 |
|
|
Neu! sevCommand 4.0
Professionelle Schaltflächen im modernen Design!
Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|