ASP源码—雨哲 ASP采集插件 SiteWeaver专用版.zip

╭═══════════════╮ ║ 雨哲在线 ║ ╭══════┤ http://www.yz81.com ├══════╮ ║ ║ http://www.yuzhe.name ║ ║ ║ ╰═══════════════╯ ║ 　║ 申明：本程序为[雨哲]原创程序，版权归原作者雨哲所有。 ║ ║ 本程序为雨哲在线(YuZhe)提供个人网站使用。 ║ ║ 不得用于商业用途或非个人网站使用。 ║ ║ ╭───────────────────────╮ ║ ├══┤ 网站建设，动易插件，标签订制，收费技术支持 ├══┤ ║ ╰───────────────────────╯ ║ ║ 1.请遵守中华人民共和国相关法律、条例 ║ ║ 2.商业插件程序，请勿以任何形式转载或转发。 ║ ║ 3.使用前请作好原数据的备份 ║ ║ 4.使用本程序过程中出现任何问题均与雨哲无关。 ║ ║ 5.如不同意以上声明，请立即删除，不要使用，谢谢合作 ║ ║ ╭───────────────────────╮ ║ ╰══┤ 业务QQ：425162221 ｜ 电话：028-89297610 ├══╯ ╰───────────────────────╯ ≡≡≡≡≡≡≡≡≡≡≡≡≡『程序信息』≡≡≡≡≡≡≡≡≡≡≡≡≡≡ 程序名称: 雨哲软件采集模块20091119 程序语言: asp 程序类型: asp 授权方式: 正式版 运行环境: SiteWeaver 程序大小: 开 发 商: 雨哲 [ http://www.yz81.com http://www.yuzhe.name] ≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡ 详细介绍：http://www.yz81.com/?Collection 赞助本站：http://www.yz81.com/?Pay 下载软件：http://www.yz81.com/?SoftID=311 联系 Q Q: 425162221 ≡≡≡≡≡≡≡≡≡≡≡≡≡『申 明』≡≡≡≡≡≡≡≡≡≡≡≡≡≡ 雨哲软件采集模块程序（简称：本插件，下同）的用户许可协议： 一、本软件仅供给个人用户非商业使用。如果你是个人用户则可以免费使用本插件，但不拥有本插件的版权及著作权。 二、为了方便实现你的功能需要，你可以修改本插件以达到需要的功能要求，但禁止再次发布。 三、在获得商业授权之后，您可以将本软件应用于商业用途。如果您需要购买商业授权，请联系雨哲（腾讯OICQ号:425162221）了解最新信息。 四、禁止在本软件的整体或任何部分基础上以发展任何派生版本、修改版本或第三方版本用于重新分发 五、用户出于自愿而使用本软件，您必须了解使用本软件的风险，且同意自己承担使用本软件的风险。 六、用户利用本软件构建的网站的任何信息内容以及导致的任何版权纠纷和法律争议及后果与雨哲无关，雨哲对此不承担任何责任。 ≡≡≡≡≡≡≡≡≡≡≡≡『20090911更新说明』≡≡≡≡≡≡≡≡≡≡≡ 一、更新SQL版本无法正常使用的Bug 二、更新删除采集项目出错的Bug 三、保存图片列表及下载地址列表文件在CollectionSoftFilePath目录下，下载地址列表文件是以html格式的文件保存，用浏览器打开文件，在页面上点右键选择使用下载软件批量下载即可（前提是已安装下载软件并支持该功能）。 ≡≡≡≡≡≡≡≡≡≡≡≡『20091016更新说明』≡≡≡≡≡≡≡≡≡≡≡ 大部分功能已经完成，本来想所有功能更新完成再发布。应网友要求，现在预期发布，功能说明： 1.支持SQL版本<本次更新完全> 支持 2.探测真实地址<本次更新完全> 支持 3.支持软件存放目录自定义<预计本次更新完全> 支持 4.增加后台查看保存CollectionSoftFilePath目录下的文件列表．方便后台直接批量下载，不用再手动输入文件路径．<预计本次更新完全> 不支持　因有新计划暂未完成 5.设置采集时可以设置是否直接入动易系统主数据库。　支持 6.增加入库管理，入库时自动增加相关自定义字段。　支持 7.采集完成可自动生成相关静态文件。　不支持　正在开发中 8.入库完成后可自动生成相关静态文件。　不支持　正在开发中 9.完善导入导出功能　完成 10.增加下载地址和新页面中获取的下载地址的特殊转向处理功能。 ≡≡≡≡≡≡≡≡≡≡≡≡『20091030更新说明』≡≡≡≡≡≡≡≡≡≡≡ 1.设置项目时，在测试时仅一个地址获取地址错误的BUG 2.采集项目时，仅一个地址错误的BUG 3.采集项目时，新页面下载地址特殊转向处理无法获取地址的BUG 4.保存软件目录出错的BUG 5.增加入库管理页面查看软件信息时检测信息状态和文件状态。 6.增加后台生成批量下载地址列表页面。并加入了状态检测，可选择存在的软件是否重新下载。 ≡≡≡≡≡≡≡≡≡≡≡≡『20091119更新说明』≡≡≡≡≡≡≡≡≡≡≡ 入库管理中增加一个新功能：批量替换。 本功能可用于在采集替换时，不能替换或未替换到的内容。适用于采集后进行伪原创批处理操作，在处理完后再入库。 ≡≡≡≡≡≡≡≡≡≡≡≡≡『安装说明』≡≡≡≡≡≡≡≡≡≡≡≡≡≡ 一、将Admin目录下的所有文件上传到动易管理目录下。Temp目录下的数据库文件为导入导出数据库文件，需要用到导入导出功能时再上传即可。 二、修改Admin/Admin_index_Left.asp文件： 查找代码： Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=Admin_AreaCollection.asp?Action=Main target=main>区域采集管理</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " </table>" & vbCrLf Response.Write " </div>" & vbCrLf Response.Write " <div style='width:167'>" & vbCrLf Response.Write " <table cellpadding=0 cellspacing=0 align=center width=130>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=5></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " </table>" & vbCrLf Response.Write " </div></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write "</table>" & vbCrLf 在下面添加代码： Response.Write "<table cellpadding=0 cellspacing=0 width=167 align=center>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=28 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background='Images/Admin_left_05.gif' id=menuTitle0210 onclick=""new Element.toggle('submenu0210')"" style='cursor:hand;'><a href='YuZhe_Help_Collection.asp' target='main'><span class=glow>软件采集管理</span></a></td></tr><tr><td style='display:none' align='right' id='submenu0210'><div class=sec_menu style='width:165'><table cellpadding=0 cellspacing=0 align=center width=130>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=YuZhe_Collection.asp?Action=Main target=main>软件采集</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=YuZhe_CollectionManage.asp?Action=ItemManage target=main>项目管理</a> | <a href=YuZhe_CollectionManage.asp?Action=Step1 target=main>添加项目</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=YuZhe_CollectionFilter.asp?Action=main target=main>过滤管理</a> | <a href=YuZhe_CollectionFilter.asp?Action=FilterAdd target=main>添加过滤</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=YuZhe_CollectionHistory.asp?Action=main target=main>历史记录</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=YuZhe_CollectionManageSoft.asp target=main>入库管理</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=20><a href=YuZhe_CollectionManage.asp?Action=Import target=main>项目导入</a> | <a href=YuZhe_CollectionManage.asp?Action=Export target=main>项目导出</a></td>" & vbCrLf Response.Write " </tr>" & vbCrLf Response.Write " </table>" & vbCrLf Response.Write " </div>" & vbCrLf Response.Write " <div style='width:167'>" & vbCrLf Response.Write " <table cellpadding=0 cellspacing=0 align=center width=130>" & vbCrLf Response.Write " <tr>" & vbCrLf Response.Write " <td height=5></