可以使用ASP在程式當(dāng)中直接建立修改刪除表

與表有關(guān)的SQL語法如下：



建立一個(gè)表：CREATE TABLE表達(dá)式。

修改一個(gè)表：ALTER TABLE表達(dá)式。

刪除一個(gè)表：DROP TABLE表達(dá)式。

建立一個(gè)索引：使用CREATE INDEX 或 ALTER TABLE表達(dá)式。

刪除一個(gè)索引：DROP INDEX表達(dá)式。


詳細(xì)介紹如下：

CREATE TABLE表達(dá)式

CREATE TABLE表達(dá)式，建立一個(gè)新的表。

語法如下：

CREATE TABLE 新表(新字段名稱1 字段類型 [(長度)] [NOT NULL] [索引1] [,新字段名稱2 字段類型 [(長度)] [NOT NULL] [索引2] [, ...]] [, CONSTRAINT multifieldindex [, ...]])

長度為字符類型及字符長度。

索引1, 索引2 CONSTRAINT子句定義單一字段索引。

multifieldindex定義一多重字段索引。

使用CREATE TABLE表達(dá)式，如果將一字段指定為NOT NULL，則在此字段中新增的記錄資料內(nèi)容必須是有效的資料。

CONSTRAINT子句可在一字段上建立不同的限制，并且也可以用來建立主索引。

您可以使用CREATE INDEX表達(dá)式，在現(xiàn)有的表上建立一個(gè)主索引或多個(gè)索引。

讓我們看一個(gè)在ASP程式碼當(dāng)中使用這個(gè)SQL指令的例子。

譬如ASP程式碼rs61.asp如下，[CREATE TABLE 學(xué)員 (姓名 TEXT(10), 年齡 INT)] 先建立一個(gè)學(xué)員的表，包括10個(gè)位元長度TEXT類型的姓名字段，和整數(shù)類型的年齡字段：

<%

Set conn1 = Server.CreateObject("ADODB.Connection")

conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"

sql = "CREATE TABLE 學(xué)員 (姓名 TEXT(10), 年齡 INT)"

Set a = conn1.Execute(sql)

Response.Write "CREATE TABLE OK<p>"

conn1.Close

%>

執(zhí)行后，使用Access打開NtopSamp.mdb文件時(shí)，可看到新建立一個(gè)學(xué)員的表。

ALTER TABLE表達(dá)式

ALTER TABLE表達(dá)式，修改已建立好的表。

語法如下：

ALTER TABLE 表 {ADD {COLUMN 字段名稱 字段類型[(長度)] [NOT NULL] [CONSTRAINT 索引]
CONSTRAINT multifieldindex}
DROP {COLUMN 字段名稱 I CONSTRAINT 多重字段索引名稱} }

使用ALTER TABLE表達(dá)式，您可以利用多種不同方法，變更目前已存在的表：


使用ADD COLUMN新增字段到表。

使用DROP COLUMN刪除一字段。只需指定欲刪除之字段名稱即可。

使用ADD CONSTRAINT新增多重字段索引。

使用DROP CONSTRAINT刪除多重字段索引。只需指定緊接在CONSTRAINT之后的索引名稱即可。

使用ADD COLUMN新增字段到表時(shí)，必須指定字段名稱、所屬類型、以及類型和長度。


例如，下例增加一個(gè)2個(gè)字符長度，名為性別的字符類型字段到學(xué)員表中：

ALTER TABLE 學(xué)員 ADD COLUMN 性別 TEXT(2)

您也可以對此字段定義索引。

如果您對一字段指定 NOT NULL，則在此字段中所新增的記錄資料必須是有效的資料。

您不能同時(shí)新增或刪除多個(gè)字段或索引。

譬如ASP程式碼rs63.asp如下，[CREATE TABLE 學(xué)員1 (姓名 TEXT(10), 年齡 INT)] 先建立一個(gè)學(xué)員1的表，然后使用 [ALTER TABLE 學(xué)員1 ADD COLUMN 性別 TEXT(2)] 增加一個(gè)2個(gè)字符長度，名為性別的字符類型字段到學(xué)員1表中：

<%

Set conn1 = Server.CreateObject("ADODB.Connection")

conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"

sql = "CREATE TABLE 學(xué)員1 (姓名 TEXT(10), 年齡 INT)"

Set a = conn1.Execute(sql)

Response.Write "CREATE TABLE OK<p>"

sql = "ALTER TABLE 學(xué)員1 ADD COLUMN 性別 TEXT(2)"

Set a = conn1.Execute(sql)

Response.Write "ALTER TABLE OK<p>"

conn1.Close

%>

執(zhí)行后，使用Access打開NtopSamp.mdb文件時(shí)，可看到表學(xué)員1新建立一個(gè)姓別的字段。

DROP表達(dá)式

DROP表達(dá)式從一個(gè)數(shù)據(jù)庫中刪除一個(gè)已存在的表，或從一個(gè)表中刪除一個(gè)已存在的索引。

語法如下：

DROP {TABLE 表 INDEX 索引 ON 表}

表必須先關(guān)閉，才能刪除此表或由此表中的索引。

若要?jiǎng)h除索引，除了使用DROP INDEX 索引 ON 表，也可以使用ALTER TABLE。

譬如ASP程式碼rs62.asp如下，首先使用 [CREATE TABLE 學(xué)員2 (姓名 TEXT(10), 年齡 INT)] 先建立一個(gè)學(xué)員2的表，包括10個(gè)字符長度TEXT類型的姓名字段，和整數(shù)類型的年齡字段，然后使用 [DROP TABLE 學(xué)員2] 刪除學(xué)員2的表：

<%

Set conn1 = Server.CreateObject("ADODB.Connection")

conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"

sql = "CREATE TABLE 學(xué)員2 (姓名 TEXT(10), 年齡 INT)"

Set a = conn1.Execute(sql)

Response.Write "CREATE TABLE OK<p>"

sql = "DROP TABLE 學(xué)員2"

Set a = conn1.Execute(sql)

Response.Write "DROP TABLE OK<p>"

conn1.Close

%>
（出處：熱點(diǎn)網(wǎng)絡(luò)）