editor_modifypic.asp

个人网站比较简短

function Preview(){
    if(url.value!="http://"&&url.value!=""){
        frmPreview.img.src=url.value;
        frmPreview.img2.src=url.value;
    }
    else{
        frmPreview.img.src="../images/nopic.gif";
        frmPreview.img2.src="../images/nopic.gif";
    }
    var iheight=height.value;
    var iwidth=width.value;
    if(iheight>0){
        if(iwidth>0){
            frmPreview.img.height=iheight;
            frmPreview.img.width=iwidth
        }
        else{
            frmPreview.img.height=iheight;
            frmPreview.img.width=iheight/frmPreview.img2.height*frmPreview.img2.width;
        }
    }
    else{
        if(iwidth>0){
            frmPreview.img.width=iwidth
            frmPreview.img.height=iwidth/frmPreview.img2.width*frmPreview.img2.height;
        }
        else{
            frmPreview.img.height=frmPreview.img2.height;
            frmPreview.img.width=frmPreview.img2.width;
        }
    }

    frmPreview.img.border=border.value;
    frmPreview.img.style.borderColor =t_bordercolor.value;
    frmPreview.img.style.filter=filter.value;
    frmPreview.img.title=alttext.value
 }
//=================================================
//过程名：SelectColor
//作  用：显示颜色表
//参  数：what  --- 要获得颜色的参数
//=================================================
function SelectColor(what){
    var dEL = document.all("t_"+what);
    var sEL = document.all("s_"+what);
    var url = "editor_selcolor.asp?color="+encodeURIComponent(dEL.value);
    var arr = showModalDialog(url,window,"dialogWidth:280px;dialogHeight:250px;help:no;scroll:no;status:no");
    if (arr) {
        dEL.value=arr;
        sEL.style.backgroundColor=arr;
    }
}
function SelectFile(){
  var arr=showModalDialog('<%=InstallDir & AdminDir%>/Admin_SelectFile.asp?DialogType=Pic&ChannelID=<%=ChannelID%>', '', 'dialogWidth:820px; dialogHeight:600px; help: no; scroll: yes; status: no');
  if(arr!=null){
    var ss=arr.split('|');
    url.value=ss[0];
    upfilename.value="1$$$" + ss[0].replace("<%=FilesPath%>", "");
    Preview();
  }
}
</script>
  <table border=0 cellpadding=0 cellspacing=0 align=center width='95%'>
    <tr>
      <td><fieldset>
      <legend>预览图片</legend>
        <table border=0 cellpadding=0 cellspacing=5>
          <tr>
            <td align='center'><iframe id='frmPreview' width='350' height='220' frameborder='1' src='editor_imgPreview.asp'></iframe></td>
          </tr>
          <tr>
            <td>地址：
             <Input name="url" type=text id="url" style="width:243px" onChange="javascript:Preview()" size=30>
            <%if IsUpload=True And AdminName <> "" then %>
             <!--'增加房产模块用到的 ShowType=3-->
             <Input type="button" name="Submit" value="..." title="从已上传文件中选择" onClick="SelectFile()">
            <%End if%>
            </td>
          </tr>
        </table>
      </fieldset></td>
      <td width=80 align="center" valign="middle" rowspan="6">
        <table border='0' cellpadding='0' cellspacing='0' width='100%' height='100%' align='center'>
          <tr>
            <td height='230'></td>
          </tr>
          <tr>
            <td width='20'></td>
            <td >
             <Input type="hidden" id="upfilename" value="">
             <Input type=submit value='  确定  ' id=Ok onClick="OK()"><BR><BR>
             <Input type=button value='  取消  ' onClick="window.close();">
            </td>
          </tr>
        </table>
      </td>
    </tr>
    <tr>
      <td height=5></td>
    </tr>
    <tr>
      <td><fieldset>
      <legend>显示效果</legend>
        <table border=0 cellpadding=0 cellspacing=5>
          <tr>
            <td>说明文字：</td>
            <td colspan=5>
             <Input name="alttext" type=text id=alttext style="width:243px" onChange="javascript:Preview()" size=38></td>
          </tr>
          <tr>
            <td nowrap>边框粗细：</td>
            <td>
             <Input type=text id=border  name="border" size=10 value="" onKeyPress="event.returnValue=IsDigit();" onChange="javascript:Preview()"></td>
            <td width=40></td>
            <td nowrap>边框颜色：</td>
            <td>
              <table border=0 cellpadding=0 cellspacing=0>
                <tr>
                  <td>
                   <Input type=text id=t_bordercolor name=t_bordercolor size=7 value="" onChange="javascript:Preview()"></td>
                  <td><img border=0 src="images/rect.gif" width=18 style="cursor:hand" id=s_bordercolor onClick="SelectColor('bordercolor');Preview();"> </td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td>特殊效果：</td>
            <td>
             <Select id=styletype style="width:72px" size=1 name="filter" onChange="javascript:Preview()">
               <option value='' selected>无</option>
               <option value='Alpha(Opacity=50)'>半透明</option>
               <option value='Alpha(Opacity=0, FinishOpacity=100, Style=1, StartX=0, StartY=0, FinishX=100, FinishY=140)'>线型透明</option>
               <option value='Alpha(Opacity=10, FinishOpacity=100, Style=2, StartX=30, StartY=30, FinishX=200, FinishY=200)'>放射透明</option>
               <option value='blur(add=1,direction=14,strength=15)'>模糊效果</option>
               <option value='blur(add=true,direction=45,strength=30)'>风动模糊</option>
               <option value='Wave(Add=0, Freq=60, LightStrength=1, Phase=0, Strength=3)'>正弦波纹</option>
               <option value='gray'>黑白照片</option>
               <option value='Chroma(Color=#FFFFFF)'>白色透明</option>
               <option value='DropShadow(Color=#999999, OffX=7, OffY=4, Positive=1)'>投射阴影</option>
               <option value='Shadow(Color=#999999, Direction=45)'>阴影</option>
               <option value='Glow(Color=#ff9900, Strength=5)'>发光</option>
               <option value='flipv'>垂直翻转</option>
               <option value='fliph'>左右翻转</option>
               <option value='grays'>降低彩色</option>
               <option value='xray'>X光照片</option>
               <option value='invert'>底片</option>
             </Select>
            </td>
            <td width=40></td>
            <td>对齐方式：</td>
            <td>
             <Select id=aligntype size=1 style="width:72px">
               <option value='' selected>默认</option>
               <option value='left'>居左</option>
               <option value='right'>居右</option>
               <option value='top'>顶部</option>
               <option value='middle'>中部</option>
               <option value='bottom'>底部</option>
               <option value='absmiddle'>绝对居中</option>
               <option value='absbottom'>绝对底部</option>
               <option value='baseline'>基线</option>
               <option value='texttop'>文本顶部</option>
             </Select>
            </td>
          </tr>
          <tr>
            <td>图片宽度：</td>
            <td>
             <Input type=text id=width name=width size=10 onKeyPress="event.returnValue=IsDigit();"  onChange="javascript:Preview()" maxlength=4></td>
            <td width=40></td>
            <td>图片高度：</td>
            <td>
             <Input type=text id=height name=height size=10 onKeyPress="event.returnValue=IsDigit();" maxlength=4 onChange="javascript:Preview()"></td>
          </tr>
          <tr>
            <td>上下间距：</td>
            <td>
             <Input type=text id=vspace size=10 value="" onKeyPress="event.returnValue=IsDigit();" maxlength=2 ></td>
            <td width=40></td>
            <td>左右间距：</td>
            <td>
             <Input type=text id=hspace size=10 value="" onKeyPress="event.returnValue=IsDigit();" maxlength=2></td>
          </tr>
            <tr id=dlink style="display:''">
                <td colspan='2' ><INPUT TYPE='checkbox' NAME='zoom' id="zoom" value='Yes'>加载图片缩放JS代码</td>
                <td width=40></td>
                <td colspan='2'><INPUT TYPE='checkbox' NAME='addlink' id="addlink" value='Yes'>添加到原始图片的链接</td>
            </tr>
        </table>
      </fieldset></td>
    </tr>
    <%if IsUpload=True then %>
    <tr>
      <td><fieldset align=left>
      <legend align=left>上传本地图片</legend>
    <%
        Response.write "<iframe class=""TBGen"" style=""top:2px"" id=""UploadFiles"" src=""upload.asp?DialogType=pic"
        Response.write "&ChannelID=" & ChannelID
        If ModuleType=3 Then
            Response.write "&PhotoUpfileType=1"
        End If
        Response.write """ frameborder=0 scrolling=no width=""350"" height=""25""></iframe>"
        Response.write "</fieldset></td>"
        Response.write "</tr>"
    End if 
    %>
    <tr>
      <td height=5></td>
    </tr>
  </table>
</body>
</html>