Spaltennamen einer SQL-Abfrage auslesen

[bert]

Danke Alexander und Siechfred,

mit NAME geht es super. Hab mir doch gedacht, dass es was in der Art geben muss.

Bert

#################################################################
while (@row = $sth->fetchrow_array) {
  if ($Counter == 0) {
    #Überschrift
        foreach (@{$sth->{NAME}}) {
            $Worksheet->write($RowNum, $ColNum, $_ , $FormatHeadline);
            $ColNum++;
          }
        $ColNum = 0;$RowNum++;
    }
  #Daten
  foreach (@row) {
    $Worksheet->write($RowNum, $ColNum, $_ , $FormatContent);
    $ColNum++;
  }
  $Counter++;
  $ColNum = 0;$RowNum++;
}