<!--#INCLUDE FILE="setup.asp" -->
<!--#INCLUDE FILE="checkuser.asp" -->
<!--#INCLUDE FILE="theme.asp" -->
<%Locat="同学录帮助"
Select Case Request("about")
Case "portrait"
	Call pagehead()
	Call portraitList()
Case "ubb"
	Call pagehead()
	Call ubb()
Case "Object"
	Call pagehead()
	Call CheckObject()
Case Else
	Call top(1,1)
	Call main()
	Call footer()
End Select

Function ObjTest(byval strObj,VerObj)
	On Error Resume Next
	ObjTest=False
	VerObj=""
	Dim TestObj
	Set TestObj=server.CreateObject (strObj)
	If -2147221005 <> Err Then		
		ObjTest = True
		VerObj = TestObj.version
		if VerObj="" or isnull(VerObj) Then VerObj=TestObj.about
	End if	
End Function


Sub CheckObject()

	Dim strClass
	Dim VerObj
	Dim ObjArr(4,1)
	ObjArr(0,0)="Scripting.FileSystemObject"
	ObjArr(0,1)="(FSO 文本文件读写)"
	ObjArr(1,0)="JMail.Message"
	ObjArr(1,1)="(Dimac JMail 增强邮件收发对象)"
	ObjArr(2,0)="JMail.SmtpMail"
	ObjArr(2,1)="(Dimac JMail 传统邮件收发对象)"
	ObjArr(3,0)="CDONTS.NewMail"
	ObjArr(3,1)="(IIS自带的SMTP发信组件)"
	ObjArr(4,0)="ASPMAIL.ASPMailCtrl.1"
	ObjArr(4,1)="(ASPMail 发信)"

	Response.Write "<table width=100% height=100% bgcolor="&BodyColor&"><tr><td valign=top>"&_
		"<table align=center Class=TableBorder cellspacing=1 cellpadding=5 border=0 width=430>"&_
		"<tr><th>组件名称</th><th>支持及版本</th>"

	for i=0 to 4
		Response.Write "<tr Class=LightTableBody><td>"&ObjArr(i,0)&"&nbsp;<font color=#888888>"&ObjArr(i,1)&"</font></td><td>"	
		if not ObjTest(ObjArr(i,0),VerObj) Then
			Response.Write "<font color=red><b>×</b></font>"
		Else
			Response.Write "<font color=#3F8805><b>√</b></font>&nbsp;<a title='" &VerObj&"'>"& Left(VerObj,11)&"</a>"
		End if
		Response.Write "</td></tr>"
	next

	strClass = Trim(Request.Form("classname"))
	If strClass<>"" Then
		Response.Write "<tr Class=LightTableBody><td colspan=2>您指定的组件的检查结果："
		If Not ObjTest(strClass,VerObj) Then 
			Response.Write "<br><font color=red>很遗憾，该服务器不支持 " & strClass & " 组件！</font>"
		Else
			Response.Write "<br><font color=#3F8805>恭喜！该服务器支持 " & strClass & " 组件。该组件版本是：" & VerObj & "</font>"
		End If
			Response.Write "</td></tr>"
	End if

	Response.Write "<form action=Help.asp?About=Object method=post><tr Class=DarkTableBody>"&_
	"<td height=30 colspan=2>其他组件支持情况检测<br>请在下面输入你要检测组件的ProgId或ClassId<BR>"&_
	"<input class=input type=text name=classname size=40>&nbsp;"&_
	"<INPUT type=submit value=确定 class=button>&nbsp;<INPUT type=reset value=重填 class=button></td></tr></FORM>"

	Response.Write "</td></tr></table>"&_
	"</td></tr></table>"

End Sub



Sub main()
%>

