CONEXAO AO SQL SERVER EXPRESS 2008.

CLAUDIOD 03/07/2011 16:15:13
#378360
Boa tarde.
Tenho vários formulários e cada um deles coloco a string de conexão ao banco de dados.
Então, toda vez que mudo a string tenho que mudar em cada formulário.

Sei que existe uma maneira de criar uma funçao e colocar a string nela, e chama-la em cada formulário e se mudar a string mudaria somente na função.

Como faz isso?

Como criar e como chamar a função em cada formulário?

Grato.
TECLA 03/07/2011 21:53:37
#378382
Resposta escolhida
Uma sugestão seria a utilização de um arquivo XML (app.config) para armazenar a string de conexão.
Veja um artigo que mostra como criar e usar o arquivo.
Criando e usando um arquivo de configuração
CLAUDIOD 03/07/2011 23:43:31
#378394
TECLA, excelente dica.
Utilizei armazenando em uma string, toda stringconnection. Funcionou perfeitamente, inclusive com o botão reset.
Muito bom mesmo, obrigado por me ajudar nessa dúvida.
Gostei muito do exemplo de estar gerenciando a senha, o usuario, o servidor e gostaria de colocar o banco também, mas, como poderia reunir todas essas informações em uma connectionstring.
Por exemplo uma connectionstring informada: strCon = [Ô]Data Source=CLAUDIO-DELL\SQLEXPRESS;Initial Catalog=BdProjetos;User ID=Admin;Password=matrix[Ô]
Considerando seu exemplo para gerenciar o servidor: strCon = CLAUDIO-DELL\SQLEXPRESS
o usuario: strCon = Admin
A senha: strCon = matrix
O banco de dados: strCon = BdProjetos

Como concatenaria todas as informações em uma connectionstring?

Grato.
WEBSTERGONTIJO 04/07/2011 07:43:27
#378398
Amigao cria uma classe, ai toda vez que vc precisar usar o banco chama ele


tipo assimmm


Public Class Conexaobd
Dim caminho As New CaminhoBanco
Dim CaminhoBanco As String = [Ô][Ô]
Dim conect As New SqlConnection([Ô]Data Source=[Ô] & caminho.IniciaBd & [Ô];AttachDbFilename=d:\bd\LOJA.mdf;user id=sa;password=masterkey[Ô])
Dim command As SqlCommand = conect.CreateCommand
Dim dataReader As SqlDataReader
Public Sub open()
conect.Open()
End Sub

Public Sub executeQuery(ByVal query As String)
Try
Me.command.CommandText = query
Me.command.ExecuteNonQuery()
Catch EX As Exception
Throw EX
MsgBox([Ô]PROCURE O SUPORTE [Ô] & EX.Message)
Rotinas.GeraLogErro(EX, [Ô]Conexão Banco[Ô])

End Try



End Sub

Public Function getResult() As System.Data.DataTable

Dim dataTable As DataTable
dataTable = New DataTable()
dataReader = Me.command.ExecuteReader(CommandBehavior.CloseConnection)

dataTable.Load(dataReader, LoadOption.OverwriteChanges)

dataReader.Close()
dataReader.Dispose()
conect.Close()

Return (dataTable)

End Function

Public Sub close()

If ((Me.conect Is Nothing) = False) Then


If (Me.conect.State = ConnectionState.Open) Then

Me.conect.Close()

End If

End If

End Sub
End Class
CLAUDIOD 04/07/2011 13:19:21
#378434
WEBSTERGONTIJO, boa tarde e obrigado pela ajuda.
Mas, a classe eu já criei, é que trabalho com meu notebook e quando termino coloco no servidor.
O caminho sendo diferente, tenho que ficar mudando toda hora no código.
Com a solução do TECLA, no formulário mesmo eu mudo a connectionstring, sem precisar de entrar no código entendeu?

Abração.
Tópico encerrado , respostas não são mais permitidas