脚本吧 - 幻宇工作室用到js,超强推荐share.js

复制代码代码如下:
function user_login（）{
    var l
    createDlg（"dlgLogin","用户登录",260,170）
    l="<form name=fmLogin action="handle_user.asp？cmd=login">"
    l+="<span style=position:absolute;left:30;top:35>昵称：<input name=FUid checkRule="uid" style=width:155></span>"
    l+="<span style=position:absolute;left:30;top:65>密码：<input name=FPwd checkRule="pwd" type=password style=width:155></span>"
    l+="<span style=position:absolute;left:64;top:90><input hidefocus type=checkbox name=FAutoLogin id=txAutoLogin checked><label for=txAutoLogin>自动登录</label></span>"
    l+="<span onclick="$（"dlgLogin"）.clickOk（）" type=button pos="65,132,58,22" bg="images/panel/btYes.gif"></span>"
    l+="<span onclick="oDel（"dlgLogin"）" type=button pos="140,132,58,22" bg="images/panel/btNo.gif"></span>"
    l+="</form>"
    insHtm（"dlgLogin",l）
    oFocu（document.fmLogin.FUid）
    $（"dlgLogin"）.clickOk=function（）{
        document.fmLogin.btSubmit.click（）
    }
    document.fmLogin.onload=function（xml）{
        location.reload（true）
    }
}
function user_reg（）{
    var l
    createDlg（"dlgReg","用户注册",320,260）
    l="<form name=fmReg action="handle_user.asp？cmd=reg">"
    l+="<span style=position:absolute;left:30;top:35>昵称：<input name=FUid checkRule="uid" style=width:220></span>"
    l+="<span style=position:absolute;left:30;top:60>密码：<input name=FPwd checkRule="pwd" type=password style=width:220></span>"
    l+="<span style=position:absolute;left:30;top:85>确认：<input name=FPwd2 checkRule="pwd2" type=password style=width:220></span>"
    l+="<span style=position:absolute;left:30;top:110>邮箱：<input name=FEmail checkRule="eml" style=width:220></span>"
    l+="<span style=position:absolute;left:30;top:160>签名：</span>"
    l+="<textarea name=FSignature style=position:absolute;left:66;top:140;width:220;height:60></textarea>"
    l+="<span onclick="$（"dlgReg"）.clickOk（）" type=button pos="95,222,58,22" bg="images/panel/btYes.gif"></span>"
    l+="<span onclick="oDel（"dlgReg"）" type=button pos="170,222,58,22" bg="images/panel/btNo.gif"></span>"
    l+="</form>"
    insHtm（"dlgReg",l）
    oFocu（document.fmReg.FUid）
    $（"dlgReg"）.clickOk=function（）{
        document.fmReg.btSubmit.click（）
    }
    document.fmReg.onload=function（xml）{
        oDel（"dlgReg"）
        location.reload（true）
    }
}
function user_logout（）{
    loadXml（"handle_user.asp？cmd=logout",function（xml）{
        location.reload（true）
    }）
}
function editor_setLink（win）{
    var v
    win.focus（）
    if（document.all）
        v=window.showModalDialog（"lib/input.htm","请输入超链接路径|http://","dialogwidth:354px;dialogheight:152px;status:no;help:no"）
    else
        v=prompt（"请输入超链接路径","http://"）
    if（v==null）
        return
    if（v！=""&&v！="http://"）
        win.document.execCommand（"createlink",false,v）
    else
        win.document.execCommand（"unlink",false,null）
}
function editor_insImg（win）{
    var v
    win.focus（）
    if（document.all）
        v=window.showModalDialog（"lib/input.htm","请输入图片路径|http://","dialogwidth:354px;dialogheight:152px;status:no;help:no"）
    else
        v=prompt（"请输入图片路径","http://"）
    if（v==null）
        return
    if（！/.（gif|jpg）/i.test（v））
        return
    win.document.execCommand（"insertimage",false,v）
}
function editor_insJs（win）{
    win.focus（）
    l="<table border=1 align=center cellpadding=0 cellspacing=0 bordercolordark=white bordercolorlight=#BABABA style="margin-top:12;margin-bottom:12;width:90%;background:white">"
    l+="<tr height=22><td style="padding-left:6;background:#d4d0c8">◇ 测试程序 - >> <u style=cursor:pointer>运行下面的js</u></td></tr>"
    l+="<tr valign=top height=90><td name="#jscode" style=padding:6;word-break:break-all><body><br><br></body><br><script><br><br></script></td></tr>"
    l+="</table>"
    editor_paste（win,l）
}
function jsCode_run（ee）{
    var data,w
    data=ee.parentNode.parentNode.nextSibling.innerText
    w=window.open（"", "_blank",""）
    w.document.write（data）
    w.document.close（）
    if（/<script（.）+src=/.test（data））
        w.location.reload（true）
}
function thread_save（tid）{
    var dlgID="dlgThread",dlg,fm,win,btImg,bxFile
    if（myName==""）
        return alert（"您还没有登录，请先登录！"）
    createDlg（dlgID,tid==null？"发布新贴":"修改贴子",640,480）
    l="<form name="+dlgID+"_fm method=post action="handle_thread.asp？cmd=thread_save">"
    l+="<input type=hidden name=tid value=""+（tid||""）+"">"
    l+="<input type=hidden name=FContent>"
    l+="<span style=position:absolute;left:18;top:35> 标题：<input name=FTitle caption="标题" checkRule="notnull/max-50" style=width:540></span>"
    l+="<span onclick="$（""+dlgID+""）.clickOk（）" type=button pos="230,442,58,22" bg="images/panel/btYes.gif"></span>"
    l+="<span onclick="oDel（""+dlgID+""）" type=button pos="320,442,58,22" bg="images/panel/btNo.gif"></span>"
    l+="<div style="position:absolute;left:67;top:65;width:540;height:350;overflow:hidden;border:2px inset">"
    l+="<div style="height:21;border-bottom:1px solid #808080;background:#d4d0c8"></div>"
    l+="<span type="button" onclick="$（""+dlgID+""）.setBold（）" pos="13,1,20,18" bg="images/panel/btbold.gif"></span>"
    l+="<span type="button" onclick="$（""+dlgID+""）.setLink（）" pos="38,1,20,18" bg="images/panel/btlink.gif"></span>"
    l+="<img src=images/panel/split1.gif style="position:absolute;left:65;top:1">"
    l+="<span type="button" onclick="$（""+dlgID+""）.insImg（）" pos="80,1,20,18" bg="images/panel/btimg.gif"></span>"
    l+="<span type="button" onclick="$（""+dlgID+""）.insJs（）" pos="107,1,20,18" bg="images/panel/btjs.gif"></span>"
    l+="<iframe id=""+dlgID+"_win" src="lib/weditor.htm？form="+dlgID+"_fm" frameborder=0 style="width:100%;height:324"></iframe>"
    l+="</div>"
    l+="</form>"
    insHtm（dlgID,l）
    dlg=$（dlgID）
    fm=document[dlgID+"_fm"]
    win=ow（dlgID+"_win"）
    oFocu（fm.FTitle）

    dlg.clickOk=function（）{
        fm.btSubmit.click（）
    }
    dlg.setBold=function（）{
        win.document.execCommand（"bold",false）
    }
    dlg.setLink=function（）{
        editor_setLink（win）
    }
    dlg.insImg=function（）{
        editor_insImg（win）
    }
    dlg.insJs=function（）{
        editor_insJs（win）
    }
    fm.onbeforeload=function（）{
        fm.FContent.value=editor_getVal（win）
        if（fm.FContent.value==""）{
            alert（"贴子内容不能为空！"）
            win.focus（）
            return false
        }
    }
    fm.onload=function（xml）{
        var url=location.href
        location.href=url.replace（"fclass=search","fclass=all"）
    }
}
function editor_paste（w,html）{
    if（document.all）
        w.document.selection.createRange（）.pasteHTML（html）
    else{
        var ol,i,r=w.document.createRange（）
        w.document.execCommand（"insertimage",false,"http://temp_obj/"）
        ol=w.document.getElementsByTagName（"img"）
        for（i=0;i<ol.length;i++）{
            if（ol[i].src=="http://temp_obj/"）{
                r.setStartBefore（ol[i]）
                ol[i].parentNode.insertBefore（r.createContextualFragment（html）,ol[i]）
                ol[i].parentNode.removeChild（ol[i]）
            }
        }
    }
}
function thread_search（）{
    var dlgID="dlgThreadSearch",dlg,fm,tid
    createDlg（dlgID,"查找文章",270,170）
    l="<form name="+dlgID+"_fm action="handle_thread.asp？cmd=thread_search">"
    l+="<span style=position:absolute;left:20;top:65>关键字：<input name=FKey caption=关键字 checkRule="notnull" maxlength=16 style=width:170></span>"
    l+="<span onclick="document."+dlgID+"_fm.btSubmit.click（）" type=button pos="65,132,58,22" bg="images/panel/btYes.gif"></span>"
    l+="<span onclick="oDel（""+dlgID+""）" type=button pos="140,132,58,22" bg="images/panel/btNo.gif"></span>"
    l+="</form>"
    insHtm（dlgID,l）
    fm=document[dlgID+"_fm"]
    oFocu（fm.FKey）

    fm.onload=function（xml）{
        location.href=$sys.path+"index.asp？fclass=search"
    }
}