爬爬思特新闻管理系统 v1.2
爬爬思特新闻管理系统 v1.2：
爬爬思特新闻管理系统1.2版本 专为小型个人网站而设计的后台，代码短小精悍，整个程序只有五个ASP程序文件，却实现了基本的新闻系统功能！ 高度的功能代码集成，科学的逻辑判断思维，让你不再为做一个小网站而寻求一个合适的后台发愁，安全方便，彻底告别庞大的新闻后台！！ 功能介绍： 一：新闻支持2级分类，自由增加，删除，修改分类， 二：新闻添加，修改，批量删除，全部或按分类列表（带分页）显示新闻， 三：支持新闻内容添加图片，支持图片新闻，支持文章是否审核发表 四：支持评论功能，后台管理管理，支持批量删除 三：支持随意更改文件名，方便系统整合,提高了安全性。 需同步更新PPst_Conn.asp里的参数设置 四：带管理后台验证，非管理员不能进入，可更改密码 五：“过程”调用新闻数据，方便后台与前台的代码页面分离15个参数可设定调用哪个新闻类别，调多少条新闻等各种显示方式 六：代码书写干净，整齐，复杂的地方添加了注释，方便二次开发和学习 七：默认用户名和密码都为：admin，后台路径：PPst_News.asp 如何安装？ 用记事本格式打开PPst_Conn.asp， 可更改列表每页显示多少条新闻 设定后台管理员账号和密码 是否开启评论 更改数据库路径，（建议安装后更改一下） 数据库升级： 运行papasite_update.asp文件即可，内有说明 如何设置前台调用新闻代码： 1，文件后缀必须为.asp，将所有本系统文件放在与你前台文件同一目录 2，文件第一行加入： 3，在需要调用新闻的地方，插入代码：(请注意根据需要更改前两个参数！！) 并设置相关参数值，详细参数说明(按对应顺序，从左到右) <%Call PPst_News BigClassID,SmallClassID,NewsNum,NewsPic,FontColor,LeftNum,NewOpen,IsNew,NewGif,FileName,TrHeight,FontSize,StyleID,NewsIcon,IconGif,ShiJian,OrderBy,IsPage,MoreNum,Key) 'Call PPst_News(0,0,5,1,'#000000',5,0,0,'new.gif','ReadNews.asp',22,12,1,1,'icon.gif',0,0,1,6,'') '详细参数说明 'BigClassID ------- 新闻大类ID号:0为全部大类 'SmallClassID ------- 新闻小类ID号:0为全部分类 'NewsNum ------- 新闻条数:0为全部新闻 'NewsPic ------- 是否提示图片新闻:0为不提示，1为提示 'FontColor ------- 文字颜色,无论有没有连接,都显示此颜色,必须加双引号,如:'#FF0000' 'LeftNum ------- 显示标题最左边的字符数，默认30，一个汉字算两个字符 'NewOpen ------- 是否新窗口打开，0在原窗口打开，1在新窗口打开,容错默认为1 'IsNew ------- 是否在当天的新闻标题的后面显示new, 默认0为不显示，1为显示，并自定义,容错默认为0 'NewGif ------- 当IsNew=1时,自定义图片的地址,必须加双引号,如:'new.gif' 'FileName ------- 用以打开该新闻的程序文件:必须加双引号,如:'ReadNews.asp' 'TrHeight ------- 每条新闻所在行的高度:单位像素(px),0为自动 'StyleID ------- 每条新闻的CSS样式名,默认为0，即无，1为点划线，2为虚线 'NewsIcon ------- 每条新闻前缀:0为不显示,1为显示默认(黑点)，2为自定义,容错默认为1 'IconGif ------- 当NewsIcon=2时,自定义图片的地址,必须加双引号,如:'icon.gif' 'ShiJian ------- 是否显示新闻的发布时间:0为不显示,1,2,3,分别代表三种显示效果,容错默认为2 'OrderBy ------- 调出的新闻以什么排序,0为按发表时间,1为阅读次数，容错默认为0 'IsPage ------- 是否显示分页，0为不显示,1,2,3为三种样式显示，容错默认为0 'MoreNum ------- 分页显示的时候。每页显示多少条新闻, 'Key ------- 搜索的时候专用,一般不需要更改 ========================================================================== 如何调用评论？ 将下面的 代码复制到asp文件，需要现实评论的地方，即可 <%Call PPst_Pinglun(Request('ID'),6)%> 参数说明：PPst_Pinglun(参数1,参数2) 参数1，指该新闻的ID，这里使用Request('ID')自动获取，一般不需要更改， 参数2，调出的评论数量， 如果调用搜索模块 在需要显示搜索模块的地方放如下代码 <%call PPst_Search('Search.asp',80,0)%> 参数说明：PPst_Search(参数1,参数2，参数3) 参数1，搜索结果显示页面， 参数2，搜索模块宽度 参数3，搜索模块显示方式，0为横排显示，1为竖排显示 你还需要在结果显示页面加如下代码： <%If request('K')<>'' then Call PPst_News(request('B'),request('S'),5,1,'#00FF00',30,0,0,'new.gif','ReadNews.asp',50,20,1,1,'icon.gif',0,0,1,6,request('K')) end if %> 具体参数配置同新闻调用代码，几个request('')参数不要动 如何调出分类 在需要显示分类的地方放如下代码 <%Call PPst_Class(BigClassID,SmallClassID,OpenType,ClassFile,ClassType,BigClassNum,SmallClassNum,ClassHeight,ClassIcon)%> 参数说明：PPst_Class(0,1,0,'morenews.asp',1,10,3,16,'') BigClassID：为0表示调出所有的大类，若为相应大类的ID，则只调该大类 SmallClassID：是否显示小类，若为0表示不显示，为1则显示， OpenType：是否新窗口打开，0为本窗口打开，1为新窗口 ClassFile：打开显示的文件，这里是morenews.asp， ClassType：类别显示方式，0为横排，1为竖排 BigClassNum：调出大类的的数量，万一版面不够，都调出来就不好了，是吧 SmallClassNum：调出小类的数量， ClassHeight：调出时的一行高度 ClassIcon：类别前缀，是字符，这是个很特别的字符，有技巧，具体请见论坛 如何现实某新闻详细内容： 在新闻详细显示页面加入以前代码，不要改 <%Call PPst_ReadNews(Request('ID'))%> 然后在需要再以一下方式， <%=ReadNews_Title%> 调用以下内容： ReadNews_Title 新闻标题 ReadNews_Author 作者 ReadNews_AddTime 添加时间 ReadNews_ReadCishu 阅读次数 ReadNews_Content 新闻内容 ReadNews_SmallPicURL 图片地址 '这样显示图片 ReadNews_BigClassID 该新闻所在大类ID ReadNews_BigClassName 该新闻所在大类名称 ReadNews_SmallClassID 该新闻所在小类ID ReadNews_SmallClassName 该新闻所在小类名称 其他所有配置请查看演示文件代码，突然发现，本系统有点不容易上手了 文件目录说明： PPst_Edit HTML编辑器主文件夹 PPst_UpLoadFile 上传文件到此文件夹 Index.asp 以下四个为演示文件，可自行更改或删除。这个是主页演示 MoreNews.asp 显示某分类的所有文件 ReadNews.asp 显示某新闻相信内容 Search.asp 搜索页面 PPst_Class.asp 系统管理分类程序文件 PPst_Conn.asp 数据库连接文件及配置文件，配置你密码什么的 PPst_Data.mdb 数据库文件 PPst_News.asp 系统管理新闻程序文件 PPst_Sub.asp 系统主要过程函数 PPst_UploadPic.asp 上传文件程序 声明： 爬爬思特新闻管理系统1.2版 是由爬爬思特工作室独立设计开发的基于ASP+ACCESS管理系统...旨在为广大互联网用户提供方便快捷、程序小巧但功能强大、新闻后台管理及前台调用功能，本工作室依法对该程序拥有相应权利，本系统提供给个人用户和非商业用户免费学习使用。未经作者许可，不得用于任何商业行为，否则责任自负... 注: 本程序由爬思特工作室独立编写完成,本程序经过XP+IE6环境 测试,运行正常,但由于诸多原因,难免有不足之处,如您在使用过程中, 有任何建议或着发现任何BUG错误,欢迎你及时能与我取得联系, 以确保本程序更加完美! 欢迎您使用爬爬思特新闻管理系统1.2版 官方网站: http://www.papasite.net [爬爬思特工作室] 演示： http://www.asitu.com/PPst/News 技术支持: http://www.papasite.net 联系方式: 电子邮件：papasite@sina.com QQ：14921995(随意加，隐身，留言即可，如无以外，每天都会上线回复， 非技术性报告可能不回，因为留言的太多了，实在照顾不过来) MSN：www@papasite.net 13506442363 [随时垂询] 山东理工大学青春在线爬爬思特工作室 2006-11-16 用户评论
|
源码搜索
热门下载
最新源码
|
