CSDN博客

img bubuy

ASP获取数据库表名,字段名以及对字段的一些操作

发表于2003/10/14 0:57:00  1391人阅读

分类: ASP

       最近,在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上发短信给我共同探讨,谢谢大家!

0 0

相关博文

我的热门文章

img
取 消
img