<TABLE cellSpacing= cellPadding=0 width=100% Class=LightTableBody border=0 align=center>
<tr><td align=center><BR>
<table width=600 align=center>
              <TR>
                <TD width="44%" class=hp>　　<A 
                  href="#1">1、风月同学录有哪些特点？</A><BR>　　<A 
                  href="#2">2、如何加入风月同学录？</A><BR>　　<A 
                  href="#3">3、如何成为班委成员？</A><BR>　　<A 
                  href="#4">4、班委成员有哪些权力？</A><BR>　　<A 
                  href="#5">5、发现有重复的班级，怎么办？</A><BR><P></TD>
                <TD vAlign=top width="56%" class=hp><A 
                  href="#6">6、个人密码忘记了怎么办？</A><BR><A 
                  href="#7">7、如何修改个人资料？</A><BR><A 
                  href="#8">8、访问次数是如何统计的？</A><BR><A 
                  href="#9">9、如何注销班级成员身份？</A><BR><A 
                  href="#10">10、为什么注册时系统说我的邮件地址不正确？</A></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD width=710 colSpan=2><BR><FONT 
            color=#008040>◆</FONT>1、<A 
            name=1>风月同学录有哪些特点？</A><BR>　　
			1.本同学录仅适用于某个中小学校的校友交流。<BR>　　
			2.所有页面进行了全面的设计，界面友好，操作简便，美观大方！<BR>　　
			3.丰富的班级栏目，更易与您的同学沟通、交流。<BR>　　
			4.班级开放级别定制功能，可以免受班外同学的干扰。<BR>　　
			5.班委功能，使班级管理轻松自如。</TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif><p></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>2、<A 
            name=2>如何加入风月同学录？</A><BR>　　
			新用户请按下面步骤注册：<BR>　　
			1.点击同学录首页登陆区注册按钮，按照系统提示准确填入相关信息。注意有*号的项目是您必须填写的项目。同时请您填写您的真实姓名，对于不真实的注册，我们一经发现会立刻被删除。<BR>　　
			2.注册成功后，您可以从同学录首页处登录进入同学录功能区，继续注册您的班级。<BR>　　
			3.以后每次登录后，同学录会列出您所注册过的班级，您可以在此进行留言、上载照片、发表评论、查询同学或校友等等活动，充分体验风月同学录给您带来的诸多快乐。</SPAN><P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>3、<A 
            name=3>如何成为班委成员？</A><BR>　　
			目前在风月同学录中要成为班委成员有以下方法：<BR>　　
			注册班级后，您可以在班级管理中查看班委任职情况，如果发现有空余职位，而且您访问本班多于十次，那么您可以自己申请成为班委成员。<BR>　　
			如果班内班委职务没有空缺，那么你只有在他们辞职或他们愿意将班委职务移交给你的时候，你才能成为班委成员。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>4、<A 
            name=4>班委成员有哪些权力？</A><BR>
			　　1.可以把不是本班成员或者不受欢迎的人赶出班级。<BR>
			　　2.可以删除有害信息或过时留言。<BR>
			　　3.可以修改照片的说明，类型或删除该照片和该照片的评论。<BR>
			　　4.可以修改本班级的基本信息和班级开放等级。<BR>			　　5.如果加入班级时需要密码或审核，那么由班级管理员负责提供班级密码或审核是否可以加入。<BR>
			　　正副班长除拥有以上所有权力外，还可以任免其他班委，其他班委的权限由正副班长来管理。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>5、<A 
            name=5>发现有重复的班级，怎么办？</A><BR>　　由于注册班级时的不规范，可能会出现重复的班级，请各位注册时尽量使用统一的名字，而对于不规范名称的班级，我们会定期删除！同时，建议大家把人气较少的班级向系统管理员提出申请合并成一个班级，这样便于管理。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>6、<A 
            name=6>个人密码忘记了怎么办？</A><BR>　　当您忘记了系统登录时的密码，您可以通过以下方式取回您的密码：<BR>　　回答问题：系统会问根据您注册时输入的密码提示信息询问您一个问题，如果您能正确回答，你可以重新设置密码。如果在你的个人资料中没有填写相关的信息,你可以管理员联系修改密码。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>7、<A 
            name=7>如何修改个人资料？</A><BR>　　您可以在登录后在页面的导航栏找到修改资料项进行修改。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>8、<A 
            name=8>访问次数是如何统计的？</A><BR>　　在同学录中存在两种访问次数：访问风月同学录次数和班级到访次数。其中班级到访次数累计您对应所注册班级的访问次数。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>9、<A 
            name=9>如何注销班级成员身份？</A><BR>　　登陆后转到你所在的班级，在页面右侧班级功能区中选择“从班级注销”即可。<P></TD></TR>
        <TR><TD colSpan=2 background=images/bg_xu.gif></TD></TR>
        <TR class=hp>
          <TD colSpan=2><BR><FONT 
            color=#008040>◆</FONT>10、<A 
            name=10>为什么注册时系统说我的邮件地址不正确？</A><BR>　　地址中请不要使用全角的符号，将其改为半角即可。同时请使用正确合法的电子邮件地址。<BR><BR></TD></TR>
</TABLE>
</TD></TR></TABLE>

<%End Sub



Sub portraitList()

	Dim page
	page=cint(Request("Page"))

	if page<1 Then
		page=1
	ElseIf page>5 Then
		page=5	
	End if

	%>

	<script language=JavaScript>
	function GetImg(n)
	{var o=opener.document.userform.face;
	if (o) {
		o[n].selected=true;
		opener.document.images["face"].src="face/image"+o[n].value+".gif";
		//top.window.close();
		}
	}
	</SCRIPT><table width=100% height=100% bgcolor=<%=BodyColor%>><tr><td valign=top>
	<table align=center Class=TableBorder cellspacing=1 cellpadding=5 border=0 width=450>
	<tr><th align=center colspan=5><b>头像列表</b></th>

	<%
	for i=(page-1)*4+1 to (page-1)*4+4
		Response.Write "</tr><tr Class=LightTableBody>"
		for j=1 to 5
			Response.Write "<td width=90 align=center><img align=absmiddle alt=直接点击选择头像 style=""cursor:hand"" src=face/image"&Cstr((i-1)*5+j)&".gif onclick=""GetImg("&((i-1)*5+j)&")""></td>"
		next
		Response.Write "</tr><tr Class=DarkTableBody>"
		for j=1 to 5
			Response.Write "<td align=center>Face"&Cstr((i-1)*5+j)&"</td>"
		next
	next%>

	</tr></table>
	<table border=0 width="100%"><tr><td align=center height=50>
	<%
	if page<>1 Then Response.Write "<button onclick=""location.href='Help.asp?About=portrait&Page="&page-1&"'"">上一页<font face=webdings>3</font></button>&nbsp;&nbsp;"
	Response.Write "<INPUT onclick=""window.close()"" type=button value=取&nbsp;&nbsp;消 class=button>"
	if page<>5 Then Response.Write "&nbsp;&nbsp;<button onclick=""location.href='Help.asp?about=portrait&page="&page+1&"'"">下一页<font face=webdings>4</font></button>"
	Response.Write "</td></tr></table>"&_
		"</td></tr></table>"

