cls_script2.1.asp

这是一个自己研发的薪酬管理系统

<%
'文件功能:客户端操作公用Script函数
'文件版本:2.1
%>

<!--
    *********************************
    *********************************
    ***                           ***
    ***        客户端脚本         ***
    ***                           ***
    *********************************
    *********************************
-->

<SCRIPT LANGUAGE="javascript">
<!--********************************************************************************-->
function ConvertToDate(pStr_Year,pStr_Month,pStr_Day){
//功能：转换为日期
//参数：年、月、日
//返回：日期
var Int_Year,Int_Month,Int_Day
    Int_Year = Number(pStr_Year)
    Int_Month = Number(pStr_Month)
    Int_Day = Number(pStr_Day)
    if (Int_Year !=0 && Int_Month !=0 && Int_Day !=0) {
        return Int_Year+"-" + Int_Month + "-" + Int_Day
    } else {
        return ""
    }
}
<!--********************************************************************************-->
function ShowMess(pStr_Type,pStr_Mess){
//功能:显示信息
//参数:信息类型，信息内容
//返回:无
    switch (pStr_Type) {
        default:
            alert(pStr_Mess);
    };
}
<!--********************************************************************************-->
function WindowBack(){
//功能:返回上页
//参数:无
//返回:无
    window.history.back();
}
<!--********************************************************************************-->
function WindowBackAndReload(){
//功能:返回上页并刷新
//参数:无
//返回:无
    WindowBack()
    window.open("../Common/Opr_WindowBackAndReload2.1.asp","_blank","top=1000,toolbar=no,menubar=no,location=no");
}
<!--********************************************************************************-->
function WindowClose(pStr_URL){
//功能:关闭窗口
//参数:无
//返回:无
    window.close();
}
<!--********************************************************************************-->
function WindowFrame(pStr_URL,pStr_FrameName){
//功能:替换当前窗口某页框的网址
//参数:网址
//返回:无
var Str_Date=new Date()
    Int_Pos  = pStr_URL.indexOf("?");
    if (Int_Pos  > 0 ){
        pStr_URL = pStr_URL + "&urltime=" + Str_Date;
    } else {
        pStr_URL = pStr_URL + "?urltime=" + Str_Date;
    }
    window.open(pStr_URL,pStr_FrameName);
}
<!--********************************************************************************-->
function WindowPrint() {
//功能:打印当前窗口
//参数:无
//返回:无
    function stopError() {
        return true;
    };
    window.onerror = stopError;
    if (window.print) {
        eval("self.print()");
    } else {
        if (document.all) {
            var OLECMDID_PRINT = 6;
            var OLECMDEXECOPT_DONTPROMPTUSER = 2;
            var OLECMDEXECOPT_PROMPTUSER = 1;
            var WebBrowser = "<OBJECT ID=\"WebBrowser1\" WIDTH=0 HEIGHT=0 CLASSID=\"CLSID:8856F961-340A-11D0-A96B-00C04FD705A2\"></OBJECT>";
            document.body.insertAdjacentHTML("beforeEnd", WebBrowser);
            WebBrowser1.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER);
            WebBrowser1.outerHTML = "";
        }
    }
}
<!--********************************************************************************-->
function WindowReplace(pStr_URL){
//功能:替换当前窗口的网址
//参数:网址
//返回:无
    window.location.replace(pStr_URL);
}
</SCRIPT>
<!--********************************************************************************-->

<%
'    *********************************
'    *********************************
'    ***                           ***
'    ***        服务器脚本         ***
'    ***                           ***
'    *********************************
'    *********************************
%>

<%
'********************************************************************************
function ShowMess(pStr_Type,pStr_Mess)
'功能:显示信息
'参数:信息类型，信息内容
'返回:无
    pStr_Mess = replace(pStr_Mess,vbCrlf,"\n")
    pStr_Mess = replace(pStr_Mess,chr(13),"\n")
%>
    <SCRIPT LANGUAGE="javascript">
    ShowMess("<% Response.write pStr_Type %>","<% Response.write pStr_Mess %>");
    </SCRIPT>
<%
end function
'********************************************************************************
function WindowBack()
'功能:返回上页
'参数:无
'返回:无
%>
    <SCRIPT LANGUAGE="javascript">
    WindowBack();
    </SCRIPT>
<%
    response.end
end function
'********************************************************************************
function WindowBackAndReload()
'功能:返回上页并刷新
'参数:无
'返回:无
%>
    <SCRIPT LANGUAGE="javascript">
    WindowBackAndReload();
    </SCRIPT>
<%
    response.end
end function
'********************************************************************************
function WindowClose()
'功能:关闭窗口
'参数:无
'返回:无
%>
    <SCRIPT LANGUAGE="javascript">
    WindowClose();
    </SCRIPT>
<%
    response.end
end function
'********************************************************************************
function WindowFrame(pStr_URL,pStr_FrameName)
'功能:替换当前窗口某页框的网址
'参数:网址
'返回:无
%>
    <SCRIPT LANGUAGE="javascript">
    WindowFrame("<% Response.write pStr_URL%>","<% Response.write pStr_FrameName%>");
    </SCRIPT>
<%
end function
'********************************************************************************
function WindowReplace(pStr_URL)
'功能:替换当前窗口的网址
'参数:网址
'返回:无
%>
    <SCRIPT LANGUAGE="javascript">
    WindowReplace("<% Response.write pStr_URL%>");
    </SCRIPT>
<%
    response.end
end function
%>

<LINK REL="stylesheet" HREF="<% Response.write GetStyleFile()%>">