PJBlog加highslide效果教程

'-----------多媒体标签----------------

'这个就是highslide JS 的功能，添加[photo][/photo]和[photo，图片注释][/photo]来显示图片。
                    
                    re.Pattern="(\[photo\])(.[^\]]*)\[\/photo\]"
                    Set strMatchs=re.Execute(strContent)
                    For Each strMatch in strMatchs
                        tmpStr1=(strMatch.SubMatches(1))
                        strContent=replace(strContent,strMatch.Value,"<a id=""thumb1"" href="""&tmpStr1&""" class=""highslide"" onclick='return hs.expand(this, { captionId: ""caption1"" } )'><img src="""&tmpStr1&""" alt=""Highslide JS"" title=""kanoe.cn"" /></a>",1,-1,0)
                    Next
                                    
                      re.Pattern="\[photo,(.[^\]]*)\](.[^\]]*)(\[\/photo\])"
                    Set strMatchs=re.Execute(strContent)
                    For Each strMatch in strMatchs
                        tmpStr1=strMatch.SubMatches(0)
                        tmpStr2=checkURL(strMatch.SubMatches(1))
                        strContent=replace(strContent,strMatch.Value,"<a id=""thumb1"" href="""&tmpStr2&""" class=""highslide"" onclick='return hs.expand(this, { captionId: ""caption1"" } )'><img src="""&tmpStr2&""" alt="""&tmpStr1&""" title="""&tmpStr1&""" /></a>",1,-1,0)
                    Next
                    
                    re.Pattern="\[photo=(\d*|),(\d*|),(.[^\]]*)\](.[^\]]*)(\[\/photo\])"
                    Set strMatchs=re.Execute(strContent)
                    For Each strMatch in strMatchs
                        tmpStr1=strMatch.SubMatches(0)
                        tmpStr2=strMatch.SubMatches(1)
                        tmpStr3=strMatch.SubMatches(2)
                        tmpStr4=checkURL(strMatch.SubMatches(3))
                        strContent=replace(strContent,strMatch.Value,"<a id=""thumb1"" href="""&tmpStr4&""" class=""highslide"" onclick='return hs.expand(this, { captionId: ""caption1"" } )'><img src="""&tmpStr4&""" alt="""&tmpStr3&""" title="""&tmpStr3&""" width="""&tmpStr1&""" height="""&tmpStr2&""" /></a>",1,-1,0)
                    Next
                        
'highslide JS 效果到此结束。

//highslide效果图像
function UBB_photo(){
if (EditMethod=="normal")
{
         var PopText
          if (PopText=window.prompt(photo_normal,"")) {
                AddText("\n【photo】"+PopText+"[/photo]")  //为了禁止自动转换，已把[]换成【】
   }
}

if (EditMethod=="expert")
{
         AddText("[photo=W,H,title][/photo]")
}
}

//highslide效果图像
function UBB_photo(){
var UBBSelectrange=document.selection.createRange()
  if (SelectAllow && UBBSelectrange.text!=""){
   UBBSelectrange.text="【photo】"+UBBSelectrange.text+"[/photo]" //为了禁止自动转换，已把[]换成【】
   return
  }    
  
if (EditMethod=="normal")
{
     var PopText
      if (PopText=window.prompt(photo_normal,"")) {
        AddText("\n[photo=w,h,title]"+PopText+"[/photo]")
   }
}

if (EditMethod=="expert")
{
     AddText("[photo=w,h,title][/photo]")
}
}

var photo_normal = "请输入highslide效果图像的 URL。\n标签:[photo,title][/photo][photo=w,h,title][/photo]";

flash,music,mediaplayer,realplayer,ed2k,mDown,htmlubb,highlightcode

flash,music,mediaplayer,realplayer,ed2k,mDown,htmlubb,highlightcode,photo

Select Case str

   case "photo":
   Tip="插入highslide js效果图像"

<div id="foot">

<div id="controlbar" class="highslide-overlay controlbar">
    <a href="#" class="previous" onclick="return hs.previous(this)" title="Previous (left arrow key)"></a>
    <a href="#" class="next" onclick="return hs.next(this)" title="Next (right arrow key)"></a>
    <a href="#" class="highslide-move" onclick="return false" title="Click and drag to move"></a>
    <a href="#" class="close" onclick="return hs.close(this)" title="Close"></a>
</div>

</head>

<!--highslide JS效果JS文件-->
<script type="text/javascript" src="highslide/highslide.js"></script>
<script type="text/javascript">
    // remove the registerOverlay call to disable the controlbar
    hs.registerOverlay(
        {
            thumbnailId: null,
            overlayId: 'controlbar',
            position: 'top right',
            hideOnMouseOut: true
        }
    );    
    hs.graphicsDir = 'highslide/graphics/';
    hs.outlineType = 'rounded-white';
    hs.captionEval = 'this.thumb.title';
</script>
<link rel="stylesheet" type="text/css" href="highslide/highslide.css" />