config.asp

快捷留言簿 v8.02 解决少数恶意连续字符撑开表格.

<%ck=""
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath("images/yesitis.asp")
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
function CloseDB
Conn.Close
set Conn=Nothing
End Function
%>


<!--#include file="conn.asp"--> 
<%
starttime=timer()
set rs=conn.execute("SELECT * FROM gbinfo")
LogName=rs("logname")
LogPWD=rs("logpwd")
show_style=rs("defaultstyle")
Showlynum=rs("showlynum")
siteurl= rs("siteurl")
USRName= rs("username")
popwrite=rs("popwrite")
notice=rs("notice")
ubbcode=rs("ubbcode")
lylitmit=split(rs("lymax"),"|")
lymax=cint(lylitmit(1))
lymin=cint(lylitmit(0))
shhe=rs("shhe")
click=rs("visit")
BottomStr=rs("BottomStr")
%>