user_post.asp

来自「是个不错的文件代码,希望大家好好用,」· ASP 代码 · 共 765 行 · 第 1/2 页

ASP
765
字号
<!--#include file="user_top.asp"-->
<!--#include file="inc/class_blog.asp"-->
<!--#include file="inc/class_Trackback.asp"-->
<script src="oBlogStyle/move.js" type="text/javascript"></script>
<script src="inc/function.js" type="text/javascript"></script>
<%
If oblog.l_uNewbie=1 Then 
	response.write("<script>parent.show_title('选择模版')</script>")
	oblog.showok "发布前请先选择一个喜欢的模版。","user_template.asp?action=showconfig"
	'jscmd="go_cmdurl('选择模版','tab3')"
end if
If Application(cache_name_user&"_systemenmod")<>"" Then
	Dim enStr
	enStr=Application(cache_name_user&"_systemenmod")
	enStr=Split(enStr,",")
	If enStr(2)="1" Then	response.write("系统临时禁止操作日志与相册!"):response.End()
End If
If t=1 or t=2 Then
	dim flashurl
%>
<script type="text/javascript" src="inc/flash.js"></script>
<script type="text/vbscript" src="inc/flash_vb.js"></script>
<%
	select case t
		case 1
		dim tmpstr
		if Trim(request("action"))="showphoto" then tmpstr="" else tmpstr="upload"
		flashurl="photo.swf?action="&tmpstr&"&blogurl=&userid="&oblog.l_uid
		case 2
		flashurl="cam3.swf"
	end select	
%>
</head>
<body scroll="no" style="overflow:auto!important;overflow:hidden;background:#fff;">
<div id="flashcontent" style="margin:10px;width:96%;height:96%;text-align:left;">
<script language="JavaScript" type="text/javascript">
var hasRightVersion = DetectFlashVer(requiredMajorVersion, requiredMinorVersion, requiredRevision);
if(!hasRightVersion && <%=t%>==2) {
	document.write('\您的flash版本过低,<a href="http:\/\/www.adobe.com\/go\/getflash\/" target="_blank"\>请点击升级Flash Player插件来支持大头贴程序</a>');
  }else{
  	document.write("<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0' width='100%' height='500' ><param name='wmode' value='transparent' /><param name='movie' value='<%=flashurl%>' /><param name='quality' value='high' /><embed src='<%=flashurl%>' quality='high' pluginspage='http://www.macromedia.com/go/getflashplayer' type='application/x-shockwave-flash' width='100%' height='500'></embed></object>");
  }
</script>

</div>

<!--<script language="JavaScript" type="text/javascript">
var hasRightVersion = DetectFlashVer(requiredMajorVersion, requiredMinorVersion, requiredRevision);
if(hasRightVersion) {
	var so = new SWFObject("<%=flashurl%>", "photo", "100%", "500", "9", "#FFFFFF");
	so.addParam("wmode", "transparent");
	so.write("flashcontent");
  } else { 
  	document.write('\<a href="http:\/\/www.adobe.com\/go\/getflash\/" target="_blank"\>请升级Flash Player插件来支持本程序</a>');
  }
</script>-->
</body>
</html>

<%
	response.End()
End If
Dim sDisable
action = Trim(request("action"))
If action<>"savelog" Then 
	oblog.MakeEditorJs "edit",1
	sDisable=" "
Else
	sDisable=" disabled"
End if
%>
</head>
<body class="user_iframe" >
<ul id="user_page_top">
	<li id="p2"><a href="#" onClick="return doMenu('swin1');" <%=sDisable%>>高级选项</a></li>
    <li id="p1"><a href="#" onClick="return doMenu('swin2');" <%=sDisable%>>引用通告</a></li>
    <li id="p3"><a href="#" onClick="return doMenu('swin3');" <%=sDisable%>>上传文件</a></li>
    <li id="p1"><a href="#" onClick="return doMenu('swin4');" <%=sDisable%>>文章摘要</a></li>
</ul>

<%
Dim action,rs
Set rs=Server.CreateObject("Adodb.Recordset")


If action="savelog" Then
		Call savelog
	Else
	    Call main
End If
%>
</body>
</html>

<%
Sub main()
    Dim  logid, log_specialid,photofile
    logid = request.QueryString("logid")
    photofile = Trim(request.QueryString("photofile"))
    Dim log_tags, tags, filename,  log_type,log_abstract
    Dim face, topic, classid, subjectid, logtext, istop, ishide, isencomment, showword, addtime, userid, ispassword, tburl, oldisdraft
    oldisdraft = 0
    If logid<>"" Then logid=Int(logid)
    If logid > 0 Then
        Set rs=oblog.execute("Select * From oblog_log Where logid="&logid&" And (authorid= "&oblog.l_uid&" or userid="&oblog.l_uid&")")
        If rs.EOF Then
            Set rs = Nothing
            oblog.adderrstr ("无此权限操作此" & tName & "!")
            oblog.showusererr
        End If
		if rs("isdel")=1 then
			set rs=nothing
			oblog.showok "已删除日志,请先恢复后再操作。",""
		end if
        topic = rs("topic")
        face = rs("face")
        classid = rs("classid")
        subjectid = rs("subjectid")
        logtext = Replace(rs("logtext"), "#isubb#", "")
        istop = rs("istop")
        ishide = rs("ishide")
        isencomment = rs("isencomment")
        showword = rs("showword")
        addtime = rs("addtime")
        userid = rs("userid")
        ispassword = rs("ispassword")
        tburl = rs("tburl")
        oldisdraft = rs("isdraft")
        filename = rs("filename")
        log_type = rs("logtype")
		log_abstract=rs("abstract")
        If IsNull(rs("logtags")) Then
            tags = ""
        Else
            tags = rs("logtags")
        End If
        log_specialid=rs("specialid")
        Set rs = Nothing
    Else
    	'检测发表限制
    	Dim sPostAccess
    	sPostAccess=oblog.CheckPostAccess    	
    	If sPostAccess<>"" Then
    		 	oblog.AddErrstr sPostAccess
         	oblog.ShowUserErr
    	End If
    End If
    If isencomment = "" Then isencomment = 1
    If userid = "" Then userid = oblog.l_uId
    if oblog.CacheConfig(23)="1" then
		if filename="" then filename=Year(now) & Month(now) & Day(now)&hour(now())&minute(now())&second(now())
	else
		if filename="" then filename="自动编号"		
	end if
	call getteam()
%>

<script language=javascript>
parent.show_title("发布日志");
var in_ob_useradmin=true;
var issubmit=false;
function chkfilename()
{
	var filename=del_space(document.oblogform.filename.value);
	if (filename=="自动编号"){document.oblogform.filename.value=""}
	if (filename==""){document.oblogform.filename.value="自动编号"}
}
function checkerr(string)
{
var i=0;
for (i=0; i<string.length; i++)
{
	if((string.charAt(i) < '0' || string.charAt(i) > '9') && (string.charAt(i) < 'a' || string.charAt(i) > 'z')&& (string.charAt(i) < 'A' || string.charAt(i) > 'Z')&& (string.charAt(i)!='-')&& (string.charAt(i)!='_'))
	{return 1;}
	}
	return 0;//pass
}

