[Resolvido] Problema Com A Conexão Do Banco Com O Dreamweaver

No Navegador aparece isso.

Tipo de erro:

Microsoft JET Database Engine (0x80004005)

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

/izabelita/cadastro.asp, line 36

E isso eu copiei do Dreamweaver adicionando o número das páginas.

PG.20 Set MM_editCmd = Server.CreateObject ("ADODB.Command")

PG.21 MM_editCmd.ActiveConnection = MM_banco_STRING

PG.22 MM_editCmd.CommandText = "INSERT INTO cadastro (nome, nascimento, telefone, celular, endereco, complemento, cidade, bairro, cep, uf, email, obs) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"

PG.23 MM_editCmd.Prepared = true

PG.24 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 255, Request.Form("nome")) ' adVarWChar

PG.25 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 255, Request.Form("nascimento")) ' adVarWChar

PG.26 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 202, 1, 255, Request.Form("telefone")) ' adVarWChar

PG.27 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 202, 1, 255, Request.Form("celular")) ' adVarWChar

PG.28 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 202, 1, 255, Request.Form("endereco")) ' adVarWChar

PG.29 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 202, 1, 255, Request.Form("complemento")) ' adVarWChar

PG.30 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 202, 1, 255, Request.Form("cidade")) ' adVarWChar

PG.31 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 202, 1, 255, Request.Form("bairro")) ' adVarWChar

PG.32 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 202, 1, 255, Request.Form("cep")) ' adVarWChar

PG.33 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param10", 202, 1, 255, Request.Form("uf")) ' adVarWChar

PG.34 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param11", 202, 1, 255, Request.Form("email")) ' adVarWChar

PG.35 MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param12", 202, 1, 255, Request.Form("obs")) ' adVarWChar

PG.36 MM_editCmd.Execute

PG.37 MM_editCmd.ActiveConnection.Close