复制代码 代码如下:Function CheckFields(FieldsName,TableName) Flag=False sql="select * from "&TableName Set RS=Conn.Execute(sql) for i = 0 to RS.Fields.Count - 1 if RS.Fields(i).Name=FieldsName then Flag=True Exit For else Flag=False end if Next CheckFields=Flag End Function

　　推荐阅读

　　asp获取当前网页地址的代码

当前页地址 <%dim urlname urlname=Request.ServerVariables("QUERY_STRING")%> <%=Request.ServerVariables("SCRIPT_NAME")%><%if urlname<>"" then%>?<%=urlname%><%end if%> >>>详细阅读

本文标题：asp下检查表中是否存在某个字段（列）函数

地址：http://www.17bianji.com/kaifa2/ASP/32293.html

 1/2    1