Bocaw

o Toninhu seu xxxxxx

se vc Quiser eu posso ti da o meu programa


auauhauhauhauhauhauhauha

e ai....

bem para vc mandar os cadastro para o banco de dados

faça o seguinte


se vc estiver usando um textbox intaw ligue com o Banco de Dados usando o utilitário Data.

Para Ligar o Data va em DataBaseName e coloque o caminho do Banco de Dados, depois va em RecordSource e coloque o nome da tablea do Banco de Dados.

Bem depois disto

ligue a textbox em DataSource coloque o Name do Data e depois va em DataField e colque o campo desejado.

bem faça isso e tudo.

agora para gravar no banco de dados.....

crie um botão Novo para adicionar o cadastro, no botão cmd_novo coloque o seguinte código.

Data.Recordset.AddNew

bem ai vc preenche todos os campos e no botão gravar vc coloca o seguinte código.

MsgBox("Deseja salvar novo CLiente", vbInformation + vbYesNo, "ATENÇÃO") = vbYes Then

Data.UpdateRecord
Data.Recordset.Bookmark = DT_CAD_CD.Recordset.LastModified

ai blz seu cadastro esta gravado

Agora para ver se vc não esta repetindo o cadastro bem eu não tenhu certeza mas coloque um IF ai. Exemplo.:
Dim Pesquisa as string

Pesquisa = "CPF = " ' & textbox & " ' "

if textbox = pesquisa then
msgbox (" Cliente ja Cadastrado" , vcinformation, "Atenção")
end if

Bem acho q é isso mas qualquer duvida da um toque ai bl


falo