📄 hfwz.asp

📁 宁波娱乐在线城市,丰富的内容版块
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file="BBSLib.asp"-->
<%
    if Request.Cookies("NC")="" or Request.Cookies("NC")="访客" then
        ShowError 0,"对不起，您未注册，不能发表高见！"
        Response.End
    end if
    
    if Request.ServerVariables("Request_Method") = "POST" then
        if Request.QueryString("ID") = "" then       
            ShowError 0,"对不起，请指定回复的文章！"
            Response.End
        else
            if Request.QueryString("EDIT") = "1" then
                ret = Command("313|"&Request.QueryString("ID")&"|1"&"|"&"|"&ConvertStr(FilterStr(Request.Form("tWZNR")))&"|"&Request.Form("rWZJD")&"|"&"|")
            else 
                ret = Command("303|"&Request.QueryString("ID")&"|"&Request.Form("rWZJD")&"|"&ConvertStr(FilterStr(Request.Form("tWZNR"))))
            end if
			
            if GetPart(ret,1) <> "0" then
                ShowError 0,GetPart(ret,2)
                Response.End
            else
                CloseWindow
            end if
        end if
        Response.End
    end if   
    
    
   
 
    if Request.QueryString("EDIT") = 1 then
        ret = Command("319|"&Request.QueryString("WZID")&"|1")
        if GetPart(ret,1) <> "0" then
            ShowError 0,GetPart(ret,2)
        else
            BQ =  GetPartEx(GetPart(ret,4),".",1)
            NR =  UnConvertStr(UnFilterStr(GetPart(ret,5)))
        end if
    else
        ret = Command("319|"&Request.QueryString("ID")&"|0")
        if GetPart(ret,1) <> "0" then
            ShowError 0,GetPart(ret,2)
        end if
    end if


	if Request.QueryString("EDIT") = 2 then
        ret = Command("319|"&Request.QueryString("WZID")&"|1")
        if GetPart(ret,1) <> "0" then
            ShowError 0,GetPart(ret,2)
        else
            BQ =  GetPartEx(GetPart(ret,4),".",1)
            NR =  "[引用]以下是引用[粗体] "&GetPart(ret,6)&" [/粗体]在[斜体][灰色] "&GetPart(ret,7)&" [/灰色][/斜体]的发言：[粗体]"&Chr(13)&Chr(10)&UnConvertStr(UnFilterStr(GetPart(ret,5)))&"[/粗体][/引用]"
        end if
    else
        ret = Command("319|"&Request.QueryString("ID")&"|0")
        if GetPart(ret,1) <> "0" then
            ShowError 0,GetPart(ret,2)
        end if
    end if

	
       
%>       

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<title>回复文章</title>
<script>
    window.resizeTo(600,300);
    window.moveTo(screen.width/2-600/2,screen.height/2-300/2);
</script>
<style type="text/css">
<!--
.p9 {  font-family: "宋体"; font-size: 9pt}
.TButton {  font-family: "宋体"; font-size: 9pt;cursor:hand;width:66px;height:22px}
A:link{font-size:9pt;COLOR:black;TEXT-DECORATION: none}
A:visited {font-size:9pt;COLOR:black;TEXT-DECORATION: none}
A:hover {font-size:9pt;COLOR: #78ADCD; TEXT-DECORATION: underline}
-->
</style>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--

reload = false;

function ShowSYSM()  {
  window.open('sysm.htm','','scrollbars=yes,toolbar=no,menubar=no,location=no,status=no,resizable=yes,width=600,height=400');
}

function sTJBQ_onchange() {

    fHFWZ.tWZNR.value = fHFWZ.tWZNR.value + fHFWZ.sTJBQ.value ;
    tWZNR_onkeyup();
    fHFWZ.sTJBQ.selectedIndex = 0;
}

function tWZNR_onkeyup() {
    fHFWZ.tHFCD.value = fHFWZ.tWZNR.value.length
}

function bQX_onclick() {
    window.close();
}

function bQC_onclick() {
    fHFWZ.tWZNR .value ='';
    fHFWZ.tHFCD .value ='0';
}

function bHF_onclick() {
    if (fHFWZ.tWZNR .value  == '')  {
         window.alert('回复内容不能为空！');
         return(false);
    }
    reload = true;
	fHFWZ.bHF.disabled = true;
    if ('<%=Request.QueryString("EDIT")%>' == '1') {
         fHFWZ.action = 'hfwz.asp?ID=<%=Request.QueryString("WZID")%>&EDIT=1';
    }
    else {   
        fHFWZ.action = 'hfwz.asp?ID=<%=Request.QueryString("ID")%>';
    }    
    fHFWZ.target = 'fHFWZ';
    fHFWZ.submit();
}

function window_onresize() {
    window.resizeTo(600,300);
    window.moveTo(screen.width/2-600/2,screen.height/2-300/2);
}

function window_onunload() {
    if (reload) {
       window.opener.location.reload();
    }    
}

function sGJDM_onchange() {
    fHFWZ.tWZNR.value = fHFWZ.tWZNR.value + fHFWZ.sGJDM.value;
    tWZNR_onkeyup();
    fHFWZ.sGJDM.selectedIndex = 0;
}

function window_onload() {
  tWZNR_onkeyup();
}

function tWZNR_onkeydown() {
    if (event.ctrlKey && (event.keyCode ==13)) bHF_onclick();
}


function openem() {
    
    l = screen.width/2-350/2;
    t = screen.height/2-200/2;
    window.open('symbol.asp?type=hfwz','fsymbol','scrollbars=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=350,height=200,left='+l+',top='+t);
}


function YBBCquote()
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -