Modificar Cadastro

Boa tarde,

estou tentando atualizar cadastros de usuários no BD. Tenho uma página onde seleciono um usuário e edito seu perfil. Tem um botão onde envia os dados para ser atualizado. Mas está dando um erre de sintaxe no UPDATE.

o código é esse:

<%@ Language=VBScript%>

<%

dim rsTarefas, rsUser, sql, login

login = Request.Cookies("login")

if Request.Cookies("login") = "" then

Response.Redirect("login_adm.asp")

end if

%>

<%

dim cpf, rg, nome, sobrenome, endereco, bairro, cidade, estado, fone_casa, fone_cel, cep, email, nascimento

nome = Request.Form("nome")

sobrenome = Request.Form("sobrenome")

cpf = Request.form("cpf")

rg = Request.Form("rg")

endereco = Request.form("endereco")

bairro = Request.form("bairro")

cidade = Request.form("cidade")

estado = request.form("estado")

fone_casa = request.form("fone_casa")

fone_cel = request.form("fone_cel")

cep = request.form("cep")

email = request.form("email")

nascimento = request.form("nascimento")

set cn = server.CreateObject ( "ADODB.Connection")

cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dados/projecao.mdb")

sql= "UPDATE aluno SET cpf = '"& cpf &"', rg = '"& rg &"', nome = '"& nome &"', sobrenome = '"& sobrenome &"', endereco = '"& endereco &"', bairro = '"& bairro &"', cidade = '"& cidade &"', estado = '"& estado &"', fone_casa = '" & fone_casa & "', fone_cel = '" & fone_cel & "', cep = '" & cep & "', email = '" & email & "', nascimento '" & nascimento & "' WHERE cpf = '"& cpf &"' AND rg = '"& rg &"' AND nome = '"& nome &"' AND sobrenome = '"& sobrenome &"' AND endereco = '"& endereco &"' AND bairro = '"& bairro &"' AND cidade = '"& cidade &"' AND estado = '"& estado &"' AND fone_casa = '" & fone_casa & "' AND fone_cel = '" & fone_cel & "' AND cep = '" & cep & "' AND email = '" & email & "' AND nascimento '" & nascimento & "'"

set rs = cn.execute(sql)

response.redirect("listar_alunos1.asp")

%>

grato pela ajuda,

Marcondes