新闻源码带采集
A. 求一个ASP新闻发布源码
大多了。动易不错,你去下载一个吧
http://www.powereasy.net/
B. 如何采集正确的下载地址链接
你先重启一下,或者注销一下
然后再卸载,去安装QQ的文件夹下,点QQUninst.exe卸载!
如果还不行的话,用360文件粉碎机搞掉他,后清注册表
C. 自动采集别人网站上的新闻
有.自动采集功能.动易2006
项目管理:
1、选择添加新项目,找到你需要采集的页面→复制网址到新闻网址列表框,项目名称随便填(主要是给你自己记忆备忘用)→下一步
2、项目编辑列表设置:
这里填写就要注意点了,找到你要采集的新闻列表的第一个信息标题的地方,一般标题前面这里会有一个table标签,选择这个table标签前面的具有典型特征的一些代码,代码具体选多少呢,分2种情况,一是有分页的列表,简单说就是列表最下面有下一页或者有1、2、3、等页面链接的,二是没有分页的,简单说就是列表只有1页,只有1页的情况好办,这里可以随便选了,只要保证不重复就行了。但是有分页的列表页就要麻烦一些,这时候选取代码的原则是:在保证没有重复代码的前提下,尽量选择少一点的代码,因为代码越多越容易出错,越不能保证每个列表页面都有这些代码了,这是经验之谈,当然也不一定,有些网页代码格式非常统一,那么这种网页就好采集,列表开始代码也好填一些。什么是具有典型特征的代码呢?就是基本上每个列表页都有的代码,但是这个页码在所有的列表页中又是唯一的,不重复。
D. ASP 新闻发布系统 源代码以及如何使用
<!doctype html public "-/w3c/dtd html 4.01 transitional/en"
"http://www.w3.org/tr/html4/loose.dtd">
<html>
<head>
<title>untitled document</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
</head>
<body>
<table width="770" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><form name="form1" method="post" action="send.asp">
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ccffff">
<tr>
<td height="20"><div align="center">发送消息</div></td>
</tr>
<tr>
<td><div align="center">
<textarea name="msg" cols="100" rows="6"></textarea>
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="submit" name="submit" value="submit">
<input type="reset" name="submit2" value="reset">
</div></td>
</tr>
</table>
</form></td>
</tr>
</table>
</body>
</html>
把上面代码生成index.asp文件
<%
'这是字符串处理函数
function get_pass(pass)
pass=cstr(pass)
pass=replace(pass," ","")
pass=replace(pass," ","")
pass=replace(pass,"-","")
pass=replace(pass," ","")
pass=replace(pass,":","")
pass=replace(pass,".","")
pass=replace(pass,"+","")
pass=replace(pass,"_","")
pass=replace(pass,"<","")
pass=replace(pass,">","")
pass=replace(pass,"!","")
pass=replace(pass,"@","")
pass=replace(pass,"#","")
pass=replace(pass,"$","")
pass=replace(pass,"%","")
pass=replace(pass,"^","")
pass=replace(pass,"!amp;","")
pass=replace(pass,"*","")
pass=replace(pass,"(","")
pass=replace(pass,")","")
pass=replace(pass,"=","")
pass=replace(pass,"\","")
pass=replace(pass,"/","")
pass=replace(pass,"|","")
pass=replace(pass,"下午","")
get_pass=pass
end function
'这是文件路径生成函数,参数为生成路径的时间
function namecheck(time)
webname=get_pass(time)
path=server.mappath("index.asp")
path1=path
total_length=len(path)
path=right(path,9)
right_length=len(path)
left_length=total_length-right_length
path=left(path1,left_length)
path=path&"\children_page\"&webname&".html"
namecheck=path
set myfile=nothing
end function
'这是判断文件是否存在的过程,其中参数为最后更新时间
Sub isdelete(edittime)
filename=namecheck(edittime)
set fso=server.CreateObject("scripting.filesystemobject")
set file=fso.getfile(filename)
if fso.fileexists(file) then
file.delete
response.write("<script language='javascript'>alert('成功删除!');location.href='index.asp';</script>")
end if
set fso=nothing
end Sub
'这是生成文件过程
Sub create
set fso=server.CreateObject("scripting.filesystemobject")
datastream=request("msg")
set myfile=fso.opentextfile(server.mappath("/muban/muban1.txt"))
dataall=myfile.readAll
datastream=replace(dataall,"list",datastream)
myfile.close
set myfile=nothing
set createfile=fso.CreateTextFile(namecheck(now()))
createfile.Write datastream
createfile.close
set createfile=nothing
set fso=nothing
response.write("<script language='javascript'>alert('成功提交!');location.href='index.asp';</script>")
end Sub
%>
<%call create%>
把上面代码复制生成send.asp文件
在同一目录中新建muban文件夹,在里面用下面代码生成muban1.txt文件
<!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">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
body {
background-image: url(pic002s.jpg);
}
-->
</style></head>
<body>
<table width="900" border="0">
<tr>
<td><table width="100%" border="0">
<tr>
<td><!-- Search Google -->
<center>
<form method=get action="http://www.google.com/search">
<table background="pic002s.jpg"><tr><td>
<a href="http://www.google.com/intl/zh-CN/">
<img src="http://www.google.com/logos/Logo_40wht.gif"
border="0" alt="Google" align="absmiddle"></a>
<input type=text name=q size=31 maxlength=255 value="">
<input type=hidden name=ie value=GB2312>
<input type=hidden name=oe value=GB2312>
<input type=hidden name=hl value=zh-CN>
<input type=submit name=btnG value="Google 搜索">
</td></tr></table>
</form>
</center>
<!-- Search Google --></td>
<td> </td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="100%" height="100%" border="1">
<tr>
<td height="476" align="center" valign="top"><!-- TemplateBeginEditable name="list" -->list<!-- TemplateEndEditable --></td>
</tr>
</table>
<div style="text-align:center;">
<p><a href="http://saqiang1001.webd.datasir.com/message/message.asp" style="text-decoration:none; color:#FFFFFF;">用户留言</a><br /><font color="#FFFFFF">版权所有@违法必究</font>
</div>
</td>
</tr>
</table>
</body>
</html>
在同一目录中新建children_page文件夹,一切完好。确保你的主机安装了FSO,具体方法如下:1、首先在系统盘中查找scrrun.dll,如果存在这个文件,请跳到第三步,如果没有,请执行第二步。
2、在安装文件目录i386中找到scrrun.dl_,用winrar解压缩,得scrrun.dll,然后复制到
你的系统盘:\windows\system32\目录中。
3、运行regsvr32 scrrun.dll即可。
删除fso、regsvr32/u scrrun.dll
开启/关闭系统FSO支持方法
windows98系统
在DOS命令行状态输入以下命令:
关闭命令:RegSvr32 /u C:\WINDOWS\SYSTEM\scrrun.dll
打开命令:RegSvr32 C:\WINDOWS\SYSTEM\scrrun.dll
win2000/XP
在CMD命令行状态输入以下命令:
关闭命令:RegSvr32 /u C:\WINNT\SYSTEM32\scrrun.dll
打开命令:RegSvr32 C:\WINNT\SYSTEM32\scrrun.dll (注意有可能是在SYSTEM中,所以这样写:RegSvr32 C:\WINNT\SYSTEM\scrrun.dll,主要看scrrun.dll这个文件是在哪里! )
一切完好以后到这个地方下载ASP服务器:ASP小旋风到桌面上,关闭端口为80的程序,主要是迅雷,把所有文件考到:
C:\Program Files\ASP小旋风\wwwroot中,在浏览其中输入:http://你的IP地址,回车,输入数据,你看一下在children_page文件夹中是不是生成了,一个网页文件,新闻系统就是这样做的!
E. 什么是网站 采集
一般大型网站建站的时候,固定的内容 如新闻、下载等 都是使用固定模板、自动生成静态页面的方式。这样就使得在源码中表格等设置都是一致的。
网站采集就是利用这样的一个原理,搜索页面中与采集设置相同的部分,然后搜集网站内容进入数据库。
比如:
某站的新闻在源码中是这样的
<table class="news"><tr><td>新闻内容</td></tr></table>
很容易可以看出,上面就是一个表格,然后包含新闻内容,设置采集方式的时候,就可以 从遇到页面的<table class="news">这个标记开始,到下一个</table>标记结束。运行采集后,就会将该站所有的新闻全部采集下来了。
当然,上面只是简单的一个采集的举例而已,实际应用中会比这复杂的多。
使用网站采集的好处是可以减少网站制作人员的录入时间。弊端是使得网站没有个性,千篇一律。
F. 求一个完整的新闻评论源码
去51aspx.com下载吧
G. 信息发布网站 源码
csdn上也许会有,你可以去看看!
H. 我用myeclipse做了一个新闻系统,层数据库调用也正常,但是就是登录不上。用设置好的用户
你用什么技术连接数据库的,把异常发来下……
I. 急求:asp新闻源码 ,能实现新闻网站的添加删除修改即可。有的话发一份给我吧,不胜感激。
手上有个现成的,希望可能帮到你,我也是在这个的基础上更改的,很简单。
J. 求一个能在新闻中添加发布视频的ASP整站源码
一般的网页编辑器里都有插入视频的功能啊,ewebeditor,fck这些