首页 爱情文章 亲情文章 友情文章 生活随笔 校园文章 经典文章 人生哲理 励志文章 搞笑文章 心情日记
  • 爱情文章
  • 亲情文章
  • 友情文章
  • 生活随笔
  • 校园文章
  • 经典文章
  • 人生哲理
  • 励志文章
  • 搞笑文章
  • 心情日记
  • 英语文章
  • 范文大全
  • 作文大全
  • 新闻阅读
    •
    当前位置: 山茶花美文网 > 人生哲理 > 正文

    【怎么在用asp代码来创建Access数据库】asp查询sql数据库代码

    时间：2020-05-28来源：山茶花美文网 本文已影响 人 山茶花美文网手机站

    尽管我们可以通过设计器来创建数据库, 但是我们也可以在asp的代码中创建数据库,这里我们就一起来看一下如何在asp中创建数据库.

    在ASP中创建数据库,我们需要用到ADOX(Microsoft ADO Extensions for DDL and Security), 这个ADO的扩展可以帮助我们创建和修改数据库结构信息, 也包括数据库对象的安全策略. 它随着ADO 2.1 出现, 所以它能够在大多数的Windows平台上工作. 您可以到MS的官方网站去获取最新的ADO版本,当然,里边包括了ADOX.

    创建数据库

    在我们开始代码编写之前,确定IIS所对应的帐号IUSER_[MachineName](MachineName：一般是你的计算机名) 拥有对您要创建数据库的目录有写入权限。你也可以打开要保存数据库文件的目录的属性对话框，找到安全选项，添加上述用户的写入权限。

    为了顺利创建数据库，我们首先需要创建一个空的数据库对象，然后我们才能创建一个新表和定义表的各列。这里有个重要的一点儿就是说，我们创建表的时候，必须在创建完数据库后关闭数据连接。否则我们将没有办法创建数据库和定义数据列。这就是为什么，我会在接下来创建两个方法：CreateAccessDB(创建数据库), CreateAccessTB(创建数据表)，变量DBName用来定义要添加数据库的名字，phyPath用来定义存放数据库文件的路径。下边我们来看代码：

    怎么在用asp代码来创建Access数据库1

    这段代码包含了一个adovbs.inc文件，这是个非常有用的文件，它定义了ADO和ADOX中用到的所有数值型变量，你可以在代码中找到该文件，也可以去你自己电脑上：C:Program FilesCommon FilesSystemado下找到。如果需要在你的页面中间引用，需要复制到网站自己的目录下边。

    下边是创建数据库的代码：

    怎么在用asp代码来创建Access数据库2

    数据库创建完了，接下来该表了，否则我们要一个没有表的数据库是毫无意义的。下边是创建表的代码：

    1 Sub CreateAccessTB(DBToCreate)

    2 Dim catDB " As ADOX.Catalog

    3 Set catDB = Server.CreateObject("ADOX.Catalog")

    4 " Open the catalog

    5 catDB.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _

    6 "Data Source=" & Server.Mapath(DBToCreate)

    7 Dim tblNew " As ADOX.Table

    8 Set tblNew = Server.CreateObject("ADOX.Table")

    9 tblNew.Name = TBName

    10 " First Create an Autonumber column, called ID.

    11 " This is just for demonstration purposes.

    12 " You could have done this below with all the other columns as well

    13 Dim col " As ADOX.Column

    14 Set col = Server.CreateObject("ADOX.Column")

    15 With col

    16 ParentCatalog = catDB

    17 .Type = adInteger

    18 .Name = "ID"

    19 .Properties("Autoincrement") = True

    20 End With

    21 " Now add the rest of the columns

    22 With tblNew

    23 " Create fields and append them to the

    24 " Columns collection of the new Table object.

    25 With .Columns

    26 .Append "NumberColumn", adInteger

    27 .Append "FirstName", adVarWChar

    28 .Append "LastName", adVarWChar

    29 .Append "Phone", adVarWChar

    30 .Append "Notes", adLongVarWChar

    31 End With

    32

    33 Dim adColNullable " Is not defined in adovbs.inc,

    34 " so you need to define it here.

    35 " The other option is adColFixed with a value of 1

    36 adColNullable = 2

    37 With .Columns("FirstName")

    38 .Attributes = adColNullable

    39 End With

    40 End With

    41 " Add the new Table to the Tables collection of the database.

    42 catDB.Tables.Append tblNew

    43 Set col = Nothing

    44 Set tblNew = Nothing

    45 Set catDB = Nothing

    46 End Sub

    然后，可以在需要的地方调用：

    1" First call the Create Database method

    2 CreateAccessDB DBName

    3

    4 " Then add a table and columns to this database

    5 CreateAccessTB DBName

    • 【怎么在用asp代码来创建Access数据库】asp查询sql数据库代码 相关文章:
    • 爱情文章
    • 亲情文章
    • 友情文章
    • 随笔
    • 哲理
    • 励志
    • 范文大全

    最新文章

    热点文章

    推荐访问

    军训远足心得体会 军训爬山心得体会 大学军训徒步拉练感想 军训徒步作文 军训徒步10公里感想 军训徒步心得体会 5分钟演讲中秋节节日 中秋一分钟演讲 中秋节演讲稿4分钟 中秋节演讲稿一分钟 中秋节演讲稿五分钟 3-5分钟 中秋节短篇演讲稿 中秋节演讲稿两分钟 中秋节的演讲稿3分钟 关于中秋节的演讲稿三分钟 孩子体验军训的心得 参加孩子军训活动的感受与收获 家长对孩子军训后的收获和感悟 小孩军训的收获与感悟 学生军训的收获与感悟 孩子军训成长过程家长感悟 孩子军训感悟 孩子军训心得体会 孩子军训的收获与感悟 兵役前训练心得体会 部队当兵的心得 新兵役前教育训练心得体会 预备役军训心得体会 新兵军训感悟

    本文【怎么在用asp代码来创建Access数据库】asp查询sql数据库代码由山茶花美文网整理提供，版权归原作者、原出处所有。

    Copyright © 山茶花美文网 All Rights Reserved.