[Resolvido] Gravar usuario que loga no sistema

Pessoal boa noite!

Sou novo em ASP, na verdade estou fazendo mais como Hobby porque meu conhecimento em tecnologia é focado em outra área, no entanto gosto da linguagem e preciso resolver um probleminha que nao estou conseguindo de maneira nenhuma.

Estou querendo gravar todos usuario que tentam logar no sistema, mas nao estou conseguindo, vcs podem me ajudar?

O codigo que está na pagina default.asp é o seguinte:

<%@ Language=VBScript %>
<% Option Explicit %>
<% session.LCID=1046 %>

<!--#include file="configuracoes.asp"-->
<%

dim varstatus, usuario, senha, erro, login, nometime,hora, ip

varstatus = request.QueryString("login")
usuario = request.Form("usuario")
senha = request.Form("senha")
erro = request.QueryString("erro")

if varstatus = 2 then

dim rsUsuario, strUsuario, strUsuarios
set rsUsuario = server.createobject("ADODB.Recordset")
strUsuario = "SELECT * FROM cadastro WHERE login = '"&usuario&"' and senha = '"&senha&"' and ativo = 'S' "
rsUsuario.open strUsuario, objConn, 3, 3

if rsUsuario.bof then
response.Redirect("http://www.loginsession/default.asp?erro=1")
else
login = rsusuario("login")
usuario = rsusuario ("nometime")
hora = time
ip = Request.ServerVariables("REMOTE_ADDR")
strUsuarios = "INSERT INTO log (login,nometime,date,hora,ip) VALUES ('" &login& "','" &usuario& "','" &date& "','" &hora& "','" &ip& "')"
response.write (strusuarios)
set rsusuario = objconn.execute(strUsuarios)

session("logado") = rsUsuario("cod")
session.Timeout = 240
response.Redirect("index2.asp")
end if
rsUsuario.close
set rsUsuario = nothing

end if
%>
ERRO:

INSERT INTO log (login,nometime,date,hora,ip) VALUES ('Futsal','Novo Futsal','21/6/2009','21:46:33','201.93.209.230')

Microsoft JET Database Engine error '80040e14'

Syntax error in INSERT INTO statement.

/loginsession/default.asp, line 61

• - - - - - - - - - - - - - - -

A linha 61 é: set rsusuario = objconn.execute(strUsuarios)

Se tiverem alguma dica de segurança em agradeço tbm... hehe

Aguardo ajuda pessoal....

Valeu....