[英]How to Overwrite file on SaveAs without asking VB.NET
我正在創建一個導出器來將我從一些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()
這可以正常工作,並且可以完美地導出我的所有數據,但正如我所說,我不需要被問到是否要覆蓋文件,有太多文件需要一個一個地接受它們。
一種解決方案是在保存之前刪除以前的文件:
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()
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.