VB.NET COM 3 CAMADAS CRUD
Estou mundando minha forma de desenvolver aplicativos, só que estou com um pequeno problema que não consigo resolver
exemplo:
Tenho minha classe para INCLUIR/SALVAR/DELETAR/ALTERAR funciona uma beleza.
Problema:
Objeto listview
Com a classe listar apos SALVAR INFORMAÇÕES.
Código atual funcional
Public Sub Listar(ByRef cListView As ListView)
Call ConectaDB()
Dim DR As OleDbDataReader
Dim cmd As OleDbCommand = Conexao.CreateCommand
cmd.CommandText = [Ô]SELECT * FROM Grp_OS ORDER BY Descricao[Ô]
cListView.Items.Clear()
dr = cmd.ExecuteReader()
While DR.Read
Dim codigo As String = DR.Item(0)
Dim ls As New ListViewItem(codigo, 0)
ls.SubItems.Add(DR.Item(1))
cListView.Items.Add(ls)
End While
DR.Close()
If Conexao.State = 1 Then Conexao.Close()
End Sub
quando eu salvo ele não me lista o que eu acabei de salvar mais se eu salvar outro registro ele me mostra o anterior e não o ultimo
obrigado quem me ajudar.
exemplo:
Tenho minha classe para INCLUIR/SALVAR/DELETAR/ALTERAR funciona uma beleza.
Problema:
Objeto listview
Com a classe listar apos SALVAR INFORMAÇÕES.
Código atual funcional
Public Sub Listar(ByRef cListView As ListView)
Call ConectaDB()
Dim DR As OleDbDataReader
Dim cmd As OleDbCommand = Conexao.CreateCommand
cmd.CommandText = [Ô]SELECT * FROM Grp_OS ORDER BY Descricao[Ô]
cListView.Items.Clear()
dr = cmd.ExecuteReader()
While DR.Read
Dim codigo As String = DR.Item(0)
Dim ls As New ListViewItem(codigo, 0)
ls.SubItems.Add(DR.Item(1))
cListView.Items.Add(ls)
End While
DR.Close()
If Conexao.State = 1 Then Conexao.Close()
End Sub
quando eu salvo ele não me lista o que eu acabei de salvar mais se eu salvar outro registro ele me mostra o anterior e não o ultimo
obrigado quem me ajudar.
SONILDO,
Não entendi alguns pontos...
Quando você fala [Ô]salvar[Ô] é [Ô]Insert[Ô]?
Se sim: Você está salvando em Access, SQL Server, Oracle, Sybase, MySQL ...Qual banco?
Está salvando com Stored Procedure?
Se não: Você está mostrando a informação na tela?
[][ô]s,
Tunusat.
Não entendi alguns pontos...
Quando você fala [Ô]salvar[Ô] é [Ô]Insert[Ô]?
Se sim: Você está salvando em Access, SQL Server, Oracle, Sybase, MySQL ...Qual banco?
Está salvando com Stored Procedure?
Se não: Você está mostrando a informação na tela?
[][ô]s,
Tunusat.
Respostas ao amigo TUNUSAT
- Quando falo [Ô]Salvar[Ô] é o comando insert.
- Estou salvando no bando SGDBr - Microsoft ACCESS.
as informações estão salvando no banco corretamente mais quando eu aplico o
comando .salvar e logo o comando .listar no listview ele não insere a ultima informação.
- Quando falo [Ô]Salvar[Ô] é o comando insert.
- Estou salvando no bando SGDBr - Microsoft ACCESS.
as informações estão salvando no banco corretamente mais quando eu aplico o
comando .salvar e logo o comando .listar no listview ele não insere a ultima informação.
Sonildo,
Montei um sistema [Ô]waTESTE[Ô] baseado na sua função. Funcionou normalmente. Anexo aqui. Só não gerenciei a chave Primária. Detalhe: o [Ô]Order By[Ô] reposiciona a [Ô]list[Ô] ... isto quer dizer que o registro pode aparecer em qualquer lugar de acordo com a ordem alfabética da descrição.
Está no Botão 2 / ListView. ... siga as chamadas... com [Ô]F11[Ô].
[][ô]s,
Tunusat.
Montei um sistema [Ô]waTESTE[Ô] baseado na sua função. Funcionou normalmente. Anexo aqui. Só não gerenciei a chave Primária. Detalhe: o [Ô]Order By[Ô] reposiciona a [Ô]list[Ô] ... isto quer dizer que o registro pode aparecer em qualquer lugar de acordo com a ordem alfabética da descrição.
Está no Botão 2 / ListView. ... siga as chamadas... com [Ô]F11[Ô].
[][ô]s,
Tunusat.
Ok, Vou estudar mais.
Mais mesmo assim sou grato e obrigado UNUSAT.
Mais mesmo assim sou grato e obrigado UNUSAT.
Tópico encerrado , respostas não são mais permitidas