asp下实现截取字符串特定部分内容函数_应用技巧

截取字符串特定部分内容函数<%
'******************************
'函数：GetKey(HTML,Start,Last)
'参数：HTML,待截取的原字符串；tart,截取开始标记；last,截取结束标记
'作者：阿里西西
'日期：2007/7/12
'描述：截取字符串函数，从Start开始截取，到Last为结束
'示例：<%=GetKey("阿里西西，国内最大的WEB开发资源","最大的","资源")%>
'******************************
Function GetKey(HTML,Start,Last)
filearray=split(HTML,Start)
filearray2=split(filearray(1),Last)
GetKey=filearray2(0)
End Function
%>

时间： 2024-07-29 19:35:27

asp下实现截取字符串特定部分内容函数_应用技巧的相关文章

asp下实现截取字符串特定部分内容函数

截取字符串特定部分内容函数<% '****************************** '函数:GetKey(HTML,Start,Last) '参数:HTML,待截取的原字符串:tart,截取开始标记:last,截取结束标记 '作者:阿里西西 '日期:2007/7/12 '描述:截取字符串函数,从Start开始截取,到Last为结束 '示例:<%=GetKey("阿里西西,国内最大的WEB开发资源","最大的","资源")%

asp 下用正则表达式检测邮箱格式的函数_应用技巧

'********************************************************* '函数:IsValidEmail[str] '参数:str,待处理的字符串 '作者:木木 '日期:2007/7/12 '描述:检测邮箱格式是否为xxxx@xxx.com或者xxxx@xxx.com.cn等格式 '示例:<%=IsValidEmail(ali@alixixi.com)%> '*********************************************

asp下最简洁的多重查询的解决方案_应用技巧

最简洁的多重查询的解决方案 [前言] 我们经常会遇到多重查询问题,而长长的SQL语句往往让人丈二和尚摸不着头脑.特别是客户端部分填入查询条件时,如用普通方法将更是难上加难. 以下巧妙地利用"where 1=1"的恒等式(事实上很多,让它值为TRUE即可)解决此问题. [正文概要] 'subject 信息标题 'company 发布信息的公司名称 'content 发布信息的内容 'address 公司地址 'infomation 公司简介 'note 相关说明 以上值均由FORM提交,

ASP下批量删除数据的两种方法_应用技巧

方法一: 复制代码 代码如下: id=request.form("checkbox") id=Split(id,",") shu=0 for i=0 to UBound(id) sql="select * from jiang_fname where id="&id(i) set rs=conn.execute(sql) if not rs.eof then delete_file(rs("fname")) end i

JavaScript截取字符串的2个函数介绍_javascript技巧

首先我们来看一下substring函数使用介绍. 一.substring substring需要至少需要一个参数,第一个参数为起始位置,第二个参数可选,为结束位置. 只有一个参数: 复制代码 代码如下: <meta charset="UTF-8" /> <script type='text/javascript'> /**  * substring函数使用DEMO  */ var str = '欢迎各位童鞋到做客'; var sub = str.substrin

asp DateDiff实现文字在特定时间后消失_应用技巧

DateDiff(timeinterval,date1,date2 [, firstdayofweek [, firstweekofyear]]) // timeinterval 表示相隔时间的类型,代码为: yyyy 年 q 季 m 月 y 一年的日数 d 日 w 一周的日数 ww 周 h 时 n 分钟 s 秒 具体例子: 复制代码 代码如下: <% d1=DateDiff("d",Now(),cdate(rs("adddate")))//从数据库中读取商品

Asp下实现限制IP访问的程序代码_应用技巧

<% ''获取访问者的地址 ip=Request.ServerVariables("REMOTE_ADDR")  ''允许的IP地址段为10.0.0.0-10.68.63.255 allowip1="10.0.0.0" allowip2="10.68.10.71" response.write checkip(ip,allowip1,allowip2) function checkip(ip,allowip1,allowip2) dim c

asp下去除数组中重复项的方法_应用技巧

复制代码 代码如下: <%Function MoveR(Rstr) Dim i,SpStr SpStr = Split(Rstr,",") For i = 0 To Ubound(Spstr) If I = 0 then MoveR = MoveR & SpStr(i) & "," Else If instr(MoveR,SpStr(i))=0 and i=Ubound(Spstr) Then MoveR = MoveR & SpStr

asp下用fso生成js文件的代码_应用技巧

<%sub fsojs()%>  <% Set fso= Server.CreateObject("Scripting.FileSystemObject") set fd=fso.createtextfile(server.MapPath("../category.js"),true) '开始操作 set rs=server.CreateObject("adodb.recordset") rs.Open "select