ASP取出HTML里面的图片地址的函数

ASP取出HTML里面的图片地址的函数的相关文章

• 
  用asp自动解析网页中的图片地址

  标签：Web开发

  一，取得原页中的图片的地址。 % function PicStr(str)  Set objRegExp = New Regexp '设置配置对象  objRegExp.IgnoreCase = True '忽略大小写  objRegExp.Global = True '设置为全文搜索  objRegExp.Pattern = "IMG.+?" '为了确保能准确地取出图片地址所以分为两层配置：首先找到里面的IMG标签，然后再取出里面的图片地址后面的getimgs函数就是实现后一个功能的。  strs=trim(str)...[ 查看全文 ]

  flytong99sea

  61
• 
  用asp解析图片地址 并将其保存

  标签：ASP

    现在基于WEB页的HTML的编辑器在新闻系统，文章系统中用得越来越广，一个网页一粘就可以保持原来的样式，同时图片也可以在这个页中保持。但是在使用过程中，如果所粘贴页中的图片被删除，就会在自己的页面上留下一个大大的“X”，影响美观。以前只好把这个图片保存下来，再重新上传到服务器上，这样实在麻烦。能不能让服务器自动去下载图片保存在服务器并且替换页面上的链接？答案是肯定的。 要实现这...[ 查看全文 ]

  情若能自己

  121
