Visual Basic em Português

Página pessoal de Jorge Paulino sobre o Visual Basic (VB.NET, ASP.NET, VB6, VBA) e algumas noticias de tecnologia

VB.NET: Dicas de Programação #1

Criação de Ligações à Base de Dados (SQL)

 

Muitas vezes perde-se tempo a tentar colocar a ConnectionString de uma forma correcta. Falta uma vírgula, falta um espaço, etc, e perdemos algum tempo a tentar efectuar uma ligar ao servidor.

 

Uma das formas simples e organizada de criar uma ConnectionString é utilizar o SqlConnectionStringBuilder. Desta forma apenas temos de escolher os campos relevante para a nossa ligação e a ConnectionString é facilmente conseguida.

 

Exemplo:

 

‘ Cria uma nova instância de uma SqlConnectionStringBuilder

Dim strConn As New SqlConnectionStringBuilder()

 

‘ Construção da Connection String

With strConn

      .DataSource = "Servidor"

      .InitialCatalog = "Base de Dados"

      .IntegratedSecurity = False

      .UserInstance = False

      .UserID = "Utilizador"

      .Password = "Password"

End With

 

‘ Visualização do resultado final

Debug.Print(strConn.ConnectionString())

 

strConn.Clear()

strConn = Nothing

 

Resultado:

“Data Source=Servidor;Initial Catalog="Base de Dados";Integrated Security=False;User ID=Utilizador;Password=Password;User Instance=False”

 

 



Usando a CheckedListBox

 

A CheckedListBox é um controlo que permite uma fácil selecção de itens e muito simples de trabalhar. No entanto existem algumas pequenas coisas que são importantes e que muitas vezes são necessárias

 

‘ Adicionando itens à lista dinamicamente

Dim items() As String = {"Item 1", "Item 2", "Item 3", "Item 4", "Item 5"}

Me.myCheckedListBox.Items.AddRange(items)

 

 

Um das propriedades que está definida por defeito para False é a CheckOnClick. No entanto se queremos que se clique e que seleccione logo o item, tornado mais fácil para o utilizador, deveremos coloca-la a True através de código ou na janela das propriedades:

 

Me.myCheckedListBox.CheckOnClick = True

 

 

Outra das coisas que não possivel fazer directamente é saber o index do itens que estão seleccionados. Uma das formas simples de resolver é utilizando o seguinte código:

 

‘ Ciclo que percorre todas as opções seleccionadas

For Each item As String In Me.myCheckedListBox.CheckedItems

       Debug.Print(Me.myCheckedListBox.FindString(item.ToString))

Next

 

 

 

PS: Como sempre, qualquer dúvida, comentário ou correcção ao artigo é sempre bem vinda!

2 comentários:

Anónimo disse...

Boa tarde,

por acaso alguém sabe como definir a string no caso de a base de dados estar localizada por exemplo no mesmo local do executável?

obrigado,

Marco Garcias

jpaulino disse...

Marco Garcias

Vê um exemplo em (está no comentário):

http://vbtuga.blogspot.com/2008/04/vbnet-gesto-de-dados-em-sql-server.html

Mensagens Recentes



Microsoft Office Especialist

Membro da Comunidade
Experts-Exchange


Administ. da Comunidade
Portugal-a-Programar



Twitter

Artigos no CodeProject

Artigos no CodeProject

Subscrever Novidades

Endereço de Email:

Delivered by FeedBurner

Seguidores

Histórico