重複した名前ファイルでExcelファイルをアップロードする方法。ただし、以前の名前ファイルは上書きされません。したがって、同じ名前でファイルをアップロードすると、Windowsと同じように保存されます。
元。まず、Excelファイル="fileExcel"をアップロードします。次に、同じ名前="fileExcel"で再度アップロードします。また、アップロードフォルダに2つのファイルがあり、最初は「fileExcel」と「fileExcel(1)」という名前である必要があります。
そのため、同じ名前のファイルで何度もアップロードすると、継続的に大きくなります。(1)、(2)、(3)、(4)など
これが私のコードです:
Dim fileName As String = Path.GetFileName(FileUpload1.PostedFile.FileName)
Dim fileExtension As String = Path.GetExtension(FileUpload1.PostedFile.FileName)
Dim fileLocation As String = Server.MapPath("~/Upload/" & fileName)
FileUpload1.SaveAs(fileLocation)
If fileExtension = ".xls" Then
connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & fileLocation & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=2"""
ElseIf fileExtension = ".xlsx" Then
connectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & fileLocation & ";Extended Properties=""Excel 12.0;HDR=Yes;IMEX=2"""
End If
前に感謝します