在本地创建一个来自vbscript的新数据库

Question

我需要做一些csv操作并使用vbscript来完成它。完成程序后，我需要将2000个csv文件转储到数据库中。我想用vbscript做这个。有人可以帮我解决下面的代码。有什么问题以及如何以更好的方式做到这一点。 目前我收到的授权错误无效，根据google可能会因多种原因发生错误。

Const DB_CONNECT_STRING = "Provider=SQLOLEDB.1;Data Source=.;Initial Catalog=fret;Trusted_Connection=True;"
Set myConn = CreateObject("ADODB.Connection")
Set myCommand = CreateObject("ADODB.Command" )
myConn.Open DB_CONNECT_STRING
Set myCommand.ActiveConnection = myConn
myCommand.CommandText = "create DATABASE TEMP"
myCommand.Execute
myConn.Close