如何在不询问 VB.NET 的情况下覆盖 SaveAs 上的文件

Question

我正在创建一个导出器来将我从一些Queries中生成的数据导出到csv文件。

我的问题是我正在生成许多 csv，我的程序要求我提供每个文件以查看是否要覆盖前一个文件。

有什么方法可以覆盖它们而不必一直问我吗？

Dim excel As Object
Dim workbook As Object
Dim sheet As Object

excel = CreateObject("Excel.Application")
workbook = excel.Workbooks.Open("C:\Users\me\Desktop\NECESARY.xlsx")

'I complete all I want to export here

workbook.SaveAs("C:\Users\me\Desktop\" & file & ".csv")
workbook.Close()

这可以正常工作，并且可以完美地导出我的所有数据，但正如我所说，我不需要被问到是否要覆盖文件，有太多文件需要一个一个地接受它们。

Answer 1

一种解决方案是在保存之前删除以前的文件：

Dim excel As Object
Dim workbook As Object
Dim sheet As Object

excel = CreateObject("Excel.Application")
workbook = excel.Workbooks.Open("C:\Users\me\Desktop\NECESARY.xlsx")

'I complete all I want to export here

Dim fileName As String = "C:\Users\me\Desktop\" & file & ".csv"

System.IO.File.Delete(fileName)     

workbook.SaveAs(fileName)
workbook.Close()