Erro De Consulta Atualizavel

[Guest - juliana -]

Olá pessoal sou novata em asp ele ta dando erro de consulta atualizavel, já fiz permssoes de no banco e na pasta e mesmo assim continua dando o mesmo erro.Vou enviar o codigo para vocês olharem...Se alguém puder me ajudar ficarei muito grata ....

<%

dim con

dim rs

dim vempresa

dim sql

dim insere

dim recset

vempresa=request.form ("Empresa")

insere = "insert into clientes(empresa) Values ('" & vempresa & "')"

db = server.MapPath ("tulio\treino.mdb")

set con = server.CreateObject("adodb.connection")

con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\tulio\treino.mdb"

con.execute(insere)

response.write "Dados Cadastrados com Sucesso!!!"

%>

[Guest Guest]

Uma dica, se não for de extrema importância, tente mudar o banco de diretório.

[Saosin]

Tente assim!

<%

Set conn = Server.CreateObject("ADODB.Connection")

conn.Provider="Microsoft.Jet.OLEDB.4.0"

conn.Open = "C:\Inetpub\wwwroot\tulio\treino.mdb"

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

vempresa = request.form("Empresa")

SQL = "INSERT INTO clientes "

SQL = SQL & "(empresa)"

SQL = SQL & "VALUES"

SQL = SQL & " ( '" & vempresa & "') "

rs.Open SQL, conn

response.write "Dados Cadastrados com Sucesso!!!"

%>