Ultimo acesso (no SQL) para session

Boa tarde pessoal!

Estou com uma dúvida que creio eu ser fácil, porém não consegui resolver ela ainda.

Tenho um sistema de login que toda que vez o usuário loga, é registrado no banco de dados (em SQL) a hora que ele se conectou. Após a verificação de login e senha, o usuário é redirecionado para uma página onde aparece seu nome de usuário (que está gravado em uma session) e a hora de sua entrada.

Acontece que, eu queria saber como passar esse valor (data e hora que foi conectado) que já está gravado no banco em SQL para uma session, para que, na página, isso possa ser exibido.

Eu sei que vcs vão falar que é pra eu fazer da mesma maneira como eu fiz pro usuário. Mas a session do usuário recebe o login que foi digitado na página anterior... e a hora não é digitada. Para gravar a hora no banco, uso a função getdate() do SQL.

Abaixo o código da minha página de verifica o login, pra vcs entenderem melhor:

<% Option Explicit %>
<!-- #include file = "funcoes.asp" -->
<%

dim SQL, rs, conexao, SQLGravaAcesso, login, senha, SQLBloqueado, rsBloqueado

login = request.Form("txtlogin")
senha = request.Form("txtsenha")

'comando sql que verifica se login e senha digitados são iguais ao do banco de dados

	SQL= "select * from sistema where " & _
 "UsuarioAdm='" & Replace(request.form("txtlogin"), "'", "''") & _
 "' and SenhaAdm='" & Replace(request.form("txtsenha"), "'", "''") & "'"

'comando sql que grava a hora em que foi acessado
SQLGravaAcesso= "UPDATE sistema SET UltimoAcesso= getdate() where UsuarioAdm='" & request.form("txtlogin") & "'"

'comando SQL que verifica se o usuário está bloqueado
SQLBloqueado= "select * from sistema where UsuarioAdm='" & login & "' and Bloqueado='false'"

'abre a conexão com o banco de dados
call abre_conexao

'executa o comando sql
Set rs = conexao.Execute(SQL)

if login="" or senha="" then 'Verifica se login ou senha foram digitados

'Armazena em uma variável Session o status do Usuário
session("StatusAcesso") = false

'Redireciona para a Página de Login e informa o erro
response.redirect("default.asp?erro=campovazio")

else 'Se os campos usuario e senha não estiverem vazios

if not rs.eof then 'Encontrou o usuário

'Verifica se o usuário não está bloqueado
Set rsBloqueado= conexao.Execute(SQLBloqueado)
if rsBloqueado.eof then 'Usuário bloqueado
'Armazena em uma variável Session o status do Usuário
session("StatusAcesso") = false

'Redireciona para a Página de Login e informa o erro
response.redirect("default.asp?erro=bloqueado")
else

'Armazena em uma variável Session o status do Usuário
session("StatusAcesso") = true

'Grava no banco de dados data e hora do acesso
Set rs= conexao.Execute(SQLGravaAcesso)

'Grava em uma variável Session o Usuário
session("Usuario") = request.form("txtlogin")

'Redireciona para a Página Inicial de Administração
response.redirect("admin.asp")
end if

else 'Usuário não encontrado
'Armazena em uma variável Session o status do Usuário
session("StatusAcesso") = false

'Redireciona para a Página de Login e informa o erro
response.redirect("default.asp?erro=login")

end if
end if

set rs = nothing 'Destrói o Objeto
rs.close

%>

Quem puder ajudar agradeço muito! http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif