将Excel文件转换为CSV，然后将该数据从CSV移动到oracle数据库

我有一个excel表格，我希望它是CSV格式的，然后CSV中的数据应该加载到oracle数据库的表中

我有一个VBscript将excel文件转换为CSV，但excel工作表的格式有点不同，因此CSV文件没有正确填充。我附上一个链接下载该样本excel表

如果注意到红色文本是字段，它们各自的数据位于下一个单元格中。例如，标题日期数据为1/1/2000。现在，当我使用vbscript转换它时，我在这里附加了一个链接以下载该csv

我想去掉所有逗号和第1列（长度10）以及所有其他要删除的字符。CSV文件中应仅显示标题及其数据。你能帮我做这个吗

提前谢谢。VBscript代码如下所示：-

WorkingDir = "C:\Users\vijaywp\Desktop"
Extension = ".XLS"

Dim fso, myFolder, fileColl, aFile, FileName, SaveName
Dim objExcel,objWorkbook

Set fso = CreateObject("Scripting.FilesystemObject")
Set myFolder = fso.GetFolder(WorkingDir)
Set fileColl = myFolder.Files

Set objExcel = CreateObject("Excel.Application")

objExcel.Visible = False
objExcel.DisplayAlerts= False

For Each aFile In fileColl
ext = Right(aFile.Name,4)
If UCase(ext) = UCase(extension) Then
'open excel
FileName = Left(aFile,InStrRev(aFile,"."))
Set objWorkbook = objExcel.Workbooks.Open(aFile)
SaveName = FileName & "csv"
objWorkbook.SaveAs SaveName, 23
objWorkbook.Close 
End If  
Next

Set objWorkbook = Nothing
Set objExcel = Nothing
Set fso = Nothing
Set myFolder = Nothing
Set fileColl = Nothing

在这个转换之后，我希望将CSV数据加载到Oracle数据库表中。请帮忙

---

以下是预期CSV输出的链接：-

如果您希望在CSV文件中使用自定义格式，请逐行、逐列读取excel，并根据您的选择将数据写入CSV

---

如果列中的逗号是唯一的问题，那么请使用一个选项对列文本进行双引号引用，以便其中的逗号不会造成问题

这可能令人失望，但是，先去csv可能根本没有必要。如果有Excel，则需要将数据放入Oracle表中。假设我们的Oracle表“成员列表”有三列：姓名、电话、城市。我们的Excel数据在A列有名称，在B列有电话，在C列有城市。我们的标题在第1行，数据从第2行开始。 在D2列中输入以下公式： =“进入成员列表（&$A$1&“、”&$B$1&“、”&$C$1&“）值（“&A2&“、”&B2&“、”&C2&“） 将此相同语句复制到每个数据行。 返回SQLDeveloper类型：全部插入 然后将所有“D”列复制到“语句”中 进入SQLDeveloper。最后键入： 从双重选择中选择*

---

执行后，您现在已将所有Excel数据插入到Oracle中

你能分享你想要的CSV吗？你的文件中有太多的数据，而且不清楚你到底想要什么…你想过这样做吗？我将以我想要的方式共享CSV。您好，我已附加了一个链接，用于我所需的预期CSV格式。请检查并告诉我什么时候可以完成。提前谢谢。请帮我做这个。我正在尝试，但无法得到它。实际上，我是新来的。你能帮我做些什么吗？逐个单元格读取excel并将其写入文件？Net会给你很多关于如何逐单元格阅读excel的例子。我确实搜索过，但没有找到多少。