<%
Dim objTypeLib
Set objTypeLib = CreateObject("Scriptlet.TypeLib")
Response.Write objTypeLib.Guid
%>

<%
Dim objTypeLib
Set objTypeLib = CreateObject("Scriptlet.TypeLib")
Response.Write "任意字符"&objTypeLib.Guid&"任意字符"
%>

<%
Function GetGuid()
    on error resume next
    Dim objTypeLib
    Set objTypeLib = CreateObject("Scriptlet.TypeLib")
    GetGuid=objTypeLib.Guid
    If Err.Number<>0 Then GetGuid="":Exit Function
    GetGuid=mid(GetGuid,2,36)
End Function
Response.Write "任意字符"&GetGuid()&"任意字符"
%>

oauth_consumer_key="这里写您的App ID一般为6位数字"
oauth_consumer_secret = "这里写您的App KEY一般为32位字符串"
oauth_siteurl="http://www.54bq.com/boke/" '博客安装目录，以http://开头，以/结尾

     userPanel = userPanel&"<a href=""login.asp"" class=""sideA"" accesskey=""L"">登录</a><a href=""register.asp"" class=""sideA"" accesskey=""U"">用户注册</a>"

     userPanel = userPanel&"<a href=""login.asp"" class=""sideA"" accesskey=""L"">登录</a><a href=""register.asp"" class=""sideA"" accesskey=""U"">用户注册</a><a href=""http://www.54bq.com/boke/Plugins/QQlogin/start.asp"" class=""sideA"" accesskey=""L""><img src='http://qzonestyle.gtimg.cn/qzone/vas/opensns/res/img/Connect_logo_3.png' border=0></a>"

                    }catch(e){if (e.description.length > 0) alert(e.description);}
                }
            }

        if ($("removeCommTips")) $("removeCommTips").innerHTML=$("removeCommTips").innerHTML+"<a href='http://www.54bq.com/boke/Plugins/QQlogin/start.asp'><img src='http://qzonestyle.gtimg.cn/qzone/vas/opensns/res/img/Connect_logo_3.png' border=0></a>";

                     <%if memName=empty then%>
                         虽然发表评论不用注册，但是为了保护您的发言权，建议您<a href="register.asp">注册帐号</a>.<br/>
                     <%end if%>

                     <%if memName=empty then%>
                         虽然发表评论不用注册，但是为了保护您的发言权，建议您<a href="register.asp">注册帐号</a>.<br/><a href='http://www.54bq.com/boke/Plugins/QQlogin/start.asp'><img src='http://qzonestyle.gtimg.cn/qzone/vas/opensns/res/img/Connect_logo_3.png' border=0></a>
                     <%end if%>    

<!--QQ一键登录代码开始-->
<a href="http://www.54bq.com/boke/Plugins/QQlogin/start.asp">
<img src="http://qzonestyle.gtimg.cn/qzone/vas/opensns/res/img/Connect_logo_3.png" border=0>
</a>
<!--QQ一键登录代码结束-->

$Response->SetProperty('Cookies', 'domain', 'www.54bq.com');
print $Request->Cookies(domain) . "<br>\n";

<%
$Response->{Charset}='GB2312';
print $Session->{SessionID}; #输出sessionID
print $Session->{Timeout};#过期时间（分钟）
$Session->Lock();#lock session
$Session->UnLock();
%>

ASP：
<%
Dim Infos
Infos=Request.ServerVariables("HTTP_USER_AGENT")
if instr(Infos,"360SE")>0 then
Response.Status = "404 Object Not Found"
Response.End
end if
%>
Javascript：
<script type="text/javascript">
if(navigator.userAgent.indexOf("360SE")>0){
    alert('系统检测出来你使用了360流氓浏览器,请先卸载或改用ie（或firefox）等再行访问本站，谢谢合作！');
    document.execCommand("stop");
    //location.href=http://www.030904.com; //注:把location前面的//号去掉后,把后面的网址改成你的网站,弹出窗口后就会跳到你指定的网址.
}
</script>
PHP：
<?php
$useragent = $_SERVER['HTTP_USER_AGENT'];
if(strstr($useragent,"360SE")) {die("系统检测出来你使用了360流氓浏览器,请先卸载或改用ie（或firefox）等再行访问本站，谢谢合作！");}
?>
或者
<?php
if ($http_user_agent ~ (360SE) )  
{  
return 404;  
}
?>