End Sub



Sub ubb()
%>
<table width=100% height=100% bgcolor=<%=BodyColor%>><tr><td valign=top>
<table align=center width=650 Class=TableBorder cellspacing=1 cellpadding=5><tr><th align=center>
       <b> UBB标签帮助</b></th></tr><tr Class=LightTableBody><td>
<p>UBB标签就是不允许使用HTML语法的情况下，通过转换程序，以支持少量常用的、无危害性的HTML效果显示。以下为具体使用说明：
<p><font color=red>[B]</font><b>文字</b><font color=red>[/B]</font>：在文字的位置可以任意加入您需要的字符，显示为粗体效果。
<p><font color=red>[I]</font><i>文字</i><font color=red>[/I]</font>：在文字的位置可以任意加入您需要的字符，显示为斜体效果。
<p><font color=red>[U]</font><u>文字</u><font color=red>[/U]</font>：在文字的位置可以任意加入您需要的字符，显示为下划线效果。
<p><font color=red>[align=center]</font><div align=center>文字</div><font color=red>[/align]</font>：在文字的位置可以任意加入您需要的字符，center位置center表示居中，left表示居左，right表示居右。
<p><font color=red>[URL]</font><A href="HTTP://TXLBBS.126.COM">HTTP://TXLBBS.126.COM</A><font color=red>[/URL]</font>
<P><font color=red>[URL=HTTP://TXLBBS.126.COM]</font><A href="http://txlbbs.126.com">风月论坛</A><font color=red>[/URL]</font>：有两种方法可以加入超级连接，可以连接具体地址或者文字连接。
<p><font color=red>[EMAIL]</font><A href="mailto:zjgxwx@sohu.com">zjgxwx@sohu.com</A><font color=red>[/EMAIL]</font>
<P><font color=red>[EMAIL=MAILTO:zjgxwx@sohu.com]</font><A href="mailto:zjgxwx@sohu.com">kissinger</A><font color=red>[/EMAIL]</font>：有两种方法可以加入邮件连接，可以连接具体地址或者文字连接。
<P><font color=red>[img]</font>http://TXLBBS.126.COM/images/test.gif<font color=red>[/img]</font>：在标签的中间插入图片地址可以实现插图效果。
<P><font color=red>[flash=480,350]</font>Flash动画文件连接地址<font color=red>[/Flash]</font>：标签中的数字是Flash动画窗口的宽度和高度。
<P><font color=red>[wmp=480,350]</font>Windows媒体文件连接地址<font color=red>[/wmp]</font>：标签中的数字是媒体播放窗口的宽度和高度。
<P><font color=red>[rm=480,350]</font>RealPlayer格式文件连接地址<font color=red>[/rm]</font>：标签中的数字是RealPlayer播放窗口的宽度和高度。
<P><font color=red>[code]</font>文字<font color=red>[/code]</font>：在标签中写入文字可实现html中编号效果。
<P><font color=red>[quote]</font>引用<font color=red>[/quote]</font>：在标签的中间插入文字可以实现HTMl中引用文字效果。
<P><font color=red>[fly]</font>文字<font color=red>[/fly]</font>：在标签的中间插入文字可以实现文字飞翔效果，类似跑马灯。
<P><font color=red>[move]</font>文字<font color=red>[/move]</font>：在标签的中间插入文字可以实现文字移动效果，为来回飘动。
<P><font color=red>[glow=255,red,2]</font>文字<font color=red>[/glow]</font>：在标签的中间插入文字可以实现文字发光特效，glow内属性依次为宽度、颜色和边界大小。
<P><font color=red>[shadow=255,red,2]</font>文字<font color=red>[/shadow]</font>：在标签的中间插入文字可以实现文字阴影特效，shadow内属性依次为宽度、颜色和边界大小。
<P><font color=red>[color=颜色代码]</font>文字<font color=red>[/color]</font>：输入您的颜色代码，在标签的中间插入文字可以实现文字颜色改变。
<P><font color=red>[size=数字]</font>文字<font color=red>[/size]</font>：输入您的字体大小，在标签的中间插入文字可以实现文字大小改变。
<P><font color=red>[font=字体]</font>文字<font color=red>[/font]</font>：输入您需要的字体，在标签的中间插入文字可以实现文字字体转换。
</td></tr></table><BR>
</td></tr></table>

<%
End Sub

%>


