O que há de errado?

Olá alguem poderia me dizer o q há de errado com o código a seguir:

dim cn, sSQL

Nome = Request.Form ("Nome")
Empresa = Request.Form ("Empresa")
Endereco = Request.Form ("Endereco")
Cidade = Request.Form ("Cidade")
Estado = Request.Form ("Estado")
DDD = Request.Form ("DDD")
Telefone = Request.Form ("Telefone")
Fax = Request.Form ("Fax")
Email = Request.Form ("Email")
Obs = Request.Form ("Obs")

Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.Mappath("../db/contato.mdb")

sSQL = "INSERT INTO TBContato (Nome, Empresa, Endereco, Cidade, Estado, CEP, TelDDD, Tel, Fax, Email, Obs) VALUES ('" & Nome & "', '" & Empresa & "', '" & Endereco & "', '" & Cidade & "', '" & Estado & "', '" & CEP & "', '" & TelDDD & "', '" & Tel & "', '" & Fax & "', '" & Email & "', '" & Obs & "');"

cn.Execute (sSQL)

cn.Close
%>

O seguinte erro é gerado:

Tipo de erro:
Microsoft JET Database Engine (0x80004005)
A operação deve usar uma consulta atualizável.
/contato.asp, line 22

O que pode estar errado?

Desde já agradeço.