<%
Dim FontPath,Jpeg,Txt,i,x,y,w,Angle
Set Jpeg = Server.CreateObject("Persits.Jpeg")
FontPath=Server.MapPath("SIMHEI.TTF")
Jpeg.Open Server.MapPath("001.jpg")
Txt = "让水印跳起舞来吧"
Jpeg.Canvas.Font.Color = &HFFFFFF00
Jpeg.Canvas.Font.Size = 12
Angle = -275
For i = 1 To Len(Txt)
   x = 280 * cos( Angle * 3.141592 / 180 ) + Jpeg.Width / 2
   y = 280 * sin( Angle * 3.141592 / 180 ) + Jpeg.Height / 2
   Jpeg.Canvas.Font.Rotation = 270 - Angle
   w = Jpeg.Canvas.PrintTextEx(Mid(txt, i, 1), x, y, FontPath)
   Angle = Angle + w / 3.85
Next
Jpeg.Save Server.MapPath("002.jpg")
Set Jpeg=Nothing
%>

@font-face {
    font-family: '百度综艺简体';
    src: url('bdzyjt.eot'); /* IE9 及以上浏览器*/
    src: url('bdzyjt.eot?#iefix') format('embedded-opentype'), /* IE6-IE8 */
    url('bdzyjt.woff') format('woff'), /* 火狐、谷歌 */
      url('bdzyjt.ttf')  format('truetype'), /* 火狐,Safari, Android, iOS */
    url('bdzyjt.svg#YourWebFontName') format('svg'); /* 传统的操作系统*/
    font-weight: normal;
    font-style: normal;
}

@font-face{
font-family:"百度综艺简体";
src: url("bdzyjt.eot");
}
@font-face{
font-family:"百度综艺简体";
src:url("bdzyjt.ttf") format("truetype"),
  url('bdzyjt.woff') format('woff');
}

@font-face{
font-family:"百度综艺简体";
src: url("http://yourdomain/bdzyjt.eot");
}
@font-face{
font-family:"百度综艺简体";
src:url("http://yourdomain/bdzyjt.ttf") format("truetype");
}

(function( window, undefined ) {
    if (window.execScript) {
        window.execScript('var a=123;');
    }
    else{
        window.eval.call(window,'var a=123;');
    }
})(window);
alert(a);
%>

(function() {
      eval('var a=123;');
})();
try{
      Response.Write(a);
}
catch(e){
      Response.Write("出现错误："+e.description);
}

(function() {
      eval('a=123;');
})();
try{
      Response.Write(a);
}
catch(e){
      Response.Write("出现错误："+e.description+"<br/>");
}

(function() {
      eval('a=function(){return 123;};');
})();
try{
      Response.Write(a());
}
catch(e){
      Response.Write("出现错误："+e.description+"<br/>");
}

var $={
    include:function (){return 'var a=123;';}
}
eval($.include());
try{
      Response.Write(a);
}
catch(e){
      Response.Write("出现错误："+e.description+"<br/>");
}

with(Math){
      var a=123;
}
Response.Write(a);

try
{
    /*code*/
}
finally{
    var a=123;
}
Response.Write(a);

try
{
    abcdefg /*写点出错的语句*/
}
catch (e)
{
    var a=123;
}
Response.Write(a);

LinkSingContent = GetLinkSingleHtml(LinkTemp, Trim(blog_Links("LinkClass_ID")), 3)

LinkSingContent = GetLinkSingleHtml(LinkTemp, Trim(blog_Links("LinkClass_ID")), 2)