asp提取title

jhqd1380 2009-01-22 09:52:03
怎么用asp提取出目标网页中<title></title>中的内容啊…好心人给个源码。。。正则和mid都成，能用就行。最近被正则彻底搞懵了。。。嘻嘻，没分了。
...全文
210 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
nevana 2009-02-06
  • 打赏
  • 举报
 回复
用js可以的应该
zzxap 2009-02-06
  • 打赏
  • 举报
 回复
ie和火狐都可以使用
document.getElementsByTagName("title")[0].innerHTML 第一个title的内容
document.getElementsByTagName("title")[1].innerHTML 第二个title的内容
document.getElementsByTagName("title")[2].innerHTML 第三个title的内容
xiaominjun 2009-02-06
  • 打赏
  • 举报
 回复
自己写的采集。
xiaominjun 2009-02-06
  • 打赏
  • 举报
 回复
http://download.csdn.net/source/984055 这里下，有兴趣的朋友可以看看我的其他资源！
ChinaXtHuLang 2009-02-06
  • 打赏
  • 举报
 回复
[Quote=引用 8 楼 zzxap 的回复:]
document.title可以获取
用正则获取
<script>
var str = ' <title>abcdef </title>';
var title = str.match(/ <title>(.+?) <\/title>/);
alert(title&&title[1]||null);
</script>
[/Quote]
对。。顶。。
zzxap 2009-02-06
  • 打赏
  • 举报
 回复
document.title可以获取
用正则获取
<script>
var str = '<title>abcdef</title>';
var title = str.match(/<title>(.+?)<\/title>/);
alert(title&&title[1]||null);
</script>
zzxap 2009-02-06
  • 打赏
  • 举报
 回复
document.getElementsByTagName(title).innerHTML 可以获取
linick 2009-02-05
  • 打赏
  • 举报
 回复
...本来想用mid帮你写的...突然发现不会获取指向网页的源代码... 然后正则貌似也很有用...准备花时间研究下...就直接给你找到的2段程序
第一段 获取指向网页地址的源代码
太长了这个给你链接http://hi.baidu.com/liyahui/blog/item/fff1ca3da58962c29e3d6220.html
第二个 获取指定首尾字符串中间的内容 两个合起来就可以获得title了...不过貌似有点小题大做的感觉...


<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 

<html xmlns="http://www.w3.org/1999/xhtml" lang="zh-CN"> 

<head> 

<title>阿里西西www.alixixi.com字符串截取函数（按指定首尾字符串截取内容）</title> 

<meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> 

<meta http-equiv="Content-Language" content="zh-CN" /> 

<meta content="all" name="robots" /> 

<meta name="author" content="阿里西西, alixixi" /> 

<meta name="Copyright" content="" /> 

<meta name="description" content="" /> 

<meta content="" name="keywords" /> 

<style type="text/css"><!-- 

* { 

font-size: 12px; 

} 

#test { 

border-top: 1px #000 solid; 

border-left: 1px #000 solid; 

} 

#test td,#test th { 

border-right: 1px #000 solid; 

border-bottom: 1px #000 solid; 

line-height: 200%; 

} 

--></style> 

<script language="vbscript"><!-- 

’******************************************************************************** 

’ Function（公有） 

’ 名称 ： 盛飞字符串截取函数 

’ 作用 ： 按指定首尾字符串截取内容(本函数为从左向右截取) 

’ 参数 ： sContent ---- 被截取的内容 

’   sStart ------ 首字符串 

’   iStartNo ---- 当首字符串不是唯一时取第几个 

’   bIncStart --- 是否包含首字符串(1/True为包含，0/False为不包含) 

’   iStartCusor - 首偏移值(指针单位为字符数量,左偏用负值,右偏用正值,不偏为0) 

’   sOver ------- 尾字符串 

’   iOverNo ----- 当尾字符串不是唯一时取第几个 

