Mysql 如何在excel单元格中保存blob文件
我有一个由列(“pdf格式的文件”)组成的表,该列存储账单 我的问题是我想将该表导出到excel工作表 可能吗 到目前为止我试过这个Mysql 如何在excel单元格中保存blob文件,mysql,sql,vb.net,oracle,Mysql,Sql,Vb.net,Oracle,我有一个由列(“pdf格式的文件”)组成的表,该列存储账单 我的问题是我想将该表导出到excel工作表 可能吗 到目前为止我试过这个 Dim xapp As New Microsoft.Office.Interop.Excel.Application Dim wb As Workbook = xapp.Workbooks.Add Dim ws As Worksheet = wb.Worksheets(1) ws.Activate() 'Fill header
Dim xapp As New Microsoft.Office.Interop.Excel.Application
Dim wb As Workbook = xapp.Workbooks.Add
Dim ws As Worksheet = wb.Worksheets(1)
ws.Activate()
'Fill header of the sheet----------------------------------
For i As Integer = 1 To dgvcustomer.Columns.Count
ws.Cells(1, i) = dgvcustomer.Columns(i - 1).HeaderText
Next
'End header------------------------------------------------
Dim Dgrow, Dgcell, Dgcol As Integer
Dgrow = 1
Dgcell = 1
'Fill Sheet -----------------------------------------------------------------------
While (Dgrow <= dgvcustomer.Rows.Count)
Dgcol = 1
While (Dgcol <= ws.UsedRange.Columns().Count)
ws.Cells(Dgrow + 1, Dgcol).value = dgvcustomer.Rows(Dgrow - 1).Cells(ws.Cells(1, Dgcol).value).Value
Dgcol += 1
End While
Dgrow += 1
End While
'End fill sheet--------------------------------------------------------------------
wb.SaveAs(dlgSaveFile.FileName)
wb.Close()
xapp.Quit()
Dim xapp作为新的Microsoft.Office.Interop.Excel.Application
将wb设置为工作簿=xapp.Workbooks.Add
Dim ws As工作表=wb.工作表(1)
ws.Activate()
'填写工作表的标题----------------------------------
对于dgvcustomer.Columns.Count,i为整数=1
ws.Cells(1,i)=dgvcustomer.Columns(i-1).HeaderText
下一个
'端头------------------------------------------------
将Dgrow、Dgcell、Dgcol设置为整数
Dgrow=1
Dgcell=1
“填写表格-----------------------------------------------------------------------
而(Dgrow否)。Excel不支持将数据块存储在工作表的单元格中
您可能应该将这些PDF分别导出到各个文件,并在导出的工作表中指定文件名。否。Excel不支持将数据块存储在工作表的单元格中
您可能应该将这些PDF分别导出到各个文件中,并在导出的工作表中指定文件名。没有一个可能满足您的需要。(例如,您可以将整个表保存在SQL转储文件中,但这不是人类可读的格式。)没有一个可能满足您的需要。(例如,您可以将整个表保存在SQL转储文件中,但这不是人类可读的格式。)