?? main_index.asp
字號:
<!--#include file="../Conn.asp"-->
<!-- #include file="inc/const.asp" -->
<%
Head()
CheckAdmin(",")
Page_Main()
Footer()
Function IsObjInstalled(strClassString)
On Error Resume Next
IsObjInstalled = False
Err = 0
Dim xTestObj
Set xTestObj = Server.CreateObject(strClassString)
If 0 = Err Then IsObjInstalled = True
Set xTestObj = Nothing
Err = 0
End Function
Function CheckObj(objid)
If Not IsObjInstalled(objid) Then
CheckObj = "<font color="""&dvbbs.mainsetting(1)&""">×</font>"
Else
CheckObj = "√"
End If
End Function
Sub Page_Main()
Dim theInstalledObjects(20)
theInstalledObjects(0) = "MSWC.AdRotator"
theInstalledObjects(1) = "MSWC.BrowserType"
theInstalledObjects(2) = "MSWC.NextLink"
theInstalledObjects(3) = "MSWC.Tools"
theInstalledObjects(4) = "MSWC.Status"
theInstalledObjects(5) = "MSWC.Counters"
theInstalledObjects(6) = "IISSample.ContentRotator"
theInstalledObjects(7) = "IISSample.PageCounter"
theInstalledObjects(8) = "MSWC.PermissionChecker"
theInstalledObjects(9) = "Scripting.FileSystemObject"
theInstalledObjects(10) = "adodb.connection"
theInstalledObjects(11) = "SoftArtisans.FileUp"
theInstalledObjects(12) = "SoftArtisans.FileManager"
theInstalledObjects(13) = "JMail.SMTPMail" 'Jamil 4.2
theInstalledObjects(14) = "CDONTS.NewMail"
theInstalledObjects(15) = "Persits.MailSender"
theInstalledObjects(16) = "LyfUpload.UploadFile"
theInstalledObjects(17) = "Persits.Upload.1"
theInstalledObjects(18) = "JMail.Message" 'Jamil 4.3
theInstalledObjects(19) = "Persits.Upload"
theInstalledObjects(20) = "SoftArtisans.FileUp"
Dim Rs
Dim Isaudituser
Set Rs=Dvbbs.Execute("select count(*) from [dv_user] where usergroupid=5")
Isaudituser=rs(0)
if isnull(isaudituser) then isaudituser=0
Dim BoardListNum
set rs=dvbbs.execute("select count(*) from dv_board")
BoardListNum=rs(0)
If isnull(BoardListNum) then BoardListNum=0
%>
<table cellpadding="3" cellspacing="1" border="0" width="100%" align=center>
<tr><td colspan=2 height=25 class="td_title">論壇信息統計</td></tr>
<tr><td height=23 colspan=2>
系統信息：論壇帖子數 <B><%=Dvbbs.CacheData(8,0)%></B> 主題數 <B><%=Dvbbs.CacheData(7,0)%></B> 用戶數 <B><%=Dvbbs.CacheData(10,0)%></B> 待審核用戶數 <B><%=Isaudituser%></B> 版面總數 <B><%=BoardListNum%></B>
</td></tr>
<tr><td class="forumRowHighlight" height=23 colspan=2>
本論壇由動網先鋒（Dvbbs.Net）授權給 <%=Dvbbs.Forum_info(0)%> 使用，當前使用版本為 動網論壇
<%
If IsSqlDatabase=1 Then
Response.Write "SQL數據庫"
Else
Response.Write "Access數據庫"
End If
Response.Write " Dvbbs " & Dvbbs.Forum_Version
%>
</td></tr>
<tr>
<td width="50%" height=23>服務器類型：<%=Request.ServerVariables("OS")%>(IP:<%=Request.ServerVariables("LOCAL_ADDR")%>)</td>
<td width="50%" class="forumRow">腳本解釋引擎：<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %></td>
</tr>
<tr>
<td width="40%" height=23>
FSO文本讀寫：<b><%=CheckObj(theInstalledObjects(9))%></b>
</td>
<td width="60%" class="forumRow">
Jmail4.3郵箱組件支持：
<b><%=CheckObj(theInstalledObjects(18))%></b>
<a href="data.asp?action=SpaceSize">>>查看更詳細服務器信息檢測</a>
</td>
</tr>
<tr><td height=23 colspan=2>
<a href="challenge.asp"><font color=red>網絡支付相關設置</font></a>：主要用于論壇點券充值等相關導致論壇收益的服務，當前支付帳號為<%=Dvbbs.Forum_ChanSetting(4)%>
</td></tr>
<tr><td height=23 colspan=2>
<a href="data.asp"><font color=red>數據定期備份</font></a>：請注意做好定期數據備份，數據的定期備份可最大限度的保障您論壇數據的安全
</td></tr>
</table><br />
<%
Dim Forum_Pack
Set Rs=Dvbbs.Execute("Select Forum_Pack From Dv_Setup")
Forum_Pack = Rs(0)
Forum_Pack=Split(Forum_Pack,"|||")
If UBound(Forum_Pack)<2 Then ReDim Forum_Pack(3)
If Forum_Pack(0) = "1" Then
%>
<table cellpadding="3" cellspacing="1" border="0" align=center width="100%">
<tr><th colspan="2"><a href="http://bbs.dvbbs.net/union_post.asp?iBoardID=143" target="SiteAdmin">論壇管理交流</a> | <a href="http://bbs.dvbbs.net/union_post.asp?iBoardID=134" target="SiteAdmin">論壇新手區</a> | <a href="http://bbs.dvbbs.net/union_post.asp?iBoardID=8" target="SiteAdmin">論壇技術區</a> | <a href="http://bbs.dvbbs.net/union_post.asp?iBoardID=13" target="SiteAdmin">論壇插件區</a> | <a href="http://bbs.dvbbs.net/union_post.asp?iBoardID=102" target="SiteAdmin">論壇風格區</a></td><tr>
<tr><td height=23 valign=top>
<iframe src="http://bbs.dvbbs.net/union_post.asp" name="SiteAdmin" height=180 width="100%" MARGINWIDTH=0 MARGINHEIGHT=0 HSPACE=0 VSPACE=0 FRAMEBORDER=0 SCROLLING=no></iframe>
</tr>
</table>
<%
End If
Rs.Close
Set Rs=Nothing
%>
<br />
<table cellpadding="3" cellspacing="1" border="0" align=center>
<tr><td class="td_title" colspan=2 height=25>論壇管理小貼士</td></tr>
<tr><td height=23 align="center" width="15%">
<img src="skins/images/user_tag.gif">
</td><td height=23 width="*"><B>用戶組權限</B><br />動網論壇將注冊用戶分成不同的用戶組，每個用戶組可以擁有不同的論壇操作權限，并且在動網論壇7.0版本之后，用戶等級結合到了用戶組中，假如用戶等級沒有自定義權限，那么這個等級的權限就使用他所屬的用戶組權限，反之則擁有這個等級自己的權限。<font color=red>每個等級或者用戶組所設定的權限都是是針對整個論壇的</font></td></tr>
<tr><td height=23 align="center">
<img src="skins/images/tag.gif">
</td><td height=23 width="*"><B>分版面權限</B><br />
每個用戶組或有自定義權限設置的等級，都可以設置其在論壇中各個版面擁有不同的權限，比如說您可以設置注冊用戶或者新手上路在版面A不能發貼可以瀏覽等等權限設置，極大的擴充了論壇權限的設置，<font color=blue>從理論上來說可以分出很多個不同功能類型的論壇</font>
</td></tr>
<tr><td height=23 align="center">
<img src="skins/images/user_sys.gif">
</td><td height=23 width="*"><B>用戶權限設定</B><br />
每個用戶都可以設置其在論壇中各個版面擁有不同的權限或者特殊的權限，比如說您可以設置用戶A在版面A中擁有所有管理權限。<U>對于上述三種權限需要注意的是其優先順序為：用戶權限設置(<font color=gray>自定義</font>)<font color=blue> <B>></B> </font>分版面權限設定(<font color=gray>自定義</font>)<font color=blue> <B>></B> </font>用戶組權限設定(<font color=gray>默認</font>)</U>
</td></tr>
<tr><td height=23 align="center">
<img src="skins/images/skins.gif">
</td><td height=23 width="*"><B>對風格模板的管理</B><br />
其中包含對論壇所有模板的管理，模板中論壇的基本CSS設置，論壇主風格的更改，論壇分頁面風格的更改，圖片的設置，語言包的設置，新建模板頁面和模板，模板中新建不同的語言、圖片、風格等模板元素等等功能，并且擁有模板的導入導出功能，從真正意義上實現了論壇風格的在線編輯和切換
</td></tr>
<tr><td height=23 valign=top align="right">
<B>一句話貼士</B>
</td><td height=23 width="*"><B>一句話貼士</B><br />
① 對于不同功能模塊的頁面，要仔細看頁面中的說明，以免誤操作
<BR>
② 用戶組及其擴展的權限設置，對論壇的各種設置有極大擴充性，要充分明白其優先和有效順序
<BR>
③ 添加論壇大分類的時候，別忘了回頭看看該版面高級設置是否正確
<BR>
④ 有問題請到動網論壇官方站點提問，有很多熱心的朋友會幫忙，<a href="help.asp">查看更多貼士請點擊</a>
</td></tr>
</table><br />
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<form name="form1" method="post" action="">
<tr>
<td colspan="2" valign="middle" class="td_title">論壇管理幫助</td>
</tr>
<tr>
<td align="right" width="15%">產品開發：</td>
<td><a href="http://www.dvbbs.net" target=_blank>海口動網先鋒網絡科技有限公司</a> 中國國家版權局著作權登記號2004SR00001 </td>
</tr>
<tr>
<td align="right">產品負責：</td>
<td>網站事業部 動網論壇項目組 <a href="http://asp.dvbbs.net/busslist.asp" target=_blank>企業典型案例</a> </td>
</tr>
<tr>
<td align="right">聯系方式：</td>
<td>網站事業部：0898-68557467<br />
主機事業部：0898-68592224 68592294<br />
傳 真：0898-68556467<br />
<a href="http://www.cndw.com/contact.asp" target="_blank">點擊查看詳細聯系方法 </a></td>
</tr>
<tr>
<td align="right">插件開發：</td>
<td>
動網論壇插件組織（Dvbbs Plus Organization） </td>
</tr>
</form>
</table>
<%
End Sub
%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -