jhaustein
Goto Top

Access Datenexport Problem

Hallo Gemeinschaft,

durch einen Export in dieser Art erhalte ich ein csv file

DoCmd.TransferText acExportDelim, "Mietabrechnung2022", "Mietabrechnung", "S:\abrechnung\Mietabrechnung" & Ablagedatum & ".csv", False  

dort sind alle Daten in Anführungszeichen eingebettet - wie bekomme ich das hin (nachträglich), dass diese nicht auftauchen

Content-ID: 6259115692

Url: https://administrator.de/contentid/6259115692

Ausgedruckt am: 22.11.2024 um 01:11 Uhr

jhaustein
jhaustein 07.03.2023 um 15:30:32 Uhr
Goto Top
sieht dann so aus

"test";"DE5435435435345345";"geno564577";"373,80";"CCS";"66";"Mietabrechnung:N8 zur Gutschriftnummer:59"
6247018886
Lösung 6247018886 07.03.2023 aktualisiert um 16:17:36 Uhr
Goto Top
Moin.
Die Anführungszeichen haben schon einen wichtigen Sinn, wenn du bspw. in den Text ein ";" schreiben würdest würde deine CSV nämlich eine zusätzliche Spalte bekommen und schon machts Peng !

Ersetzen kann man immer mit dem FilesystemObject
strPath = "S:\abrechnung\Mietabrechnung" & Ablagedatum & ".csv"  
DoCmd.TransferText acExportDelim, "Mietabrechnung2022", "Mietabrechnung", strPath, False  
Set fso = CreateObject("Scripting.FileSystemObject")   
inhalt = fso.OpenTextFile(strPath,1,False).ReadAll
fso.OpenTextFile(strPath,2,False).Write Replace(inhalt,"""","",1,-1,1)  
Aber wie gesagt gefährlich wenn man Felder hat indem ein User dann den Delimiter eingeben kann und diese nicht vorher ersetzt.

Cheers briggs
jhaustein
jhaustein 07.03.2023 um 17:06:11 Uhr
Goto Top
super cool - und danke für den Hinweis - werde das berücksichtigen