📄 const.asp
字号:
<%
dim NetName,NetUrl,Smtp,Email,CopyRight,Ver,EmailFlag,PageCount,BodyVar,Tablebackcolor,Tablebodycolor,Tablebody1color,TableFontcolor,TableContentcolor,Logo,Ads
sub getConst()
sql = "select top 1 * from adminvar"
set rs = server.CreateObject ("adodb.recordset")
rs.open sql,conn,1,3
arrRow=rs.getrows
rs.close : set rs=nothing
NetName = arrRow(0,0)
NetUrl = arrRow(1,0)
Smtp = arrRow(2,0)
Email = arrRow(3,0)
CopyRight = arrRow(4,0)
Ver = arrRow(5,0)
EmailFlag = arrRow(6,0)
PageCount = arrRow(7,0)
BodyVar = arrRow(8,0)
Tablebackcolor = arrRow(9,0)
Tablebodycolor = arrRow(10,0)
Tablebody1color = arrRow(11,0)
TableFontcolor = arrRow(12,0)
TableContentcolor = arrRow(13,0)
Logo = arrRow(14,0)
Ads = arrRow(15,0)
end sub
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -