%@ LANGUAGE="VBSCRIPT" %> <% DIM rs set RS=server.CreateObject("ADODB.Recordset") %>
![]() |
|
|
<% If session("user_id")<>"" Then
response.write session("user_id")&" "
if session("gold_state")=true then
response.write " 金牌会员 "
elseif session("silver_state")=true then
response.write " 银牌会员 "
else
response.write "免费会员 "
end if
response.write " 退出"
else
response.write "您未登陆!登 陆"
end if
%>
商务中心 |
| <% sj=date() response.write year(sj)&"年"&month(sj)&"月"&day(sj)&"日"&weekdayname(weekday(date))%> | |
|
|||||||||||||||||||||||||||||||