⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 memberwl.php

📁 asp新闻网站源码
💻 PHP
字号:
<?php

/*
	[插件名称] 评论表单 - 替换模版标签{#modMemberWl#}
	[适用范围] 文章,下载,图文详情页
	[文 件 名] MemberWl.php
	[更新时间] 2006/8/11
*/



function MemberWl(){

	global $msql,$fsql,$tsql,$tbl_news_cat,$tbl_menu;
	global $MenuInfo,$strNorights,$strNewsAddOk,$strNewsAddOk1;

	$step=$_POST["step"];

	if($step=="add"){

		//权限
			
			if(SecureFunc("8")==false){
					$PageMain=err($strNorights,"","");
					return $PageMain;
			}

			if(SecureFunc("9")==true){
				$iffb=1;
				$okstr=$strNewsAddOk;
			}else{
				$iffb=0;
				$okstr=$strNewsAddOk1;
			}
		

	
	}else{
	
	
	

				//类别列表
				$msql->query("select * from $tbl_menu where coltype='news'");
				while($msql->next_record()){
				$menu=$msql->f('menu');
				$menuid=$msql->f('menuid');

					$fsql -> query ("select * from $tbl_news_cat where menuid='$menuid' order by catpath");
					while ($fsql -> next_record ()) {
						$lpid = $fsql -> f ("pid");
						$lcatid = $fsql -> f ("catid");
						$cat = $fsql -> f ("cat");
						$catpath = $fsql -> f ("catpath");
						$lcatpath = explode (":", $catpath);


						$tsql->query("select catid from $tbl_news_cat where pid='$lcatid'");
						if($tsql->next_record()){
							$ifson="yes";
						}else{
							$ifson="no";
						}
						if($ifson=="no"){
							for ($i = 0; $i < sizeof ($lcatpath)-2; $i ++) {
								$tsql->query("select catid,cat from $tbl_news_cat where catid='$lcatpath[$i]'");
								if($tsql->next_record()){
									$ncatid=$tsql->f('cat');
									$ncat=$tsql->f('cat');
									$ppcat.=$ncat."/";
								}
							}
							
							if($pid==$lcatid){
								$catlist.="<option value='".$lcatid."' selected>".$menu." |- ".$ppcat.$cat."</option>";
							}else{
								$catlist.="<option value='".$lcatid."'>".$menu." |- ".$ppcat.$cat."</option>";
							}
							$ppcat="";
						}
						
					}

				}
	
				$Temp=LoadTemp(ROOTPATH."templates/".$MenuInfo["skin"]."/tpl_member_wl_fabu.htm");

				$var=array (
						'RP' => ROOTPATH,
						'catlist' => $catlist
						);
				
				$str=ShowTplTemp($Temp,$var);


				return $str;


	}

		
}


?>

⌨️ 快捷键说明

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