%
set rs1 = Server.CreateObject("ADODB.Recordset")
set rs2 = Server.CreateObject("ADODB.Recordset")
%>
联系我们->千固国际贸易
<%Response.END
ELSE
Session("ClientName")=Trim(Request("ClientName"))
conn.execute("update "& strDBitem &"CLIENT_Client set LoginSum=LoginSum+1,LastTime=EndTime WHERE ClientName='"&Trim(Request("ClientName"))&"'")
conn.execute("update "& strDBitem &"CLIENT_Client set EndTime='"&NOW()&"' WHERE ClientName='"&Trim(Request("ClientName"))&"'")
Response.Redirect("index.asp")
END IF
rs1.close
set rs1 = nothing
END IF
IF (request("action")="exit") then
session.abandon
response.redirect "index.asp"
End if
%>