CONEXAO SQL SERVER 2008 E VB.NET 2010
Ola to iniciando VB.net e terminando um curso no TreinaWeb (Basico, Intermediario).
Gostaria qual o melhor jeito de se conectar ao banco de dados SQL SERVER. Se possivel um exemplo.
Eu usei o data que tem no vb.net. Apos eu compilar o Sistema e instalar no cliente o sistema.
Pois la vai dar um nome de maquina diferente, caminhos diferentes.
Assim que instalar o Sistema pelo setup o sistema vai identificar o banco de dados automatico???
Gostaria qual o melhor jeito de se conectar ao banco de dados SQL SERVER. Se possivel um exemplo.
Eu usei o data que tem no vb.net. Apos eu compilar o Sistema e instalar no cliente o sistema.
Pois la vai dar um nome de maquina diferente, caminhos diferentes.
Assim que instalar o Sistema pelo setup o sistema vai identificar o banco de dados automatico???
A primeira coisa a fazer é entender como essa conexão funciona:
Existe um serviço (windows service), geralmente instalado na máquina servidor que vai ser o serviço que responde pelo banco de dados. Para se conectar ao mesmo, você deve na máquina cliente, [Ô]direcionar[Ô] a conexão para esse servidor, isso é feito com um objeto SqlConnection:
Em C#
SqlConnection conexao = new SqlConnection([Ô]Sua connectionstring aqui[Ô]);
Em VB.NET
Dim conecao As SqlConnection = New SqlConnection([Ô]Sua connectionstring aqui[Ô])
Uma vez especificada a connection string que você encontra nesse site, basta usar o método Open() para abrir a conexão:
Em C#:
conexao.Open();
Em VB.NET
conexao.Open()
Uma vez aberta a conexão, você pode executar comandos e buscar dados:
Em C#:
SqlCommand cmd = new SqlCommand([Ô]Insert Into Tabela (campo1, campo2) values ([ô]valor1[ô], [ô]valor2[ô])[Ô], cn);
cmd.ExecuteNonQuery();
//Buscando dados
SqlCommand cmd = new SqlCommand([Ô]Select * from tabela where xxx = yyy[Ô], cn);
SqlDataReader dr = cmd.ExecuteReader();
Em VB.NET:
Dim cmd As SqlCommand = New SqlCommand([Ô]Insert Into Tabela (campo1, campo2) values ([ô]valor1[ô], [ô]valor2[ô])[Ô], cn)
cmd.ExecuteNonQuery()
[ô]Buscando dados
Dim cmd As SqlCommand = New SqlCommand([Ô]Select * from tabela where xxx = yyy[Ô], cn)
SqlDataReader dr = cmd.ExecuteReader()
Existe um serviço (windows service), geralmente instalado na máquina servidor que vai ser o serviço que responde pelo banco de dados. Para se conectar ao mesmo, você deve na máquina cliente, [Ô]direcionar[Ô] a conexão para esse servidor, isso é feito com um objeto SqlConnection:
Em C#
SqlConnection conexao = new SqlConnection([Ô]Sua connectionstring aqui[Ô]);
Em VB.NET
Dim conecao As SqlConnection = New SqlConnection([Ô]Sua connectionstring aqui[Ô])
Uma vez especificada a connection string que você encontra nesse site, basta usar o método Open() para abrir a conexão:
Em C#:
conexao.Open();
Em VB.NET
conexao.Open()
Uma vez aberta a conexão, você pode executar comandos e buscar dados:
Em C#:
SqlCommand cmd = new SqlCommand([Ô]Insert Into Tabela (campo1, campo2) values ([ô]valor1[ô], [ô]valor2[ô])[Ô], cn);
cmd.ExecuteNonQuery();
//Buscando dados
SqlCommand cmd = new SqlCommand([Ô]Select * from tabela where xxx = yyy[Ô], cn);
SqlDataReader dr = cmd.ExecuteReader();
Em VB.NET:
Dim cmd As SqlCommand = New SqlCommand([Ô]Insert Into Tabela (campo1, campo2) values ([ô]valor1[ô], [ô]valor2[ô])[Ô], cn)
cmd.ExecuteNonQuery()
[ô]Buscando dados
Dim cmd As SqlCommand = New SqlCommand([Ô]Select * from tabela where xxx = yyy[Ô], cn)
SqlDataReader dr = cmd.ExecuteReader()
Uma coisa é uma coisa, conectar no banco de dados vai variar de acordo com a sua necessidade:
O banco pode ser remoto ou local, aconselho usar remoto (servidor central), mas vai de acordo com a sua necessidade.
O exemplo abaixo não é dos melhores mas dá para ter uma ideia de como começar, ele abaixo adiciona um campo da tabela direto em uma combobox dai o resto é com a sua imaginação.
Dá uma olhada no site do Macoratti tem muita coisa bacana lá !
Exemplo:
[ô]VARIAVEIS BANCO
Public strUsuarioBanco As String = [Ô]SA[Ô]
Public strSenhaUsuarioBanco As String = [Ô]SA[Ô]
Public strBanco As String = [Ô]DMPACESSO[Ô]
Public strServidor As String = [Ô]SERVIDOR1[Ô]
[ô]SQL
Public dr As SqlDataReader
Public selectText As String
Public myCommand As SqlCommand
Public ds As DataSet = New DataSet()
Public ConnectionString As String = [Ô]Data Source = [Ô] + strServidor + [Ô]; Initial Catalog = [Ô] + strBanco + [Ô]; User Id =[Ô] + strUsuarioBanco + [Ô]; Password =[Ô] + strSenhaUsuarioBanco
Public strConn As SqlConnection
[ô]SQL
strConn = New SqlConnection(ConnectionString)
strConn.Open()
selectText = [Ô]SELECT distinct(PES_Campoperso1) FROM Pessoas[Ô]
myCommand = New SqlCommand(selectText, strConn)
dr = myCommand.ExecuteReader()
While (dr.Read())
DropDownUnidades.Items.Add(dr([Ô]PES_Campoperso1[Ô]).ToString)
End While
strConn.Close()
O banco pode ser remoto ou local, aconselho usar remoto (servidor central), mas vai de acordo com a sua necessidade.
O exemplo abaixo não é dos melhores mas dá para ter uma ideia de como começar, ele abaixo adiciona um campo da tabela direto em uma combobox dai o resto é com a sua imaginação.
Dá uma olhada no site do Macoratti tem muita coisa bacana lá !
Exemplo:
[ô]VARIAVEIS BANCO
Public strUsuarioBanco As String = [Ô]SA[Ô]
Public strSenhaUsuarioBanco As String = [Ô]SA[Ô]
Public strBanco As String = [Ô]DMPACESSO[Ô]
Public strServidor As String = [Ô]SERVIDOR1[Ô]
[ô]SQL
Public dr As SqlDataReader
Public selectText As String
Public myCommand As SqlCommand
Public ds As DataSet = New DataSet()
Public ConnectionString As String = [Ô]Data Source = [Ô] + strServidor + [Ô]; Initial Catalog = [Ô] + strBanco + [Ô]; User Id =[Ô] + strUsuarioBanco + [Ô]; Password =[Ô] + strSenhaUsuarioBanco
Public strConn As SqlConnection
[ô]SQL
strConn = New SqlConnection(ConnectionString)
strConn.Open()
selectText = [Ô]SELECT distinct(PES_Campoperso1) FROM Pessoas[Ô]
myCommand = New SqlCommand(selectText, strConn)
dr = myCommand.ExecuteReader()
While (dr.Read())
DropDownUnidades.Items.Add(dr([Ô]PES_Campoperso1[Ô]).ToString)
End While
strConn.Close()
Veja se isso te ajuda:
http://www.macoratti.net/09/08/vbn_fcn1.htm
http://www.macoratti.net/arq_ini1.htm
vlw
http://www.macoratti.net/09/08/vbn_fcn1.htm
http://www.macoratti.net/arq_ini1.htm
vlw
Tópico encerrado , respostas não são mais permitidas