function setdraft()
{
	document.oblogform.isdraft.value='1';
	savelog();
}
function autosetdraft()
{
	document.oblogform.edit.value=oblog_editors['edit'].getHTML();
	var edit = del_space(document.oblogform.edit.value); 
	if (edit.length > 0&&!issubmit){
		document.oblogform.isdraft.value='1';
		savelog();
	}
}
function savelog()
{
	document.getElementById("save_ing").style.display="";
	document.getElementById("save_ing").innerHTML="<img src='images/loading.gif' align='absbottom'> 正在保存...";
	if (issubmit){
		var oDialog = new dialog("<%=blogurl%>");
		oDialog.init();
	 	oDialog.event("正在提交中,请稍候...",'');
		oDialog.button('dialogOk',"");	
	}else{
		issubmit=true;
		var errstr=""
		document.oblogform.edit.value=oblog_editors['edit'].getHTML();
		var topic = del_space(document.oblogform.topic.value);
		 if (topic.length == 0&&document.oblogform.isdraft.value!="1")
		 {
			errstr="您忘了填写题目。<br />";
		 }	
		 var needclassid=<%=oblog.CacheConfig(25)%>
		 if (needclassid==1 &&document.oblogform.isdraft.value!="1") {
		 if (document.oblogform.classid.value == 0)
		 {
			errstr=errstr+"请选择日志的类别。<br />";
		 }
		 }
		
		var filename=del_space(document.oblogform.filename.value);
		if ((checkerr(filename) == "1")&&(filename!="")&&(filename!="自动编号")){
			errstr=errstr+"文件名称请用0-9的数字和a-z的半角字母及下划线,不允许中文和怪字符(如!@#$%^等)。<br />";
		}
		
		if (document.oblogform.edit.value == "")
		 {
			errstr=errstr+"请输入日志的内容。<br />";
		 }
		var date=document.oblogform.selecty.value+"-"+document.oblogform.selectm.value+"-"+document.oblogform.selectd.value
		var datereg=/^(\d{4})-(\d{1,2})-(\d{1,2})$/
		var datareg=/^(\d){1,2}$/
		if (!datereg.test(date)){
		  errstr=errstr+"日志时间输入格式错误。<br />";
		 }
		var r=date.match(datereg)
		var d=new Date(r[1],r[2]-1,r[3])
		if (!(d.getFullYear()==r[1]&&d.getMonth()==r[2]-1&&d.getDate()==r[3])){
		  errstr=errstr+"日志时间输入格式错误。<br />";
		 }
		 
		 if (errstr!=""){
			var oDialog = new dialog("<%=blogurl%>");
			oDialog.init();
			oDialog.event(errstr,'');
			oDialog.button('dialogOk',"");
			issubmit=false;	 
			document.getElementById("save_ing").style.display="none";
		 }
		 else{
			var re=/\+/g; 
			var topic=escape(document.oblogform.topic.value.replace(re,"<%=Chr(25)%>"));
			var classid=document.oblogform.classid.value;
			var logtags=escape(document.oblogform.logtags.value.replace(re,"<%=Chr(25)%>"));
			var edit=escape(document.oblogform.edit.value.replace(re,"<%=Chr(25)%>"));
			<%if oblog.l_Group(31,0)=1 then%>
			var codestr=document.oblogform.codestr.value;
			var ob_codename=document.oblogform.ob_codename.value
			<%else%>
			var codestr='';
			var ob_codename='';
			<%end if%>
			if (document.oblogform.teamid){
				var teamid=read_checkbox('teamid');}
			else{
				var teamid='';}
			var isencomment=read_radio("isencomment");
			var ishide=read_radio("ishide");
			var istop=read_radio("istop");
			var ispassword=document.oblogform.ispassword.value;
			var filename=document.oblogform.filename.value;
			var selecty=document.oblogform.selecty.value;
			var selectm=document.oblogform.selectm.value;
			var selectd=document.oblogform.selectd.value;
			var selecth=document.oblogform.selecth.value;
			var selectmi=document.oblogform.selectmi.value;
			var tb=document.oblogform.tb.value;
			var abstract=document.oblogform.abstract.value;
			var logid=document.oblogform.logid.value;
			var oldisdraft=document.oblogform.oldisdraft.value;
			var isdraft=document.oblogform.isdraft.value;
			var subjectid=document.oblogform.subjectid.value;
			var blogteam=document.oblogform.blogteam.value;
			var blogteamsubject=document.oblogform.blogteamsubject.value;
			var showword=document.oblogform.showword.value;
			var Ajax = new oAjax("ajaxserver.asp?action=savelog",show_returnsave);
			var arrKey = new Array("topic",
									"classid",
									"logtags",
									"edit",
									"codestr",
									"ob_codename",
									"teamid",
									"isencomment",
									"ishide",
									"istop",
									"ispassword",
									"filename",
									"selecty",
									"selectm",
									"selectd",
									"selecth",
									"selectmi",
									"tb",
									"abstract",
									"logid",
									"oldisdraft",
									"isdraft",
									"blogteam",
									"blogteamsubject",
									"showword",
									"subjectid");	
			var arrValue = new Array(topic,
									classid,
									logtags,
									edit,
									codestr,
									ob_codename,
									teamid,
									isencomment,
									ishide,
									istop,
									ispassword,
									filename,
									selecty,
									selectm,
									selectd,
									selecth,
									selectmi,
									tb,
									abstract,
									logid,
									oldisdraft,
									isdraft,
									blogteam,
									blogteamsubject,
									showword,
									subjectid);													
			Ajax.Post(arrKey,arrValue);
		 
		 }
	}
}


function show_returnsave(arrobj){
	if (arrobj){
		switch (arrobj[1]){
		case '0':
			var oDialog = new dialog("<%=blogurl%>");
			oDialog.init();
			oDialog.event(arrobj[0],'');
			oDialog.button('dialogOk',"");	
			issubmit=false;
			document.getElementById("save_ing").style.display="none";
			break;
		case '1':
			parent.get_draft();			
			var oDialog = new dialog("<%=blogurl%>");
			oDialog.init();
			oDialog.event("发布日志成功!",'');
			oDialog.button('dialogOk',"window.location='"+window.location.href.substring(0,window.location.href.lastIndexOf("/"))+"/"+"user_blogmanage.asp'");
			document.getElementById("ob_submit").disabled="disabled";
			document.getElementById("ob_submit_d").disabled="disabled";
			document.getElementById("save_ing").style.display="none";			
			break;
		case '2':
			document.getElementById("save_ing").innerHTML=arrobj[0];
			document.getElementById("logid").value=arrobj[2];
			document.oblogform.isdraft.value='0';
			parent.get_draft();
			issubmit=false;
			break;
		case '3':
			var oDialog = new dialog("<%=blogurl%>");
			oDialog.init();
			oDialog.event(arrobj[0],'');
			oDialog.button('dialogOk',"top.location='"+window.location.href.substring(0,window.location.href.lastIndexOf("/"))+"/"+"index.asp'");	
			issubmit=false;
			document.getElementById("save_ing").style.display="none";
			break;
		}
	}
}

⌨️ 快捷键说明

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