明凯博客

关注网站技术,一个特立独行的程序员

ASP获取数据库表名字段名的方法

ASP获取数据库表名,字段名

以SQLServer为例:

1
2
3
4
< %   
SET Conn=Server.CreateObject("ADODB.Connection")   
Conn.Open "Server=IP地址;Provider=sqloledb;Database=库名称;UID=用户名;PWD=密码;"   
%>

读SqlServer库中的表名:

1
2
3
4
5
6
7
8
9
10
< %   
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
获取该表的所有字段名:

1
2
3
4
5
6
7
8
9
10
< %   
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 ,就可
以这样写:

1
2
3
4
< %   
Sql="ALTER TABLE [Things] DROP COLUMN thingsType"   
Conn.execute Sql   
%>

又比如我们想要添加一个字段thingsCOLOR,它的类型为varchar型,长度为20,且默认值为Red,写法如下:

1
2
3
4
< %   
Sql="ALTER TABLE [Things] ADD thingsCOLOR VARCHAR(20) DEFAULT 'Red'"   
Conn.execute Sql   
%>

以上对字段的基本操作都是用SQL语言实现,在ASP中,通过SQL语言,我们只要有足够的权限就可以完成
更多的数据库操作,比如用CREATE建表,用DROP删除表等等。

, , ,

相关文章

发表评论

电子邮件地址不会被公开。 必填项已用*标注