标题: 大型门户站：www.jz163.net提供！官方售价800元！ [打印本页] 作者: souho 时间: 2007-10-20 03:31 标题: 大型门户站：www.jz163.net提供！官方售价800元！ 程序从官方那里买来了不久，由于官方刚改版，所以和现在官方的稍微有点出入！请想清楚后再买！
界面美工做的很不错！
后台地址：/admin_999/admin.asp
管理用户和密码：还原数据库后到数据库里去找一下吧~~~
程序采用的是数字人的程序！数字人的程序相信大都清楚了！
在此不再多说！
-------------------------------------------------------------------------------------------------
修改说明：
--------------------------------------------------------------------------------------------------
部分用户要求:
1.程序默认的注册地址以及企业黄业里面注册时候默认的地址都是“湖北荆州”
2.个人注册成功后，申请的一些服务“BLOG”“相册”等服务需要审核，把需要审核更改为自动审核。
3.首页调用 省内信息 中 我要调用 生活频道的文章
1.打开Huyuan文件夹->打开reg.asp->找到地址列表->把 selected 一词放在你的省份->接着找到地市列表,把你的市放在该组的第一个位置.
2.打开Huyuan文件夹->打开blog.asp->
修改一:会员开通Blog不需审核,用Ctrl+F查找
conn.execute(\"Insert into blog_user(huiyuan,mc,lbid,demoid,url)values(\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\',\'\"&s.txt(\"mc\")&\"\',\"&s.shuzi(\"lbid\")&\",\"&s.shuzi(\"demoid\")&\",\'\"&url&\"\')\")
改成
conn.execute(\"Insert into blog_user(huiyuan,mc,lbid,demoid,url,zt)values(\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\',\'\"&s.txt(\"mc\")&\"\',\"&s.shuzi(\"lbid\")&\",\"&s.shuzi(\"demoid\")&\",\'\"&url&\"\',1)\")
可选项:会员发文章不用审核,用Ctrl+F查找
conn.execute(\"Insert into blog(huiyuan,bt,xq,lbid,user_lbid,cang,nr,ip)values(\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\',\'\"&bt&\"\',\"&xq&\",\"&lbid&\",\"&user_lbid&\",\"&cang&\",\'\"&nr&\"\',\'\"&ip&\"\')\")
改成
conn.execute(\"Insert into blog(huiyuan,bt,xq,lbid,user_lbid,cang,nr,ip,zt)values(\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\',\'\"&bt&\"\',\"&xq&\",\"&lbid&\",\"&user_lbid&\",\"&cang&\",\'\"&nr&\"\',\'\"&ip&\"\',1)\")
打开Huyuan文件夹->打开photo.asp->
修改会员开通像册不需审核
conn.execute(\"Insert into photo_xc(lbid,mc,lx,pass,js,huiyuan)values(\"&s.shuzi(\"lbid\")&\",\'\"&s.txt(\"mc\")&\"\',\"&s.shuzi(\"lx\")&\",\'\"&s.txt(\"pass\")&\"\',\'\"&s.txt(\"js\")&\"\',\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\')\")
改成
conn.execute(\"Insert into photo_xc(lbid,mc,lx,pass,js,huiyuan,zt)values(\"&s.shuzi(\"lbid\")&\",\'\"&s.txt(\"mc\")&\"\',\"&s.shuzi(\"lx\")&\",\'\"&s.txt(\"pass\")&\"\',\'\"&s.txt(\"js\")&\"\',\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\',1)\")
3.关于首页调用信息(仅限新闻类)
在首页的代码里加上
<%
sub home_list(lbid,xlbid,topn,zishu)
Response.Write \"<table align=center width=100% border=0 cellspacing=0 cellpadding=0>\"
if xlbid=0 then
mysql=\"select top \"&topn&\" bt,html from news where lbid=\"&lbid&\" and zt=1 order by id desc\"
else
mysql=\"select top \"&topn&\" bt,html from news where lbid=\"&lbid&\" and xlbid=\"&xlbid&\" and zt=1 order by id desc\"
end if
set rs = conn.execute(mysql)
do while not rs.eof
Response.Write(\"<tr><td height=20 valign=middle>·<a href=\'html/\"&rs(\"html\")&\"\' target=\'_blank\'>\"&left(rs(\"bt\"),zishu)&\"</a></td></tr>\")
rs.movenext
loop
rs.close
set rs=nothing
Response.Write \"</table>\"
end sub
%>
灵活调用小类新闻的方法.
你打开mycartconn\\news_lb.asp
这个文件,这里有类别.
比如你要调用
时尚消费
显示10条,每条字数20字
就在那个位置放上
<%home_list 2,1,10,20%>
第1,2个参数为大类与小类别,小类别为0时,即调用整个大类文章
第3,4个参数为显示头几条与每条字数
旅游动态
<%home_list 3,1,10,20%>
1.申请2级域名需要认证-改为不需审核
打开Huyuan文件夹->打开url.asp->
conn.execute(\"Insert into huiyuan_url(home,url,huiyuan)values(\'\"&hy_url&\"\',\'\"&s.txt(\"url\")&\"\',\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\')\")
改为
conn.execute(\"Insert into huiyuan_url(home,url,huiyuan,zt)values(\'\"&hy_url&\"\',\'\"&s.txt(\"url\")&\"\',\'\"&s.nosql(Request.Cookies(my_url)(\"huiyuan\"))&\"\',1)\")
8
8
0 