vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#

https://www.vbarchiv.net
Rubrik: Datenbanken · ADO   |   VB-Versionen: VB5, VB614.09.04
Recordset nach ASCII exportieren (ADO)

Wie man ein beliebiges Recordset schnell nach ASCII exportieren kann, das zeigen wir Ihnen in diesem Beispiel.

Autor:   Roland WutzkeBewertung:  Views:  12.999 
www.vb-power.netSystem:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 Beispielprojekt auf CD 

Mit dem nachfolgenden Tipp möchten wir Ihnen eine Möglichkeit vorstellen, wie Sie ein beliebiges Recordset schnell und bequem in ein ASCII-Textfile exportieren können.

Nicht nur, dass die Routine gemessen an ihrer Leistung sehr klein ist; sie ist zudem auch noch ultraschnell.

Fügen Sie den nachfolgenden Code in ein Modul ein:

' Recordset nach ASCII exportieren
Public Sub ExportRSToASCII(ExpRST As ADODB.Recordset, sFile As String, _
  Optional ByVal Delimiter As String = ";")
 
  Dim ExpString As String
  Dim F As Integer
 
  With ExpRST
    ExpString = .GetString(adClipString, , Delimiter, vbCrLf)
  End With
 
  F = FreeFile
  Open sFile For Output As #F
  Print #F, ExpString
  Close #F
End Sub

Aufgerufen wird die Routine wie folgt:

ExportRSToASCII myRecordset, "C:\Export.txt"

Optional kann als dritter Parameter ein Feldtrenner angegeben werden. Als Standardwert wird ein Semikolon (;) verwendet.
 



Anzeige

Kauftipp Unser Dauerbrenner!Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv  Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.
 
 
Copyright ©2000-2024 vb@rchiv Dieter OtterAlle 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.