VBS创建数据库
浏览数：19 /
时间：2015年06月12日
‘创建数据库
‘参数：strDBPath 字符串型 数据库文件的完整路径
Sub CreateDataBase(strDBPath)
Dim catObj
Set catObj = CreateObject("ADOX.Catalog")
catObj.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source = " & strDBPath
Set catObj = Nothing
End Sub
‘关于catObj.Create的参数说明，这一串字符串，其中Provider表示数据库的版本，百度搜出来的代码大多数都是Microsoft.Jet.OLEDB.4.0，
‘反正我还知道Microsoft.ACE.OLEDB.12.0是Office 2010 Access的数据库，其他版本我就不清楚了。
‘Data Source 很明显，中文翻译过来就是 数据源，就是数据库的路径了。
‘例子如下：
CreateDataBase "C:\Test.mdb"
郑重声明：本站内容如果来自互联网及其他传播媒体，其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享，并不代表本站赞同其观点和对其真实性负责，也不构成任何其他建议。
