当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP编程入门进阶(廿一):DAO SQL之建立数据库表

ASP
ASP编程菜鸟易犯的一个错误
ASP申请单动态添加实现方法及代码
经验总结:ASP与存储过程解析
学以致用 驳“ASP低能论”
使用ASP脚本技术
ASP、Request对象与SQL注入
判断访问是否来自搜索引擎的ASP函数
ASP判断数据库值是否为空的通用函数
大刀阔斧扔掉ASP,充分准备学习ASP.NET
关于创建多级文件夹的ASP函数实例
ASP正则判断取出HTML的图片地址的函数
网页不存在自动给管理员发邮件的ASP代码
ASP教程:等差数列和等比数列通项公式
Recordset对象和Command对象的区别
Filter与updatebatch混合使用实现批量更新
ASP实例:检测整数和长整数的函数
在不支持FSO的服务器上使用XMLDOM创建HTML文件
汉字转拼音ASP函数
网页输出N行N列表格的ASP实现方法
ASP操作数据库的类

ASP编程入门进阶(廿一):DAO SQL之建立数据库表


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 178 ::
收藏到网摘: n/a

你是否为自己设计的数据库感到满足了呢?你确信就不要对其再处理?比如新建立数据库表,比如建立或者修改某个字段……当然这些都属于设计数据库之列。
那么,你正常的操作又是不是下载数据库到本机,然后打开之进行修改,接着再上传上去?十有八九都是如此-_-!
现在,你可以接触下有关于此的信息了,毕竟代码的功能是为手动的操作省了不少时间。不过代码的生成也还不是手工?呵呵:)
1,建立数据库文件cnbruce.mdb(不设计任何表)
建立数据库的代码:

<%
Option Explicit
dim databasename '定义数据库名称
databasename="cnbruce.mdb" '数据库名称
dim databasepath '定义数据库存放路径
databasepath="e:\cnbruce\database\" '数据库绝对路径
dim databasever '定义数据库版本 2000 或者 97
databasever = "2000"
Function Createdfile(FilePath,FileName,Ver)
Dim cnbruce,dbver
select case ver
case "97"
dbver = "3.51"
case "2000"
dbver = "4.0"
end select
if dbver <> "" then
Set cnbruce = Server.CreateObject("ADOX.Catalog")
call cnbruce.Create("Provider=Microsoft.Jet.OLEDB." & dbver & ";Data Source=" & filepath & filename)
end if
End Function
Call Createdfile(databasepath,databasename,databasever) '创建数据库
%>

那么,再看如何设计建立一个新的数据库表吧
2,建立数据库的连接文件conn.asp


<%
db_path = "cnbruce.mdb"
Set conn= Server.CreateObject("ADODB.Connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db_path)
conn.Open connstr
%>

3,建立新数据库表的程序页面addtable.asp


<!--#include file="conn.asp" -->
<%
Set rs = Server.CreateObject ("ADODB.Recordset")
sql = "create table aboutme (id integer primary key,name text,Birthday datetime)"
rs.Open sql,conn,2,3
%>
数据库表文件建立完毕。

create table aboutme (id integer primary key,name text,Birthday datetime)
建立新的表aboutme,设计其字段有id(主关键字)、name(备注)、Birthday(时间日期)