Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Vagner Bucioli Scala

[Resolvido] AdoNet!

Recommended Posts

Pessoal boa tarde! Ainda estou migrando algumas coisas de Asp para AspNet e pintou a seguinte dúvida, no Asp eu faço assim caso minha query não ache o registro procurado:

 

Set Mostrar = "Select * from clientes where Nome = 'Vagner'

 

If Mostrar.Eof Then

Registro não encontrado

Else

Mostre o registro procurado

End if

 

Agora e no VBNET? Segue abaixo o código que estou usando, criei o dataset e está tudo certinho me retornando o cliente "Vagner" caso exista no banco de dados, mas e se caso não existe como eu faço? tentei usar que nem no asp e não deu certo! Segue codigo:

 

Public Sub CarregaDados()

 

Dim conn As New OleDbConnection(strconexao())

 

conn.Open()

 

Dim strsql = "Select * From Clientes where Nome='Vagner'"

 

 

 

Try

 

Dim ds As New DataSet

Dim cmd As New OleDbDataAdapter(strsql, conn)

 

cmd.Fill(ds, "Nome")

 

DropDownList1.DataSource = ds.Tables("Nome").DefaultView

 

DropDownList1.DataTextField = "Nome"

DropDownList1.DataValueField = "CodCli"

DropDownList1.DataSource = ds.Tables("Nome").DefaultView

DropDownList1.DataBind()

 

 

 

Catch ex As Exception

 

Response.Write("Erro Geral: " + ex.Message.ToString)

 

End Try

 

 

conn.Close()

 

conn.Dispose()

 

 

 

End Sub

 

* Preciso de algo Se não encontrar o registro apareça a mensagem "O CLIENTE QUE VOCÊ ESTÁ PROCURANDO NÃO EXISTE NA NOSSA BASE DE DADOS".

 

 

Muito obrigado! Vagner

Compartilhar este post


Link para o post
Compartilhar em outros sites

Utilize DataReader.

 

Consome menos memória e fica mais rápido.

 

 

Dim query As String = "SELECT * FROM Categories WHERE CategoryID = 1"


conexao.Open()
dr = comando.ExecuteReader()
If dr.Read() Then
  Console.WriteLine("Nome: " & _
          dr.GetString(1))
Else
  Console.WriteLine("Registro não encontrado.")
End If

Compartilhar este post


Link para o post
Compartilhar em outros sites

ficaria assim:

 

   If ds.Tables(0).Rows.Count > 0 Then
           'existe coluna

       Else
           Response.Write("Registro não encontrado")
       End If

 

 

Lembrando que DataSet é uma coleção de tabelas, ocupa um grande espaço em memória.

se quiser usar esse tipo de estrutura crie como DataTable

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.