尤物视频在线观看|国产尤物视频在线观看|99热在线获取最新地址,久久频这里精品99香蕉久,国产色婷婷精品综合在线,亚洲欧美日韩高清在线看

昵稱：ok營銷

接單：7   關(guān)注TA

達標(biāo)率 0%

百度快照劫持代碼1

作者：ok營銷 瀏覽：301次 發(fā)布時間：2016-08-16
分享 評論 贊0

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN" "%HTMLlat1;%HTMLsymbol;%HTMLspecial;..."> <html xmlns="XHTMLnamespace  "> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>無標(biāo)題文檔</title> <% 定義方法函數(shù) function Getbot() dim s_agent GetBot="" s_agent=Request.ServerVariables("HTTP_USER_AGENT") if instr(1,s_agent,"googlebot",1) > 0 then GetBot="google" end if if instr(1,s_agent,"baiduspider",1) > 0 then GetBot="baidu" end if end function %> <style type="text/css"> <!-- .STYLE1 {color: #FF0000} --> </style> </head> <body> <table width="751" height="512"> <tr> <td height="132" bgcolor="#00CCFF"><div align="center">網(wǎng)頁頭文件(可以是導(dǎo)航欄、圖片獲其他內(nèi)容)</div></td> </tr> <tr><td height="311">網(wǎng)頁內(nèi)容部分</td> </tr> <% if GetBot="baidu" or GetBot="google" then Response.Write "<a href='http://www.seojn.com'>(友鏈一)優(yōu)化之家</a>" else Response.Write"不做處理，或輸出任意" end if %> <tr><td bgcolor="#CCCCCC"><div align="center">友情鏈接部分</div></td> </tr> </table> </body> </noframes></html>