最近,在ASP論壇上看到很多網友問怎么獲取數據庫表名,字段名以及如何對字段進行刪除,增添的操作故寫此文。 本人對SQLServer比較熟一些,故以SQLServer為列: <% SET Conn=Server.CreateObject("ADODB.Connection") Conn.Open "Server=IP地址;Provider=sqloledb;Database=庫名稱;UID=用戶名;PWD=密碼;" %> 讀SqlServer庫中的表名: <% Set rs=Conn.OpenSchema(20) While not rs.EOF Response.Write("所在數據庫名:" & rs(0) & "<br>") Response.Write("所有者:" & rs(1) & "<br>") Response.Write("表 名:" & rs(2) & "<br>") Response.Write("表的類型:" & rs(3) & "<br>") rs.MoveNext Wend %> 這樣,我們知道表名了,現在我們再來看看怎么對表的字段進行操作。 假設:其中數據庫中有表:[Things],表中字段為:id,thingsName,thingsType 獲取該表的所有字段名: <% Dim i,j,Sql Set rs=Server.CreateObject(“ADODB.Recordset”) Sql="select * from [Things] where 1<>1" rs.open sql,Conn,1,1 j=rs.Fields.count For i=0 to (j-1) Response.Write("第" & i+1 & "個字段名:" & rs.Fields(i).Name & "<br><br>") Next %> 好了,現在我們明白了怎么獲取字段名了。 如果大家想對獲取的字段值進行一些操作,這也是可以的: 比如我們想要刪除表[Things]中字段thingsType ,就可 以這樣寫: <% Sql="ALTER TABLE [Things] DROP COLUMN thingsType" Conn.execute Sql %> 又比如我們想要添加一個字段thingsCOLOR,它的類型為varchar型,長度為20,且默認值為Red,寫法如下: <% Sql="ALTER TABLE [Things] ADD thingsCOLOR VARCHAR(20) DEFAULT 'Red'" Conn.execute Sql %> 以上對字段的基本操作都是用SQL語言實現,在ASP中,通過SQL語言,我們只要有足夠的權限就可以完成 更多的數據庫操作,比如用CREATE建表,用DROP刪除表等等
最后,本人才疏學淺,本篇文章肯定會有錯誤之處,還望大家批評。 也希望大家在CSDN上發短信給我共同探討,謝謝大家!
|