access數據庫的一些少用操作,ASP,創建數據庫文件,創建表,創建字段

2024-05-04 10:59:02

字體：大中小

來源：轉載

供稿：網友

復制代碼代碼如下:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
if Trim(Request.Form("TableName"))

'----設置打開數據庫連接
dbs="Data Source="+server.mappath("database.mdb")+";Provider=Microsoft.Jet.OLEDB.4.0;"
set conn=server.createobject("ADODB.connection")
conn.open dbs

'定義ADOX，指定連接
set ADOX =server.createobject("ADOX.Catalog")
Set ADOX.ActiveConnection = conn

'創建Table,寫入屬性
Set objTable= Server.CreateObject("ADOX.Table")
'objTable.name="Table3"
objTable.name=Trim(Request.Form("TableName"))' 表單獲取
'objTable.parentCatalog = ADOX

'定義第一個字段
set objColumn = server.createObject("ADOX.Column")
'Set objColumn.parentCatalog = ADOX
objColumn.name="Column1"
objColumn.type=202 '數據類型202代表文本,
objColumn.Attributes=2 '1--必填字段，2--非必填
objTable.Columns.Append objColumn
set objColumn = nothing '清除第一個字段信息

'定義第二個字段
set objColumn = server.createObject("ADOX.Column")
'Set objColumn.parentCatalog = ADOX
objColumn.name="Column2"
objColumn.type=3
objColumn.Attributes=2
objTable.Columns.Append objColumn
set objColumn = nothing

ADOX.Tables.Append objTable

Set ADOX = Nothing

%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>建立表格和字段</title>
<style type="text/css">

</style></head>

<body>
'使用 Column 對象的屬性和集合，可以： 
 '使用 Name 屬性標識列。 
 '使用 Type 屬性指定列的數據類型。 
 '使用 Attributes 屬性確定列是否為固定長度，或者是否能包含 Null 值。 
 '使用 DefinedSize 屬性指定列的最大尺寸。 
 '對于數字數據值，使用 NumericScale 屬性指定范圍。 
 '對于數字數據值，使用 Precision 屬性指定最大精度。 
 '使用 ParentCatalog 屬性指定列的父 Catalog。 
 '對于鍵列，使用 RelatedColumn 屬性指定相關表中相關列的名稱。 
 '對于索引列，使用 SortOrder 屬性指定排序順序是升序還是降序。
數據類型如下表：
<TABLE border=1 cellpadding=4 cellspacing=4 cols=4 frame=box rules=all width=100%>

上一篇：ASP ACCESS 日期操作語句小結 By Stabx

下一篇：不用模板，只用ASP+FSO生成靜態HTML頁的一個方法

發表評論

共有條評論