|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
缺乏可以共同遵循的行业标准，ASP还处在发展初期，大家对它的理解不同，如产品和服务标准，收费标准等，不利于行业的健康发展。搜刮引擎|优化|搜刮引擎|优化
明天对车米网的论坛作了优化，发明动网论坛7.0原本就思索到了搜刮引擎的成绩，只必要复杂修正就能够很好的优化了.
动网论坛接纳javascript+模版的体例显现页面，服务器将没有深加工的数据和js代码一同发送到客户端剖析，加重了服务器包袱，可是搜刮引擎一样平常不会剖析javascript代码的，不外动网论坛的次要页面都有判别扫瞄器范例，假如是搜刮引擎，主动跳转到专门为扫瞄器显现的页面，可是这些页面做得不是太好，上面是我修正的了局：
今天我把论坛的meta标签的description部分往失落，google发明这个标签后就会疏忽上面的内容，间接区标签中的内容。
修正index.asp:
将函数SubShow_Index_Footer()中的
DimBrowserType
IfBrowserType.IsSearchThenResponse.redirect"indexNew.asp"
提拔到index.asp的后面，让页面一检测到是搜刮引擎就跳转到优化后的页面，本来那模样的了局是google仅仅抓取了Show_Index_Footer()中的信息，后面的都给疏忽了。
修正indexnew.asp
将Dvbbs.head()改成Dvbbs.head()
正文失落
Dvbbs.ActiveOnline()
Show_Index_Top
Show_Index_Footer
Response.WriteReplace(template.html(9),"{$Getlink}",Getlink())
IfDvbbs.Forum_setting(29)="1"ThenCallbirthuser()
Dvbbs.Footer()
Response.WriteDvbbs.value
Response.Writetemplate.html(8)(1)
如许子跳转后的首页显现的就绝对对照复杂了，可是代码仍是有些冗余，假如想再精简些，就不要用dvbbs的模版了，间接用asp天生静态页面，能往失落的都往失落。
一样修正list_show.asp
将Dvbbs.head()改成Dvbbs.head()
正文失落
News
Board_Online
Show_List_Footer
Dvbbs.ActiveOnline()
Dvbbs.Footer()
再修正printpage.asp
假如你的论坛必要注册用户才干扫瞄，而你又要搜刮引擎可以抓失信息的话，把IfDvbbs.GroupSetting(2)="0"ThenDvbbs.AddErrcode(31)这行正文失落。
其他的没甚么好改的，这个页面的模版已做得十分精简了，你能够试着修正page_postjob模版来增添些其他的毗连。
上面作一个更有实践效果的索引页面，良多不错的php论坛都有如许的页面，效果很好：
新建一个目次，任意甚么，然后在内里创建一个index.asp文件，这个文件的代码我间接用了动网论坛的newtopic.asp，把内里的js往失落就好了：
<!--#includefile="../conn.asp"-->
<!--#IncludeFile="../inc/Dv_ClsMain.asp"-->
<htmlxmlns="http://www.w3.org/1999/xhtml">
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/>
<title>车米网</title>
<linkrel="stylesheet"href="../style.CSS"type="text/css"/>
</head>
<body>
<divclass="main">
<divclass="top"><ahref="../index.asp">车米网</a>-论坛新贴</div>
<divclass="body">
<%
DVBBS7.0动网论坛首页挪用-----主题挪用
dimbbsurl,lockboardid,picurl
############以下为修正项######################
dimlockurl
lockurl=""
只同意挪用网址,要以"HTTP://"开首,为空则不开放此功效.(可同意多网址限定，要以","分开。)
比方只同意此两个网址挪用:lockurl="http://www.artistsky.net/,http://www.artbbs.net/"
bbsurl="http://bbs.my-car.cn/"请填写你论坛的准确地点,要以"HTTP://"开首
lockboardid="1,2,3"请填写限定挪用的论坛版块ID,用逗号离隔。（当lock参数为1，2时失效）
picurl="http://bbs.my-car.cn/skins/default/topicface/"心境图标目次地点
############以上为修正项######################
bbsurl=getservepath(request.ServerVariables("server_name")&request.ServerVariables("URL"))
functiongetservepath(str)
dimtmpstr
tmpstr=split(str,"/")
getservepath="http://"&replace(str,tmpstr(ubound(tmpstr)),"")
endfunction
*************************************
上传到与CONN.ASP同级的目次下
以上地点参数必定要修正,不然所挪用的链接是往了以上的论坛.
如有成绩,能够运转一同上传的newscode.ASP文件举行调试(newscode.ASP运转前要修正挪用参数)
FSSUNWIN2003.12.31
*************************************
iftrim(lockurl)""andcheckserver(lockurl)=falsethen
response.write"document.write(数据被回护,克制被其他站点挪用!"
response.end
endif
Privatefunctioncheckserver(str)
dimi,servername
checkserver=false
ifstr=""thenexitfunction
str=split(Cstr(str),",")
servername=Request.ServerVariables("HTTP_REFERER")
fori=0toUbound(str)
ifright(str(i),1)="/"thenstr(i)=left(trim(str(i)),len(str(i))-1)
ifLcase(left(servername,len(str(i))))=Lcase(str(i))then
checkserver=true
exitfor
else
checkserver=false
endif
next
endfunction
dimrs,sql
dimorders,reply,topic,isbest,lock,board,action,info,tlen,showpic
dimbname,ars
dimpostinfo,postname,POSTTIME
dimNowUseBbs,boardname,boardid
dimi,k,n,sdate,searchdate
i=0:k=0
lock=0cint(trim(request("lock")))
orders=4trim(request("orders"))
boardid="all"trim(request("boardid"))
sdate=3trim(request("sdate"))
action=1cint(request("action"))
info=3request("info")
tlen=16request("tlen")
reply=0request("reply")
showpic=0request("showpic")
n=100trim(request("n"))
bname=0request("bname")
ifn""andIsNumeric(n)then
n=cint(n)
else
n=1
endif
iforders=1then
orders="hitsdesc,"
Elseiforders=2ororders=3then
orders="dateandtimedesc,"
endif
Ifboar</p>楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。 |
|
|Archiver|手机版|仓酷云
鄂ICP备14007578号-2
发表于 2015-1-16 23:41:23
收藏
转播
分享
淘帖
顶
踩
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
照妖镜