(msflexgrid) Cadastro E Foco
#1 César
Posted 18/11/2003, 14:51
eu tenho um formulário de cadastro através de uma MSFlexGrid para uma tabela no Access(tab_pagto), o campo chave é o Nº do documento, agora eu quero q quando o usuário clicar no botão "Gravar"(cmdGravar), os registros vão diretamente para a tabela do Access e, se o registro já existir, aparecer uma msgbox dizendo q já existe e a linha do Nº do documento existente fique com um foco sobre ela para uma breve alteração...
parece ser complicado, né?hehe
qualquer ajuda será bem vinda!
#2
Posted 20/11/2003, 16:04
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
Edição feita por: Bocaw, 20/11/2003, 16:05.
#3
Posted 26/10/2004, 17:22
"ligue com o Banco de Dados usando o utilitário Data" - até aki sem problemas.
"Ligar o Data va em DataBaseName e coloque o caminho do Banco de Dados" - sem problemas, vamos em frente......
"va em RecordSource e coloque o nome da tablea do Banco de Dados." - e pronto....... problemas......
Só dá erro.
Unrecognized database format '......\teste.mdb' - PQ???????
Com ADODC ligo sem problemas.
#4
Posted 29/10/2004, 23:13
Esse erro ocorre pq o vb soh aceita BDs do access de versao 97 ou + antiga. Caso vc naum tenha o Access 97, naum tem problema, basta converte-lo para esta versao. Para isso, abra seu Banco de Dados e va no menu: Ferramentas>Utilitario de banco de dados>Convertar banco de dados>Para versão do Access 97. Pronto! o BD foi convertido e agora sim o VB vai aceitar. FlwAo lêr essa explicação até parece fácil.
"ligue com o Banco de Dados usando o utilitário Data" - até aki sem problemas.
"Ligar o Data va em DataBaseName e coloque o caminho do Banco de Dados" - sem problemas, vamos em frente......
"va em RecordSource e coloque o nome da tablea do Banco de Dados." - e pronto....... problemas......
Só dá erro.
Unrecognized database format '......\teste.mdb' - PQ???????
Com ADODC ligo sem problemas.
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)