|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
在网上看到很多这方面的代码,但是有些是不能用,有些是垃圾代码太多,我简朴的修改了一下现在与大家共享一下。 <% Option Explicit dim databasename \\\'定义数据库名称 databasename="database.mdb" \\\'数据库名称 dim databasepath \\\'定义数据库存放路径 databasepath="D:officejd21database" \\\'数据库绝对路径 dim databasever \\\'定义数据库版本 2000 或者 97 databasever = "2000" Function Createdfile(FilePath,FileName,Ver) Dim Ca,dbver select case ver case "97" dbver = "3.51" case "2000" dbver = "4.0" end select if dbver <> "" then Set Ca = Server.CreateObject("ADOX.Catalog") call Ca.Create("Provider=Microsoft.Jet.OLEDB." & dbver & ";Data Source=" & filepath & filename) end if End Function Createdfile databasepath,databasename,databasever \\\'创建数据库 %> 本来用asp创建数据库是没有什么用处的,不过,这样不是显得自己的东西更好一点。 返回类别: 教程 上一教程: 截取一定长度字符串 下一教程: 对数据库中的记录用上一条下一条显示(三) 您可以阅读与"用ASP创建数据库"相关的教程: · ASP实现在WEB中显示电子表格数据(三)创建数据表列表和名字范围 · ASP创建SQL SERVER数据库的两种方式 · asp实现在web中显示电子表格数据(三)创建数据表列表和名字范围 · 网络寻呼机数据库版显示历史消息HISTORY.ASP · ASP操作ACCESS数据库的程序 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |