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

代码如下:

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

(0)

相关推荐

  • asp下检查表中是否存在某个字段(列)函数

    复制代码 代码如下: 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=Fi

  • asp下正则实现URL自动链接的一个函数

    复制代码 代码如下: Function AutoLinkURLs(strString)       Dim match, matches, offset, url, email, link, relnkAutoLinkURL       relnkAutoLinkURL = "<a href=""[[%URL%]]"">[[%URLText%]]</a>"       If Not IsObject(regExp) The

  • asp下实现对HTML代码进行转换的函数

    <% '****************************** '函数:HTMLEncode(reString) '参数:reString,待编码转换处理的字符串 '作者:阿里西西 '日期:2007/7/15 '描述:对HTML代码进行转换 '示例:HTMLEncode("<p>欢迎访问<br>阿里西西</p>") '****************************** Function HTMLEncode(reString)

  • asp下实现格式化文件大小以MB显示的函数

    <% '****************************** '函数:FormatFileSize(l1) '参数:l1,字节数 '作者:阿里西西 '日期:2007/7/12 '描述:格式化文件大小样式 '示例:<%=FormatFileSize(l1)%> '****************************** function FormatFileSize(l1)  dim l2,l3  l3=formatnumber(l1,0,true)  if l1>104

  • asp下的一个检测链接是否正常的函数

    Function urlChk(sUrl) on error resume next Set xmlHttp = Server.CreateObject("Microsoft.XMLHTTP") xmlHttp.open "GET",sUrl,false xmlHttp.send     if xmlHttp.Status <> 200 then         urlChk=false     else         urlChk=true     

  • ASP下经常用的字符串等函数参考资料

    参考资料之ASP函数  整理下asp下常用的字符串,数据等操作函数,大家在平时操作中也经常遇到的 1.函数 array() 功能:创建一个数组变量 格式:array(list) 参数:list 为数组变量中的每个数值列,中间用逗号间隔 例子: 结果: i 被赋予为数组 2.函数 Cint() 功能:将一表达式/其它类型的变量转换成整数类型(int) 格式:Cint(expression) 参数:expression 是任何有效的表达式/其它类型的变量 例子:   结果: 236 函数Cint()

  • [c#]asp.ent下开发中Tag的开发技巧

    网站开发常用关键字(tag),一般需要获得最多的被采用的Tag,也就是流行词. 通常思路是将关键字tag保存到单独表中,然后在其他表中根据一组id进行对多个关键字进行标识.因为一个文章可以选择多个tag,查询的时候颇为麻烦. 所以我在开发中利用了这样的方法,当然不见得多高明 :),分享下经验. 将tag直接保存在文章的表中,如Tag字段,tag为"c#"和".net",则Tag字段值为"c#/.net"就是依/符号分割tag,这样数据库中保存的是

  • asp下删除Access数词库中的空记录的sql语句

    用零长度字符指示不存在数据  若要在 Microsoft Access 数据库中指示不存在数据,可以在"文本"或"备注"字段输入零长度字符串 (零长度字符串:不含字符的字符串.可以使用零长度字符串来表明您知道该字段没有值.输入零长度字符串的方法是键入两个彼此之间没有空格的双引号 (" ").).在连接到 Microsoft SQL Server 数据库的 Microsoft Access 项目 (Microsoft Access 项目:与 Mic

  • ASP.NET程序中常用代码汇总

    1. 打开新的窗口并传送参数: //传送参数: response.write("<script>window.open('*.aspx?id="+this.DropDownList1.SelectIndex+"&id1="++"')</script>") //接收参数: string a = Request.QueryString("id"); string b = Request.QueryS

  • ASP.NET Lable中进行换行解决方案

    这个问题,应该算是很简单的问题,可说实在的,折腾了2个小时的时候,后面整出来的时候,真坑爹呢.现在把这个过程给大家,希望可以给大家一个提醒. 一.VB.NET ASP.NET问题还原 当我对一条数据进行编辑的时候,我们进入了编辑页面,比如下面页中的Work Araound字段 我对这些字段填了一些内容.我通过回车,分成了一段一段,可是,当我们保存这个编辑页面的时候,结果如下: 可以很清楚看到显示出来的值没有分段.显示效果很不友好. 解决方案: 关键字:vbCrLf(因为项目需要,所以用的是VB.

随机推荐