%
username=trim(request.form("username_admin"))
password=trim(request.form("password_admin"))
if username<>"" and password<>"" then
sql_check="select * from user where username='" & username & "' and password='" & password & "'"
set rs_check=server.CreateObject("adodb.recordset")
rs_check.open sql_check,conn,1,1
if rs_check.eof or rs_check.bof then
session("query")=60
else
session("query")=rs_check("query")
session("username")=rs_check("username")
rs_check.close
set rs_check=nothing
select case session("query")
case 0
response.redirect "guanli_user.asp"
case 1
response.redirect "guanli_news.asp"
case 2
response.redirect "guanli_zhaopin.asp"
case 3
response.redirect "guanli_producttype.asp"
case 4
response.redirect "guanli_xunjia.asp"
case 5
response.redirect "guanli_liuyan.asp"
end select
end if
end if
%>
<%
username_huiyuan=trim(request.form("username_huiyuan"))
password_huiyuan=trim(request.form("password_huiyuan"))
if username_huiyuan<>"" and password_huiyuan<>"" then
sql_checkhuiyuan="select * from register where username='" & username_huiyuan &"' and password='" & password_huiyuan & "'"
set rs_checkhuiyuan=server.createobject("adodb.recordset")
rs_checkhuiyuan.open sql_checkhuiyuan,conn,1,1
if not rs_checkhuiyuan.eof and not rs_checkhuiyuan.bof then
session("username_huiyuan")=rs_checkhuiyuan("username")
response.write ""
else
session("username_huiyuan")=""
end if
rs_checkhuiyuan.close
set rs_checkhuiyuan=nothing
end if
%>
<%sql_news0="select * from news where type=0 and status=true order by addtime desc"
set rs_news0=server.CreateObject("adodb.recordset")
rs_news0.open sql_news0,conn,1,1
if rs_news0.recordcount>=3 then
int_news0num=3
else
int_news0num=rs_news0.recordcount
end if
sql_news1="select * from news where status=true order by addtime desc"
set rs_news1=server.CreateObject("adodb.recordset")
rs_news1.open sql_news1,conn,1,1
if rs_news1.recordcount>=8 then
int_news1num=8
else
int_news1num=rs_news1.recordcount
end if
sql_news4="select * from news where type=4 and status=true order by addtime desc"
set rs_news4=server.CreateObject("adodb.recordset")
rs_news4.open sql_news4,conn,1,1
if rs_news4.recordcount>=4 then
int_news4num=4
else
int_news4num=rs_news4.recordcount
end if
%>
江苏雪豹日用化学有限公司
Let
your life be more beautiful
we provide the knowledge
please propose the valued suggestion