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

2024-05-04 11:02:43

字體：大中小

來源：轉載

供稿：網友

復制代碼代碼如下:
<%@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。

上一篇：ASP實現URL編碼

下一篇：文章內頁類