asp下检查表中是否存在某个字段（列）函数

答案：
[复制此代码]CODE:

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    

上一个：一想千开PJblog审核功能补丁 v2.0版 发布第1/3页
下一个：检查上传图片是否合法的函数,木马改后缀名、图片加恶意代码均逃不过