CADCLIENTE
pessoal gostaria da ajuda dos mestre aqui do vb pois não sei como fazer isso q gostaria de fazer funcionar no meu projeto
Qual e a [Ô]paradinha[Ô]
gostaria de fazer essas paradinha auto-numeração de forma que ele busque no BD e verifique qual o ultimo cadastrado e acrescente o posterior e a outra duvida como faço uma busca pelo nome na textbox pesquisar e aparece no grid somente o nome pesquisado.
sobre a autonumeração já tinha feito isso no access + tem um porem em outro projeto que quando excluÃa um cliente a numeração
ex. 00001 Jackison
00002 Maria
00003 José
caso exclui-se a Maria a numeração do José passasse ser a da Maria espero e assim ele fosse quando cadastrar outro usuário ele sempre verifica-se o ultimo do BD
sobre a autonumeração já tinha feito isso no access + tem um porem em outro projeto que quando excluÃa um cliente a numeração
ex. 00001 Jackison
00002 Maria
00003 José
caso exclui-se a Maria a numeração do José passasse ser a da Maria espero e assim ele fosse quando cadastrar outro usuário ele sempre verifica-se o ultimo do BD
Projeto test
porque não crie um campo auto-numeração?
mas caso queira crie um método(Function) para retornar o que esta precisando
Tipo:
Isso aqui é uma ideia, mas deixo aqui minha dica! Você disse o seguinte
Isso não é correto dependendo do que você vai fazer! Porque? porque se você tiver algum vinculo em outra tabela para esse cliente você perderá referencia do mesmo! a não ser que você exclua todos os registro relacionados primeiro que também não é legal.
Espero ter ajudado
mas caso queira crie um método(Function) para retornar o que esta precisando
Tipo:
Public Function retorna_NumeracaoSEQ() As String
Dim dt As New DataTable
Dim strReturn As String = [Ô]1[Ô]
Dim _conn As New OracleConnection
Dim _cmd As New OracleCommand
Try
_conn.ConnectionString = [Ô]Sua String de Conexão[Ô]
_cmd.CommandText = [Ô]SELECT MAX(CODIGO) AS CODIGO FROM SUA_TABELA[Ô]
dt.Load(_cmd.ExecuteReader())
_conn.Close()
If dt.Rows.Count > 0 Then
strReturn = (CLng(dt.Rows(0)([Ô]CODIGO[Ô]).ToString()) + 1).ToString()
End If
Return strReturn
Catch ex As Exception
dt = Nothing
_conn.Close()
Return strReturn
End Try
End FunctionIsso aqui é uma ideia, mas deixo aqui minha dica! Você disse o seguinte
Citação:caso exclui-se a Maria a numeração do José passasse ser a da Maria espero
Isso não é correto dependendo do que você vai fazer! Porque? porque se você tiver algum vinculo em outra tabela para esse cliente você perderá referencia do mesmo! a não ser que você exclua todos os registro relacionados primeiro que também não é legal.
Espero ter ajudado
Segue projeto modificado. Observe que inclui um módulo para que suas functions e Subs fiquem disponÃveis para serem usados em outros forms. Também modifiquei a forma de carregar o grid para facilitar na pesquisa. A conexão com o banco de dados está mais eficiente, pois o banco não fica aberto quando o sistema está aberto. Você pode pegar este modelo para usar nos outros forms.
Roberto Martins vc esta me seguindo é rsrsr brincadeira vc é d+ não menos prezando os demais já resolveu duas broncas minhas vlw mesmo cara
Rs, estamos aÃ.
Se o problema foi resolvido então encerre o tópico, valeu!
Tópico encerrado , respostas não são mais permitidas