PUXANDOS DADOS DE BD POSTGRES CONECTADO VIA NPGSQ

GEISSLER 29/08/2011 11:29:30
#382708
seguinte conectei meu banco de dados feito no Postgresql ao vb.net utilizando Npgsql...
Exibo as tabelas em DataGrid normalmente ...
Gostaria de puxar e salvar dados das minhas tabela pelo vb... quais seriam os codigos ??


Desde ja agradeço
vlw galera



Att. Gustavo
KERPLUNK 29/08/2011 11:47:08
#382709
Não entendi direito. Os dados já não estão na tabela?
GEISSLER 29/08/2011 13:32:16
#382724
Sim estão salvos na tabela.é tipo numa tabela de estoque para mim adicionar um novo produto na tabela pelo vb qual codigo usaria ...
KERPLUNK 29/08/2011 14:18:17
#382727
Sql normal...
Insert into tabela(campo1, campo2) values (valor1, valor2)
GEISSLER 02/09/2011 13:23:00
#383228
Então...,tentei esse codigo pesquisei mas um pouco mas não deu certo ... quando coloco esse codigo no vb da erro diz q [Ô]Name [ô]Insert[ô] is not declared[Ô] é alguma coisa q eu esqueci de declarar ... ? estou postando o codigo q usei caso seja necessario ...



Public Class Form1
Dim bs As New BindingSource()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ConexaoPG As String = [Ô]Server=localhost;Port=5432;User Id=postgres;Password=megaware;Database=agenda;Protocol=3;SSL=false; Pooling=true;MinPoolSize=1;MaxPoolSize=20;Encoding=UNICODE;Timeout=15;SslMode=Disable;[Ô]


Dim conn As Npgsql.NpgsqlConnection = Nothing

Try
[ô]Cria uma Instancia de NpgsqlConnection na variavel conn
conn = New Npgsql.NpgsqlConnection(ConexaoPG)

[ô]Abre a conexão
conn.Open()

[ô]Declara e atribui a instrucao SQL de consulta
Dim SQL As String = [Ô]SELECT * FROM usuarios[Ô]
[ô]aki esta falando assim selecione (* significa todos) as colunas da tabela usuarios



[ô]Instancia o NpgsqlDataAdapter responsavel pela comunicação
[ô]é feita a leitura dos dados preenchendo o dataset
Dim da As Npgsql.NpgsqlDataAdapter = New Npgsql.NpgsqlDataAdapter(SQL, conn)

[ô]Instacia um DataSet
Dim ds As DataSet = New DataSet()

[ô]Preenche o DataAdapter
da.Fill(ds, [Ô]Usuarios[Ô])

[ô]Atribiu um Datasource a Grid
DataGridView1.DataSource = ds.Tables([Ô]Usuarios[Ô]).DefaultView






[ô]aki vai mostra mensagem de erro causo houver

Catch ex As Exception
MsgBox(ex.Message)

Finally
If Not conn Is Nothing Then
[ô]se conexao foi estabelecida entao
If conn.State = ConnectionState.Open Then

[ô]fecha a conexao
conn.Close()
End If
End If
End Try
End Sub


Desde ja agradeço

vlee e floww
GEISSLER 04/09/2011 11:37:11
#383346
Por Favor algum pode me ajudar .... um amigo esta me ajudando a aperfeiçoar meus conhecimentos em PostGresql mas nao estou conseguindo colocar em pratica no vb por nao conseguir salvar no meu banco de dados
Alguem tem algum projeto, dica de outro tipo de coneçao ..? sei la estou aberto a alguer opçao ... So preciso conectar meu banco de Dados feito no PostGresql no vb salvar importar e excluir dados seja como for .





Desde Ja agredeço Obrigado ....
GEISSLER 11/09/2011 17:39:45
#383945
vou fechar esse e criar um novo pra nao deixar topico em aberto .........
Tópico encerrado , respostas não são mais permitidas