|
<%
Dim PicShow
PicShow = Session("MM_Username")
IF PicShow <>"" THEN %>
<%
' *** Logout the current user.
MM_Logout = CStr(Request.ServerVariables("URL")) & "?MM_Logoutnow=1"
If (CStr(Request("MM_Logoutnow")) = "1") Then
Session.Abandon
MM_logoutRedirectPage = "GO.ASP"
' redirect with URL parameters (remove the "MM_Logoutnow" query param).
if (MM_logoutRedirectPage = "") Then MM_logoutRedirectPage = CStr(Request.ServerVariables("URL"))
If (InStr(1, UC_redirectPage, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_newQS = "?"
For Each Item In Request.QueryString
If (Item <> "MM_Logoutnow") Then
If (Len(MM_newQS) > 1) Then MM_newQS = MM_newQS & "&"
MM_newQS = MM_newQS & Item & "=" & Server.URLencode(Request.QueryString(Item))
End If
Next
if (Len(MM_newQS) > 1) Then MM_logoutRedirectPage = MM_logoutRedirectPage & MM_newQS
End If
Response.Redirect(MM_logoutRedirectPage)
End If
%>
欢迎您:<%= Session("MM_Username") %>
[ 退 出 ] |
<% ELSE %>
<% End If %>
|
|
|
当前位置 >> 洁具 |
|
|
洁具 - 主要分类
洁具是指在卫生间、厨房应用的陶瓷及五金家居设备,大件有座便器、面盆、浴缸、浴房、洗涤槽、拖布池等,另外包括龙头、花洒、毛巾杆等。
|
|
|