Mais um erro com Insert

Galera olha eu d novo aki incomodando

Seguinte to usando o seguinte código:

Conn_contato = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbcontatos.mdb") & ";"

Set ObjRS = Server.CreateObject("ADODB.Recordset")

StrSql = "Insert Into tbl_contato (Nome, Email, Telefone, Evento, msg)"_

& " Values('" & StrNome & "','" & StrEmail & "','" & StrTelefone & "','" & StrEvento & "','" & StrComentario & "')"

ObjRS.Open StrSql, Conn_contato

ObjRS.Close

Set ObjRS = Nothing

Sendo que Strnome, StrEmail, StrTelefone, StrEvento e StrComentario são variáveis que recebo de um form

Qndo utilizo o response.write, apresenta a seguinte query

Insert Into tbl_contato (Nome, Email, Telefone, Evento, msg) Values('claudio','claudio@pop.com.br','41620544','','sadfljhfkashifhsdkjfsdh')

Eu sei q Evento tá com valor vazio, mas no banco isso tá permitido.

Qndo ele é executado apresenta o seguinte erro:

Microsoft JET Database Engine (0x80004005)

A operação deve usar uma consulta atualizável.

/teste_it/envio_faleconosco.asp, line 35

Está é a linha 35:

ObjRS.Open StrSql, Conn_contato

Se precisarem de mais informações postem aki

desde já agradeço as respostas