Pessoal,

Criei um modulo com esta função para alterar nomes em um BD

Public Function Altera(Old_name As String, New_Name As String)

If New_Name Empty Then
rsa.Seek "=", Old_name
rsa.Edit
rsa![nome] = New_Name
rsa.Update
frmAnalista.lstanalista.Clear
Add_Nome
End If

End Function

no form estou usando:

Altera (antigo, novo)

Mas não esta sendo interpretado corretamente, aparece o erro :

Compile error:
Expected: =

não consigo solucionar, alguém pode dar uma luz?
desde já agradeço

If New_Name Empty Then
rsa.Seek "=", Old_name
rsa.Edit
rsa![nome] = New_Name 'retire [  deixa assim - rsa!nome
rsa.Update
frmAnalista.lstanalista.Clear
Add_Nome
End If

 

valeu, funcionou... q mancada hein!!

 

abs

Daniel Santos