admincfgstyle.pl

这个社区是虚拟社区使用的程序

						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgModify",&RemoveQuot($imgModify),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Remove Reply Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgRemove",&RemoveQuot($imgRemove),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Remove Thread Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgRemoveThread",&RemoveQuot($imgRemoveThread),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Close Thread Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgCloseThread",&RemoveQuot($imgCloseThread),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Open Thread Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgOpenThread",&RemoveQuot($imgOpenThread),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Previous Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgPrevious",&RemoveQuot($imgPrevious),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Next Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgNext",&RemoveQuot($imgNext),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Sperater Icon/Text</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgSperater",&RemoveQuot($imgSperater),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$CategoryBGColor).
					&Td("","","3","","","","","","").
						&Font($FontFace,$CategoryNameTextSize,$CategoryTextColor).
							"<b>Emotions Icon</b>".
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \":)\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_1",&RemoveQuot($imgEmotion_1),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \":(\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_2",&RemoveQuot($imgEmotion_2),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \";)\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_3",&RemoveQuot($imgEmotion_3),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \":P\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_4",&RemoveQuot($imgEmotion_4),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \";P\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_5",&RemoveQuot($imgEmotion_5),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \":o\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_6",&RemoveQuot($imgEmotion_6),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \":o)\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_7",&RemoveQuot($imgEmotion_7),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \"^_^\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_8",&RemoveQuot($imgEmotion_8),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \"^^;\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_9",&RemoveQuot($imgEmotion_9),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \"^^\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_10",&RemoveQuot($imgEmotion_10),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \"8-)\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_11",&RemoveQuot($imgEmotion_11),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \"8)\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_12",&RemoveQuot($imgEmotion_12),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \":D\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_13",&RemoveQuot($imgEmotion_13),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \">:-(\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_14",&RemoveQuot($imgEmotion_14),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
                &Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Emotion \">:(\" Icon</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("imgEmotion_15",&RemoveQuot($imgEmotion_15),"","","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
    $HTML.=		&Tr("","",$HeaderBGColor).
					&Td("","","3","","","","","","").
						&Font($FontFace,$HeaderTextSize,$HeaderTextColor).
							"<b>MISCELLANEOUS OPTIONS</b>".
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Text Box Size</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("TextBoxSize",$TextBoxSize,"3","3","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$RowOddBGColor).
					&Td("60%","","","","","","",$ColumnOddBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							"<b>Text Box Width (for IE 4 or higher)</b>".
						"</font>".
					"</td>".
					&Td("40%","","","","","","",$ColumnEvenBGColor,"").
						&Font($FontFace,$TextSize,$TextColor).
							&TextBox("IETextBoxSize",$IETextBoxSize,"4","4","width:$IETextBoxSize").
						"</font>".
					"</td>".
				"</tr>".
				&Tr("","",$CategoryBGColor).
					&Td("","","3","","","","","","").
						"<center>".&Submit("","SUBMIT AND SAVE CONFIGURATION","width:$IETextBoxSize")."</center>".
					"</td>".
				"</tr>".
				&Tr("","",$MenuBGColor).
					&Td("","","3","","","","","","").
						&PrintVersion().
					"</td>".
				"</tr>".
			"</table></td></tr></table>".
            
			"</form>";
	&PrintTheme("$UBName Administrator Center - Configure Style Options",$HTML);
	exit;
}
###############################################################################
sub RemoveQuot {
	$_ = shift;
	$_ =~ s/\"/\&quot\;/g;
	return $_;
}
###############################################################################
1;# End of CfgStyle Function
###############################################################################