• 
  正则获取图片地址 链接地址

  标签：Web开发

  代码如下： reg = /[img|href][^]*src\s*=\s*('|")?([^'"]*)\1([^])*/ig 正则获取图片地址 一、问题： 采集的过程中遇到一个问题：从数据库里读出来的图片没有正常显示，分析后发现是数据库里的图片以网站根目录为相对路径方式存储，图片地址如：http://img.warting.com/allimg/090403/012F31N9-1.jpg，原来做的读取图片是以http://开关的URL绝对图片获取，所以采集中出现以根目录开始的图片地址采...[ 查看全文 ]

  弥耳道没有悲伤

  81
• 
  如何判断图片地址是否失效

  标签：Web开发

  html body IMG src="http://www.google.com/logos/Logo_25wht.gif" alt="图片[ 查看全文 ]

  IW1F7S

  401
• 
  ASP如何获得代码中第一张图片地址

  标签：Web开发

  '把pattern 又修改了下 'code要检测的代码 'http://school.cnd8.com/asp.asp 'leixing html 或者ubb 'nopic 代码没有图片时默认值 function toppic(code,leixing,nopic)         set regex = new regexp         regex.ignorecase = true      &n...[ 查看全文 ]

  足球少侠

  671
• 
  js实现ASP分页函数 HTML分页函数

  标签：Web开发

  代码如下： !-- //ASP分页函数 function ShowListPage(page,Pcount,TopicNum,maxperpage,strLink,ListName){     var alertcolor = '#FF0000';     maxperpage=Math.floor(maxperpage);     TopicNum=Math.floor(TopicNum);     page=Math.floor(page);     var n,p;...[ 查看全文 ]

  考研的代价sky

  61
• 
  图片地址防盗链,通过IHttpHandler实现

    /*  *   * 防盗链IHttpHandler  *   *   * 增加了对文件关键字的选择(即仅对文件名存在某些关键字或不存在某些关键字进行过滤)  * 设置web.config中<appSettings节以下值  * string eWebapp_NoLink    如果文件名符合该正确表态式将进行过滤(不设置对所有进行过滤)  * string eWebapp_AllowLink   &...[ 查看全文 ]

  陈宝兴1983

  81
• 
  用正则解析图片地址,并利用XMLHTTP组件将其保存

  标签：ASP

  现在基于WEB页的HTML的编辑器在新闻系统，文章系统中用得越来越广，一个网页一粘就可以保持原来的样式，同时图片也可以在这个页中保持。但是在使用过程中，如果所粘贴页中的图片被删除，就会在自己的页面上留下一个大大的“X”，影响美观。以前只好把这个图片保存下来，再重新上传到服务器上，这样实在麻烦。能不能让服务器自动去下载图片保存在服务器并且替换页面上的链接？答案是肯定的。 要实现这个功能需...[ 查看全文 ]

  海心宝心

  51
• 
  用XMLHTTP组件正确解析图片地址并将其保存

  标签：ASP

    现在基于WEB页的HTML的编辑器在新闻系统，文章系统中用得越来越广，一个网页一粘就可以保持原来的样式，同时图片也可以在这个页中保持。但是在使用过程中，如果所粘贴页中的图片被删除，就会在自己的页面上留下一个大大的“X”，影响美观。以前只好把这个图片保存下来，再重新上传到服务器上，这样实在麻烦。能不能让服务器自动去下载图片保存在服务器并且替换页面上的链接？答案是肯定的。 要实现这...[ 查看全文 ]

  骨子里的沙坪坝

  01
• 
  ASP分页函数

  标签：ASP

  Function ExportPageInfo(ByRef rs,curpage,i,LinkFile) Dim retval, j, pageNumber, BasePage retval = "第" & curpage & "页/总" & rs.pagecount & "页 "  retval = retval & "本页" & i & "条/总" & rs.recordcount&nb...[ 查看全文 ]

  浮歌飘渺

  61
• 
  收集asp的常用函数

  标签：Web开发

  代码如下： function HTMLEncode(fString) if not isnull(fString) then fString = replace(fString, "", "") fString = replace(fString, "", "") fString = Replace(fString, CHR(32), " ") fString = Replace(fString, CHR(9), " ") fString = Replace(fString, C...[ 查看全文 ]

  欢婶

  31
• 
  asp的ubb函数（推荐）

  标签：Web开发

  代码如下： function unHtml(content) unHtml=content if content "" then unHtml=replace(unHtml,"&","&") unHtml=replace(unHtml,"","") unHtml=replace(unHtml,"","") unHtml=replace(unHtml,chr(34),""") unHtml=replace(unHtml,chr(13),"br") unHtml=replace(unHtml,chr(32)," ") 'unHtml=ubb(unHtml) end if end function function ubb(content) Dim nowtime,i ubb=content nowtime...[ 查看全文 ]

  画船听雨05

  21
• 
  几个常用的ASP函数

  标签：Web开发

  ========取得带端口的URL，推荐使用================  Function Get_ScriptNameUrl()  If request.servervariables("SERVER_PORT")="80" Then  Get_ScriptNameUrl="http://" & request.servervariables("server_name")&lcase(request.servervariables("script_name"))  Else  Get_ScriptNameUrl="http://" & request.servervariables("serv...[ 查看全文 ]

  迷藥775978800

  21
• 
  ASP字数计算函数

  标签：ASP

    <% 'ASP字数计算函数 Function WordCount(strInput)     Dim strTemp     strTemp = Replace(strInput, vbTab, " ")     strTemp = Replace(strTemp, vbCr, " ")     strTemp = Replace(strTemp, vbLf, " ")     ' 删除字首字尾空格     strTemp = Trim(strTemp)     ' 替换为一个...[ 查看全文 ]

  马英伟摩羯

  11
• 
  ASP 中 Split 函数的实例

  标签：ASP

    大家有碰到过要想取一字符串里的某些值而无从下手？有没有觉得看书或教材对split的写法糊里糊涂……如果有此疑问的话，请看下面我对例子的解释，相信您会对这个有一定的了解。 我先介绍一下Split函数的用法: 返回值数组 = Split("字符串","分割符") 假设变量strURL保存着URL值，如strURL = "ftp://username:password@server"，这是我们在ＩＥ中登录到FTP上时的ＵＲＬ形式，如果我...[ 查看全文 ]

  boamylove1

  61
• 
  ASP 中 DateDiff 函数详解

  标签：ASP

  DateDiff 函数 描述 返回两个日期之间的时间间隔。 语法 DateDiff(interval, date1, date2 [,firstdayofweek][, firstweekofyear]]) DateDiff 函数的语法有以下参数： 参数 描述 interval 必选。字符串表达式，表示用于计算 date1 和 date2 之间的时间间隔。有关数值，请参阅“设置”部分。 date1, date2 必选。日期表达式。用于计算的两个日期。 firstdayofweek 可选。指定星期中第一天的常数。...[ 查看全文 ]

  冷观秋月

  881
• 
  ASP实用函数库

  标签：ASP

  <% '判断文件名是否合法 Function isFilename(aFilename)  Dim sErrorStr,iNameLength,i  isFilename=TRUE  sErrorStr=Array("/","\",":","*","?","""","<","","|")  iNameLength=Len(aFilename)  If iNameLength<1 Or iNameLength=null Then   isFilename=FALSE  Else   For i=0 To 8    If instr(aFilename,sErrorStr(i)) Then   ...[ 查看全文 ]

  漠小翔同学

  141
• 
  asp最常用的分页函数

  标签：Web开发

  代码如下：     rs.open sql,conn,1,1     if rs.eof and rs.bof then      response.write "p align='center'还没找到文章/p"   else    totalPut=rs.recordcount    maxperpage=18    if currentpage1 then   &...[ 查看全文 ]

  虫虫0019

  41
• 
  Asp.Net常用函数

  标签：Web开发

  Abs(number) 取得数值的绝对值。    Asc(String) 取得字符串表达式的第一个字符ASCII 码。    Atn(number) 取得一个角度的反正切值。    CallByName (object, procname, usecalltype,[args()]) 执行一个对象的方法、设定或传回对象的属性。    CBool(expression) 转换表达式为Boolean 型...[ 查看全文 ]

  rudghk1022

  41
• 
  asp:生成静态页面函数

  标签：Web开发

  代码如下： % if SaveFile("/htm/list.htm","http://www.xxx.com/asp/list.asp") then Response.write "已生成" else Response.write "没有生成" end if function SaveFile(LocalFileName,RemoteFileUrl) Dim Ads, Retrieval, GetRemoteData On Error Resume Next Set Retrieval = Server.CreateObject("Microso"&nbs...[ 查看全文 ]

  chuniniuu

  01