0

列見出しのあるmysqlテーブルデータをExcelシートにエクスポートしたい。vb.netを使用しています。ただし、Excelシートでテーブルの列見出しを取得することはできません。mysqlテーブルデータのみを取得しています。

my code
-------
 Dim i, j As Integer


    Dim xlApp As Excel.Application
    Dim xlWorkBook As Excel.Workbook
    Dim xlWorkSheet As Excel.Worksheet
    Dim misValue As Object = System.Reflection.Missing.Value

    xlApp = New Excel.ApplicationClass
    xlWorkBook = xlApp.Workbooks.Add(misValue)
    xlWorkSheet = xlWorkBook.Sheets("sheet1")


    For i = 0 To ds.Tables(0).Rows.Count - 1
        For j = 0 To ds.Tables(0).Columns.Count - 1
            xlWorkSheet.Cells(i + 1, j + 1) = _
            ds.Tables(0).Rows(i).Item(j)
        Next
    Next

    xlWorkSheet.SaveAs("D:\vbexcel.xlsx")
    xlWorkBook.Close()
    xlApp.Quit()
4

1 に答える 1

1

Vb.net はわかりませんが、同様の問題があり、次の構文を使用する必要がありました。

ステートメントの 1 行を無視します。

http://dev.mysql.com/doc/refman/5.1/en/load-data.html (これはインポート用ですが、IGNORE 1 LINES 構文はここで説明されています...)

于 2012-08-10T21:42:53.187 に答える