欢迎来到站长教程网!
兔子CDN

ASP编程

当前位置:主页 > 网络编程 > ASP编程 >

asp制作中常用到的函数库集合第1/8页

时间:2020-09-03|栏目:ASP编程|点击:

ASP函数库 
  <% 
  '''' 函数目录 '''' 
  ''''-----------------------------------------------'''' 
  '''' 函数ID:0001[截字符串] '''' 
  '''' 函数ID:0002[过滤html] '''' 
  '''' 函数ID:0003[打开任意数据表并显示表结构及内容]'''' 
  '''' 函数ID:0004[读取两种路径] '''' 
  '''' 函数ID:0005[测试某个文件存在否] '''' 
  '''' 函数ID:0006[删除某个文件] '''' 
  '''' 函数ID:0007[判断目录是否存在] '''' 
  '''' 函数ID:0008[创建目录] '''' 
  '''' 函数ID:0009[删除目录] '''' 
  '''' 函数ID:0010[指定目录的文件列表] '''' 
  '''' 函数ID:0011[指定目录的目录列表] '''' 
  '''' 函数ID:0012[创建文本文件] '''' 
  '''' 函数ID:0013[读取文本文件] '''' 
  '''' 函数ID:0014[检测ID是否为数字类型] '''' 
  '''' 函数ID:0015[正则表达式测试] '''' 
  '''' 函数ID:0016[获得执行程序的名称] '''' 
  '''' 函数ID:0017[读取用户IP地址信息] '''' 
  '''' 函数ID:0018[上传文件到指定目录并改文件名称] '''' 
  '''' 函数ID:0019[过滤HTML脚本] '''' 
  '''' 函数ID:0020[创建MsAccess数据库] '''' 
  '''' 函数ID:0021[创建MsSQLServer数据库] '''' 
  '''' 函数ID:0022[通过JMAIL发信] '''' 
  '''' 函数ID:0023[测试组件是否安装] '''' 
  '''' 函数ID:0024[上传文件的窗口] '''' 
  '''' 函数ID:0025[取得数据库链接字串] '''' 
  '''' 函数ID:0026[取得multipart/form-data形式上传文件] 
  '''' 函数ID:0027[保存或查看上传到数据库中的数据,带调用上传窗口] 
  '''' 函数ID:0028[取得图像的类型|宽|高] '''' 
  '''' 函数ID:0029[将本地文件进行二进制分析,并保存到服务器的指定目录下] 
  '''' 函数ID:0030[将本地数据表或库上传并导入到服务器数据库的表中] 
  '''' 函数ID:0031[返回服务器信息] '''' 
  '''' 函数ID:0032[产生20位长度的唯一标识ID] '''' 
  '''' 函数ID:0033[用于左填充指定数量的字符] '''' 
  '''' 函数ID:0034[用于右填充指定数量的字符] '''' 
  '''' 函数ID:0035[格式化时间(显示)] '''' 
  '''' 函数ID:0036[测试数据库是否存在] '''' 
  '''' 函数ID:0037[测试数据库中的表是否存在] '''' 
  '''' 函数ID:0038[在线HTML编辑器] '''' 
  '''' 函数ID:0039[判断是否奇数] '''' 
  '''' 函数ID:0040[生成验证码图像BMP] '''' 
  '''' 函数ID:0041[生成随机密码] '''' 
  '''' 函数ID:0042[字符加解密] '''' 
  '''' 函数ID:0043[解密字符加解密] '''' 
  '''' 函数ID:0044[创建数据表] '''' 
  '''' 函数ID:0045[在数据库中插入字段值] '''' 
  '''' 函数ID:0046[Cookie防乱码写入时用] '''' 
  '''' 函数ID:0047[Cookie防乱码读出时用] '''' 
  '''' 函数ID:0048[检测用户名和密码是否正确] '''' 
  '''' 函数ID:0049[生成时间的整数] '''' 
  '''' 函数ID:0050[获得栏目的所有子栏目字符串并用","隔开] 
  '''' '''' 
  '''' '''' 
  '''' '''' 
  '**************************************************'''' 
  '函数ID:0001[截字符串] 
  '函数名:SubstZFC 
  '作 用:截字符串,汉字一个算两个字符,英文算一个字符 
  '参 数:str ----原字符串 
  ' strlen ----截取长度 
  '返回值:截取后的字符串 
  '************************************************** 
  Public Function SubstZFC(ByVal str, ByVal strlen) 
   If str = "" Then 
   SubstZFC = "" 
   Exit Function 
   End If 
   Dim l, t, c, i, strTemp 
   str = Replace(Replace(Replace(Replace(str, " ", " "), """, Chr(34)), ">", ">"), "<", "<") 
   l = Len(str) 
   t = 0 
   strTemp = str 
   strlen = CLng(strlen) 
   For i = 1 To l 
   c = Abs(Asc(Mid(str, i, 1))) 
   If c > 255 Then 
   t = t + 2 
   Else 
   t = t + 1 
   End If 
   If t >= strlen Then 
   strTemp = Left(str, i) 
   Exit For 
   End If 
   Next 
   SubstZFC = Replace(Replace(Replace(Replace(strTemp, " ", " "), Chr(34), """), ">", ">"), "<", "<") 
  End Function 
12345678下一页阅读全文

上一篇:Asp下实现多表单域无组件文件上传的实例

栏    目:ASP编程

下一篇:asp下的风讯用的SQL通用防注入模块提供了

本文标题:asp制作中常用到的函数库集合第1/8页

本文地址:www.dtcnnet.com/asp/23928.html

您可能感兴趣的文章

广告投放 | 联系我们 | 版权申明

重要申明:本站所有的文章、图片、评论等,均由网友发表或上传并维护或收集自网络,属个人行为,与本站立场无关。

如果侵犯了您的权利,请与我们联系,我们将在24小时内进行处理、任何非本站因素导致的法律后果,本站均不负任何责任。

联系QQ:584415406 | 邮箱:584415406#qq.com(#换成@)

Copyright © 2015-2020 小白站长网 版权所有 苏ICP备20040415号