dim inde "在前面要声明下变量
Function getfilelink(file,datafile)
file=replace(file,root,%26quot;%26quot;)
file=replace(file,%26quot;\%26quot;,%26quot;/%26quot;) "我的在这里加在这个后面的
pro=%26quot;products%26quot;
inde=%26quot;index.html%26quot;
if instr(file,inde)%26gt;0 then
cccc=%26quot;1.0%26quot;
else
if instr(file,pro)%26gt;0 then
cccc=%26quot;0.9%26quot;
else
cccc=%26quot;0.8%26quot;
end if
end if "结束了
file=replace(file,wangmin,%26quot;%26quot;)
If FileExtensionIsBad(file) then Exit Function
if month(datafile)%26lt;10 then filedatem=%26quot;0%26quot;
if day(datafile)%26lt;10 then filedated=%26quot;0%26quot;
filedate=year(datafile)%26amp;%26quot;-%26quot;%26amp;filedatem%26amp;month(datafile)%26amp;%26quot;-%26quot;%26amp;filedated%26amp;day(datafile)
getfilelink = %26quot;%26lt;url%26gt;%26lt;loc%26gt;%26quot;%26amp;server.htmlencode(session(%26quot;server%26quot;)%26amp;seoDir%26amp;file)%26amp;%26quot;%26lt;/loc%26gt;%26lt;lastmod%26gt;%26quot;%26amp;filedate%26amp;%26quot;%26lt;/lastmod%26gt;%26lt;changefreq%26gt;daily%26lt;/changefreq%26gt;%26lt;priority%26gt;%26quot;%26amp;cccc%26amp;%26quot;%26lt;/priority%26gt;%26lt;/url%26gt;%26quot;
Response.Flush
End Function
查看下我的xml http://www.yishengdg.com/sitemap.xml
上次的文章,留下了一个问题,就是这个ASP的生成地图工具该如何修改了由于自己不会ASP,给了大家一个思路,今天翻阅了网上的资料,自己在反复调试了下终于搞定了,发现ASP代码很变态,写的格式是有区别的,不像PHP任意,只有结束符号就可以了,东西完成了,和大家分享下,如果遇到这个问题,可以用这个试下首先声明,我不是seo高手,我在探索












