access数据库的一些少用操作,ASP,创建数据库文件,创建表,创建字段

2019-04-02 18:34:01刘景俊

</TR>

<TR VALIGN="top">
<TD class=T width=32%><B>adWChar</B>
<P class=T></P>
</TD>
<TD class=T width=13%>130</TD>
<TD class=T width=55%>指示一个以 Null 终止的 Unicode 字符串 (DBTYPE_WSTR)。</TD>
</TR>
</TABLE>
</body>
</html>

在已有的表,创建字段。

<%
dbs="Data Source="+server.mappath("database.mdb")+";Provider=Microsoft.Jet.OLEDB.4.0;"
set conn=server.createobject("ADODB.connection")
conn.open dbs
set cat =server.createobject("ADOX.Catalog")
Set cat.ActiveConnection = conn
set tbl=cat.tables("bbs")
set objColumn = server.createObject("ADOX.Column")
Set objColumn.parentCatalog = cat
objColumn.name = "time1"
objColumn.type = "130"
objColumn.attributes=2
tbl.columns.append objColumn

set objTable = nothing
set objCat = nothing

%>


删除字段和修改字段

<%
dbs="Data Source="+server.mappath("database.mdb")+";Provider=Microsoft.Jet.OLEDB.4.0;"
set conn=server.createobject("ADODB.connection")
conn.open dbs
set cat =server.createobject("ADOX.Catalog")
Set cat.ActiveConnection = conn
set tbl=cat.tables("bbs")
tbl.columns.delete "time"

set field=tbl.columns("time2")

field.name="time"
%>


创建数据库文件

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Option Explicit
dim databasename '定义数据库名称
databasename="database.mdb" '数据库名称
dim databasepath '定义数据库存放路径
databasepath="E:张伟模块开发新闻模块" '数据库绝对路径
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 ACCESS 日期操作语句小结 By Stabxasp 获取access系统表,查询等操作代码Asp 操作Access数据库时出现死锁.ldb的解决方法asp.net(C#) Access 数据操作类asp实现的查询某关键词在MSSQL数据库位置的代码asp 在线备份与恢复sqlserver数据库的代码asp终极防范SQL注入漏洞asp连接mysql数据库详细实现代码asp连接access、sql数据库代码及数据库操作代码asp操作access提示无法从指定的数据表中删除原因分析及解决ASP中巧用Split()函数生成SQL查询语句的实例asp执行带参数的sql语句实例ASP 连接 SQL SERVER 2008的方法ASP通过ODBC连接SQL Server 2008数据库的方法ASP语言实现对SQL SERVER数据库的操作