?? config.asp
字號(hào):
<%
Set fobj = Server.CreateObject("Scripting.FileSystemObject")
Path=server.MapPath("index.asp")
Path=left(Path,len(Path)-9)
if right(Path,6)="admin\"then Path=left(Path,len(Path)-6)
Set MdbFolder=fobj.GetFolder(path & "mdb\")
Set MdbFiles=MdbFolder.Files
For Each MdbName In MdbFiles
strmdb=Path&"mdb\"&MdbName.Name
if right(strmdb,4)=".mdb" then exit for
next
if right(strmdb,4)=".mdb" then
ConnString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & strmdb
else
response.write "錯(cuò)誤:無(wú)法確認(rèn)數(shù)據(jù)庫(kù)文件的名稱!"
response.end
end if
SFTitle = "中窩建站交流論壇"
TitleImgLocation = "images/sflogo.gif"
Bgstr = " "
TableWidth= "95%"
PostTime= 30
OnlineTime= 10
ForumRow= 20
TopicRow= 8
ReplyView= 5
HotTopicNum= 15
HotReplyNum= 5
BadWordFiler = "true"
BadWords = "fuck|混蛋|狗日"
%>
<!--#INCLUDE FILE="sf_skin.dat" -->
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -