USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Duplicidade
samuel de lima
não registrado
Postada em 25/06/2004 10:28 hs   
 

dim texto

texto=text1

recordset=rscliente

connection=conexao

set rscliente=conexao.execute(select idcliente from cliente  where idcliente like '" & texto &"*')

if rscliente("cliente")=texto then

msgbox"esse numero já está cadastrado"

exit sub

end if

e é isso!

 

     
Elmo
não registrado
Postada em 25/06/2004 10:30 hs   
nao sei como fazer essa rotina, esse é problema?
     
WaldirJr
POÇOS DE CALDAS
MG - BRASIL
Postada em 25/06/2004 10:59 hs            
O que faço em meus programas é o seguinte (obs.: em ACCESS x VB, mas a lógica é a mesma em outros bancos, muda alguns comandos)
 
quando o usuario clica no botão novo eu já gravo o próximo código no banco de dados, encontrado com um select
 
SELECT (MAX(idCodigo) + 1) as Proximo FROM Clientes
 
Se o usuario clicar em cancelar eu excluo o registro. se ele clicar em Salvar, salvo os outros dados da Tabela, já que o código já foi salvo.
 
Pode ser que se o programa estiver em rede, algum registro pule, mas essa foi a maneira + segura que encontrei. + segura até que Auto-Numeração.
 
Se precisar te passo uma Tabela de exemplo. Teu e-mail é

________________________

Té +

Que NIMB role bons Dados! Emoções

     
Página(s): 2/2     « ANTERIOR  


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página