config.asp

投票系统.rar 投票系统完整源码

<!--#include file="conn.asp"-->
<%
Dim cfrs,User,WebName,WebUrl,SystemUrl,RestrictIP
Set cfrs=Server.CreateObject("ADODB.RecordSet")
cfrs.open "Select * from XH_Config",conn,1,1
User=cfrs("username")
WebName=cfrs("webname")
WebUrl=cfrs("weburl")
SystemUrl=cfrs("systemurl")
RestrictIP=cfrs("restrictip")
cfrs.close
Set cfrs=Nothing
%>