2016-12-20 42 views
0
If FileUpload.HasFile Then 

     Dim FileNameXlsx = Path.ChangeExtension(Path.GetFileName(FileUpload.PostedFile.FileName), ".xlsx") 

     Dim pathOfUploadedCCP As String = Server.MapPath("~/Uploaded/Documents/TemporaryUploadedFileForCCP/") + FileNameXlsx 

     FileUpload.SaveAs(pathOfUploadedCCP) 

このコードは拡張子のみを変更しますが、ファイルが壊れているというエラーが表示されます。どうすれば助けてください:ブックの形式(.xlsx)に合わせてファイルの形式を変更するにはどうすればいいですか?Excelファイルの形式を変更する(.xlsから.xlsxまで)vb

+0

あなただけおそらくそれを削除し、その後、それをアップロードし、の.xlsxとして、ファイルを保存することはできますか? (申し訳ありませんが、.Xlsbと入力しています) – BruceWayne

+0

アップロードする前にファイルを検証する必要があります。そのためにはSpreadsheetLightを使用していますので、すべてのファイルを(.xlsx)内線にするだけです –

+0

拡張機能を変更するだけで、 。 save asを使用し、xlsxのopenxmlworkbook形式を指定します。 https://msdn.microsoft.com/en-us/library/microsoft.office.tools.excel.workbook.saveas.aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1 – cyboashu

答えて

-2

これを行うことはできますか?

Dim myFiles As String() 
myFiles = IO.Directory.GetFiles("<Folder Location of thge File>", "*.xls") 
Dim newFilePath As String 
For Each filepath As String In myFiles 
newFilePath = filepath.Replace("<Folder Location of thge File>", ".xlsx") 
System.IO.File.Move(filepath, newFilePath) 
Next 
End Sub 

プログラムが.XLS

の拡張子を見つけた場合は文句を言わない作業上記のコードはこれをしようとした場合には、フォルダ内のファイルのファイル拡張子を置き換えます。

Dim Path as String 
Path = "C:\Programs\And_So_On\" 
Dim Final As String 
Final = Path & "YourFile.xlsx" 

YourWorkBook.SaveAs(Final) 
+0

私は、なぜそれがdownvoteする必要があるのか​​わからない答えが –

+0

@OPにすでに更新されたコードを見てください。@OPにはファイル拡張子を変更するコードがありますが、それは直面している問題ではありません。また、ファイル拡張子を変更するだけで 'VB'でこれをしないので、実際のファイル形式を変換する必要があります。 – Jordan

+0

@ShadowFiendあなたのコードはファイルの拡張子のみを変更しますが、フォーマットを変更する必要があります。拡張子を変更するだけで、ファイルが壊れているというエラーが表示されます –

0

以下のリンクを参考にしてください。

https://www.gemboxsoftware.com/spreadsheet/articles/convert-xls-xlsx-ods-csv-html-net

私が例で見ることができるように、あなたはあなたのproject.theyで自分のライブラリーを含める必要がありますが、下のリンクを使って、それを確認することができます例を与えています。

https://www.gemboxsoftware.com/spreadsheet/examples/c-sharp-convert-excel-to-pdf/404

0

XLSとXLSXファイルフォーマットが異なるファイル形式です。拡張機能を変更することはできません。次の例は極端な例ですが、テキストファイル(TXT拡張子)をイメージファイル(PNG拡張子)に変更するとします。

ファイルを開こうとすると、MS Excelで無効な形式が認識され、これがエラーになります。

xlsファイルをxlsxファイル形式に変換する必要があります。あなたは、この目標を達成するためにEasyXLSのようなExcelのライブラリを使用することができます

Dim workbook As New ExcelDocument 
'Load the xls file 
workbook.easy_LoadXLSFile(FileNameXls) 
'Convert the xls file to xlsx file 
workbook.easy_WriteXLSXFile(FileNameXlsx) 
関連する問題