’   bIncOver ---- 是否包含尾字符串((1/True为包含，0/False为不包含) 

’   iOverCusor -- 尾偏移值(指针单位为字符数量,左偏用负值,右偏用正值,不偏为0) 

’******************************************************************************** 

Public Function SenFe_Cut(sContent, sStart, iStartNo, bIncStart, iStartCusor, sOver, iOverNo, bIncOver, iOverCusor) 

If sContent<>"" Then 

   Dim iStartLen, iOverLen, iStart, iOver, iStartCount, iOverCount, I 

   iStartLen = Len(sStart) ’首字符串长度 

   iOverLen   = Len(sOver) ’尾字符串长度 

   ’首字符串第一次出现的位置 

   iStart = InStr(sContent, sStart) 

   ’尾字符串在首字符串的右边第一次出现的位置 

   iOver = InStr(iStart + iStartLen, sContent, sOver) 

   If iStart>0 And iOver>0 Then 

    If iStartNo < 1 Or IsNumeric(iStartNo)=False Then iStartNo = 1 

    If iOverNo < 1 Or IsNumeric(iOverNo)=False Then iOverNo   = 1 

    ’取得首字符串出现的次数 

    iStartCount = UBound(Split(sContent, sStart)) 

    If iStartNo>1 And iStartCount>0 Then 

     If iStartNo>iStartCount Then iStartNo = iStartCount 

     For I = 1 To iStartNo 

      iStart = InStr(iStart, sContent, sStart) + iStartLen 

     Next 

     iOver = InStr(iStart, sContent, sOver) 

     iStart = iStart - iStartLen ’还原默认状态：包含首字符串 

    End If 

    ’取得尾字符串出现的次数 

    iOverCount = UBound(Split(Mid(sContent, iStart + iStartLen), sOver)) 

    If iOverNo>1 And iOverCount>0 Then 

     If iOverNo>iOverCount Then iOverNo = iOverCount 

     For I=1 To iOverNo 

      iOver = InStr(iOver, sContent, sOver) + iOverLen 

     Next 

     iOver = iOver - iOverLen ’还原默认状态：不包含尾字符串 

    End If 

    If CBool(bIncStart)=False Then iStart = iStart + iStartLen ’不包含首字符串 

    If CBool(bIncOver)   Then iOver = iOver + iOverLen   ’包含尾字符串 

    iStart = iStart + iStartCusor ’加上首偏移值 

    iOver   = iOver + iOverCusor ’加上尾偏移值 

    If iStart<1 Then iStart = 1 

    If iOver<=iStart Then iOver = iStart + 1 

    ’按指定的开始和结束位置截取内容 

    SenFe_Cut = Mid(sContent, iStart, iOver - iStart) 

   Else 

    ’SenFe_Cut = sContent 

    SenFe_Cut = "没有找到您想要的内容，可能您设定的首尾字符串不存在！" 

   End If 

Else 

   SenFe_Cut = "没有内容！" 

End If 

End Function 

--></script> 

<script language="javascript"><!-- 

//return HTML object by object id 

function $(id) { 

var obj = document.getElementById(id); 

return obj ? obj : undefined; 

} 

function Test() { 

var content = $("content").value; 

var sStart = $("sStart").value; 

var iStartNo = $("iStartNo").value; 

var bIncStart = $("bIncStart").checked; 

var iStartCusor = $("iStartCusor").value; 

var sOver = $("sOver").value; 

var iOverNo = $("iOverNo").value; 

var bIncOver = $("bIncOver").checked; 

var iOverCusor = $("iOverCusor").value; 

if(content=="") { 

   alert("请输入待截取的内容！"); 

   $("content").focus(); 

   return false; 

} 

if(sStart=="") { 

   alert("请输入首字符串！"); 

   $("sStart").focus(); 

   return false; 

} 

if(sOver=="") { 

   alert("请输入尾字符串！"); 

   $("sOver").focus(); 

   return false; 

} 

if(iStartNo=="" || isNaN(iStartNo)) iStartNo=1; 

if(iOverNo=="" || isNaN(iOverNo)) iOverNo=1; 

if(iStartCusor=="" || isNaN(iStartCusor)) iStartCusor = 0; 

if(iOverCusor=="" || isNaN(iOverCusor)) iOverCusor = 0; 

$("results").value = SenFe_Cut(content, sStart, parseInt(iStartNo), bIncStart, parseInt(iStartCusor), sOver, parseInt(iOverNo), bIncOver, parseInt(iOverCusor)); 

$("example").value = "sContent = SenFe_Cut(\"内容\", \"首字符串\", "+iStartNo+", "+bIncStart+", "+iStartCusor+", \"尾字符串\", "+iOverNo+", "+bIncOver+", "+iOverCusor+")"; 

} 

--></script> 

</head> 

<body> 

<table id="test" cellspacing="0" cellpadding="0" align="center"> 

<tr><th>盛 飞 字 符 串 截 取 函 数</th></tr> 

<tr><td>待截取的内容：</td></tr> 

<tr><td><textarea name="content" id="content" rows="10" cols="80"></textarea></td></tr> 

<tr><td>首字符串：</td></tr> 

<tr><td><textarea name="sStart" id="sStart" rows="2" cols="80"></textarea></td></tr> 

<tr><td>取第<input type="text" name="iStartNo" id="iStartNo" value="1" size="2" />个  <input type="checkbox" name="bIncStart" id="bIncStart" value="1" />包含首字符串？  偏移值：<input type="text" name="iStartCusor" id="iStartCusor" value="0" size="2" /></td></tr> 

<tr><td>尾字符串：</td></tr> 

<tr><td><textarea name="sOver" id="sOver" rows="2" cols="80"></textarea></td></tr> 

<tr><td>取第<input type="text" name="iOverNo" id="iOverNo" value="1" size="2" />个  <input type="checkbox" name="bIncOver" id="bIncOver" value="1" />包含首字符串？  偏移值：<input type="text" name="iOverCusor" id="iOverCusor" value="0" size="2" /></td></tr> 

<tr><td><input type="button" name="submit" value="　测　试　" onclick="Test()" /></td></tr> 

<tr><td>返回结果：</td></tr> 

<tr><td><textarea name="results" id="results" rows="10" cols="80"></textarea></td></tr> 

<tr><td>调用示例：</td></tr> 

<tr><td><textarea name="example" id="example" rows="2" cols="80"></textarea></td></tr> 

</table> 

</body> 

</html>
LaXXX 2009-02-01
  • 打赏
  • 举报
 回复
DOM吧。
js里getElementsByTagName(title)可以实现。
搬运工865 2009-02-01
  • 打赏
  • 举报
 回复
正则 不回。。。

截取吧....
zhou01102 2009-02-01
  • 打赏
  • 举报
 回复
用正则
ASPNETStripHtmlCode
C#使用正则表达式提取网页中的信息数据 包括 网页标题（title），文本（text），图片（image），链接（link），表格（table）
asp.net正则表达式提取网址、标题、图片等
1、asp.net正则表达式提取网址、标题、图片等 例如，有如下的字符串： &lt;li&gt;&lt;a href="http://www.webkaka.com/blog/archives/how-to-add-links-on-baidu-blog.html" title="...
ASP.NET实战-零基础"抄近路"驾驭ASP.NET网站开发
ASP.NET动态网站开发实战-零基础"抄近路"驾驭Web Pages开发 “0基础”项目实战+“抄近路”速成 ----授人以鱼，不如授人以渔 本课程 我会带领大家伙儿，手把手学习ASP.NET动态网站开发技术。 本课程开发模式：Web ...
asp 数据合并 排序 提取 批量查询 超级实用小工具
小型数据合并、排序、提取、批量查询 超级实用小工具
ASP转HTML编程
希望本文能够帮助你将ASP页面转换为HTML页面。通过分离静态内容、移除服务器端脚本和更新文件扩展名，你可以轻松地将ASP页面转换为静态的HTML页面，提高页面加载速度和用户体验。需要注意的是，转换为HTML的页面将...
ASP

28,391

社区成员

357,060

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章