asp下去除超链接的函数
来源：asp之家 发布时间：2011-03-29 11:11:00
标签：asp,超链接
<％
Function ReplaceUrl2(HTMLstr)
Dim n,str1,str2,str3,str4
HTMLstr = Lcase(HTMLstr)
For n=1 to Ubound(Split(HTMLstr,"<a"))
str1 = Instr(HTMLstr,"<a")
str2 = Instr(str1,HTMLstr,">")
HTMLstr = left(HTMLstr,str1-1)&right(HTMLstr,len(HTMLstr)-len(left(HTMLstr,str2)))
HTMLstr = replace (HTMLstr,"</a>","")
ReplaceUrl2 = HTMLstr
Next
End Function
％>
0
投稿猜你喜欢
继续练手，根据之前获取汽油价格的方式获取了金价，暂时没钱投资，看看而已#!/usr/bin/env python# -*- coding:- The prompt command reconfigures the default mysql> prompt. The stri
- 目录1. DeepSource2. Codacy3. SonarQube4. Veracode5. Checkmarx6. Coverity
- 1，使用mysqldump时报错(1064)，这个是因为mysqldump版本太低与当前数据库版本不一致导致的。mysqldump: Cou
- 1.INSERT (往数据表里插入记录的语句) INSERT INTO 表名(字段名1, 字段名2, ……) VALUES ( 值1, 值2
- #!/bin/sh#code by scpman#功能:检查并修复mysql数据库表#将此脚本加到定时中，脚本执行时，等会读库,列出要修复的
- 刚刚在学习些测试报告的时候，出现一个路径的问题，找了很久的原因，竟然是少了一个反斜杠引起的，在此顺便记录一下正反斜杠的作用。在Python中
- 1.MySQL的安装（1）双击我们去官网下载好的MySQL（2） 一直点下一步，直到遇到以下界面（3）选择Typical，会进行跳转，点击I
- 1、更新整张表，如果某一行数据的某一列的值为空，那么让他和另一列字段的值相等UPDATE ot_tgbz set update_day=if
- 多数情况下，mysql在刚刚安装时是不支持中文的，这是由于编码的问题我们可以通过修改配置文件，永久实现mysql对中文的识别首先我们要先将文
- oblog 推出了4.0的最新版本，这个不是重点，重点是4.0的版本中附带了xml-rpc支持。oblog的支持代表着大量的国内blog站点
- 网上的SQL优化的文章实在是很多，说实在的，我也曾经到处找这样的文章，什么不要使用IN了，什么OR了，什么AND了，很多很多，还有很多人拿出
- ES在之前的博客已有介绍，提供很多接口，本文介绍如何使用python批量导入。ES官网上有较多说明文档，仔细研究并结合搜索引擎应该不难使用。
- FLV在线转换，是目前主流播客网上通用的一种视频解决方案需要用到的组件 ASPExecmencoderffmpeg.exe第一步骤： 在线转
- 题目描述原题链接 :268. 丢失的数字给定一个包含 [0, n] 中 n 个数的数组 nums ，找出 [0
- 非聚集索引，这个是大家都非常熟悉的一个东西，有时候我们由于业务原因，sql写的非常复杂，需要join很多张表，然后就泪流满面了。。。这时候就
- 效果图：代码如下：<!DOCTYPE html><html><head> <meta charse
- 前面一篇我们已经把unittest的常用用法都已经讲过了，可能很多小伙伴有个疑问，unittest框架怎么做数据驱动呢？这节我们就来学习一下
- 本文实例讲述了Python实现栈的方法。分享给大家供大家参考，具体如下：前言使用Python 实现栈。两种实现方式：基于数组 - 数组同时基
- 对numpy 矩阵进行通道间求均值给定一个3x2x2得矩阵，得到一个2x2的矩阵，其中对应元素是通道间的均值import numpy as
