推薦：ASP技巧:rs.getrows方法
GetRows()方法是將數(shù)據(jù)從 Recordset 復(fù)制到二維數(shù)組中，這是一個(gè)二維數(shù)組，第一個(gè)下標(biāo)標(biāo)識字段，第二個(gè)則標(biāo)識記錄號 所以rsArray = rs.GetRows() rsArray(0, 0)就表示記錄集第一行的第一字段值 rsArray(1, 0)就表示記錄集第一行的第二字段值 數(shù)組的數(shù)據(jù)是保

本例主要講述如何應(yīng)用Create、Drop和Alter語句增加、刪除ACCESS表和字段，代碼如下：

<%
''''''''''''''''''''''''''''''''''''
' 增加、刪除表和字段
' ├Create Table 表名(field1 type[(size)] [null|not null] [default eExpression] [primary key][,field2...])
' type:counter;text(num);char(num),varchart(num);memo;short;long;single;double;date/time;logical;currency;oleobject
' ├Drop Table 表名
' ├Alter Table 表名 Add Column field type[(size)][not null]
' ├Alter Table 表名 Drop Column field
''''''''''''''''''''''''''''''''''''
Dim objConn,strsql
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.MapPath("webjxcom.mdb")
strsql = "Create table mzwucom(id counter primary key,name char(20),url char(50),hits short)"
objConn.execute(strsql)
strsql = "Alter table mzwucom add column field1 text(20)"
objConn.execute(strsql)
strsql = "Alter table mzwucom add column field2 text(20)"
objConn.execute(strsql)
strsql = "Alter table mzwucom drop column field2"
objConn.execute(strsql)
strsql = "drop table mzwucom"
objConn.execute(strsql)
%>

分享：Asp Fso文件/文件夾操作類
和前面提到的一樣，這個(gè)也只是把一些函數(shù)壓在一起。實(shí)際上用一些函數(shù)集的方法放程序中更好。 主要功能： 1,創(chuàng)建刪除文件夾 2,獲取某個(gè)文件夾里的文件夾名稱和個(gè)數(shù) 3,獲取某個(gè)文件夾里的文件名稱和個(gè)數(shù) 4,檢查某個(gè)文件夾是否存在 5,檢查某個(gè)文件是否存在 6,刪