请教一个关于ACCESS的问题

iid0019 楼主

请问怎么用ASP代码新建一个空的ACCESS数据库

SenFe

1. <%
   
2. Dim sDataName,oFso, oCat
   
3. sDataName = "data/mdb.mdb"
   
4. Set oFso = Server.CreateObject("Scripting.FileSystemObject")
   
5.         If Not oFso.FileExists(Server.MapPath(sDataName)) Then        '检查数据库是否存在
   
6.                 '创建数据库文件
   
7.                 Set oCat = Server.CreateObject("ADOX.Catalog")
   
8.                         oCat.Create "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath(sDataName)
   
9.                 Set oCat = Nothing
   
10.                 Response.Write "创建成功!"
    
11.         Else
    
12.                 Response.Write "已经存在!"
    
13.         End If
    
14. Set oFso = Nothing
    
15. %>

复制代码

iid0019 楼主

谢谢帮忙