Hallo Zusammen,
in der aktuellen Access UDF ist es nicht möglich die Spaltennamen auslesen und im Array mit den Werten Zusammen zu haben.
Es gab von mir da schon mal eine Anfrage, diese konnte damals mit der Hilfe einfach gelöst werden.
Hier mal das alte Thema dazu.
MS Access Read Field + Spaltennamen der Tabellen (Im Beispiel von Musashi ist die Access zum testen angehangen)
Wie im Beispiel werden 2 Arrays erstellt. eines mit Spaltennamen und eines mit den Werten.
Wie kann ich diese nun Zusammenbringen? Irgendwie sehe ich da gerade nicht durch
Code
#include <Array.au3>
Global $oConnection, $aRecordSet, $sQuery, $aRecordSetArr, $aColumnArr[0]
Global $sTableName = "tblTable1"
Global $sDatabaseName = "D:\Test-mdb\Test.mdb"
If Not FileExists($sDatabaseName) Then Exit
$oConnection = ObjCreate("ADODB.Connection")
$oConnection.Open("Driver=Microsoft Access Driver (*.mdb); DBQ=" & $sDatabaseName)
$oRecordSet = ObjCreate("ADODB.RecordSet")
$sQuery = "Select * From " & $sTableName
$oRecordSet.Open($sQuery, $oConnection)
For $i = 0 to $oRecordSet.Fields.Count - 1
_ArrayAdd($aColumnArr, $oRecordSet.Fields.Item($i).Name)
Next
$aRecordSetArr = $oRecordSet.GetRows
$oRecordSet.Close()
$oConnection.Close()
_ArrayDisplay($aColumnArr, 'Spaltennamen')
_ArrayDisplay($aRecordSetArr, 'Tabelle = ' & $sTableName)
Alles anzeigen
Danke
Gruß gmmg