鸿 网 互 联 www.68idc.cn

当前位置 : 服务器租用 > 数据库 > mssql > >

sql判断且增加字段ADD

来源:互联网 作者:佚名 时间:2015-03-13 12:25
sql 判断且增加字段 % Dim i,Rs,Sql,Table,Column,Bool Table = A Column = B Bool = False sql=Select * From [Table] Set Rs = Conn.ExeCute(Sql) For Each i In Rs.Fields 'Response.Write(i.Namebr) If i.Name=Column Then Bool = True Exit For End If

 sql 判断且增加字段

<%
Dim i,Rs,Sql,Table,Column,Bool
Table = "A"
Column = "B"
Bool = False
sql="Select * From ["&Table&"]"
Set Rs = Conn.ExeCute(Sql)
For Each i In Rs.Fields
'Response.Write(i.Name&"<br>")
If i.Name=Column Then
Bool = True
Exit For
End If
Next
If Bool Then
Response.Write("在《"&Table&"》表中,存在《"&Column&"》列!")
Else
Response.Write("在《"&Table&"》表中,不存在《"&Column&"》列!")
End If
%>

网友评论
<