|
|
Postada em 02/03/2011 18:15 hs
Bom, descobri que o problema está na minha string de conexão com o banco ou no driver OleDb do PostgreSQL, pois fiz uns testes usando um ADODC e funcionou usando o driver ODBC, mas quando substitui, no próprio ODBC, pela string de conexão que estou usando no VB deu o mesmo problema. Seguem abaixo algumas informações da minha conexão: Driver OleDb: PgOleDb-1.0.0.20 String de conexão: "Provider=PostgreSQL OLE DB Provider;Data Source=localhost;location=Teste;User ID=postgres;password=senha;" Alguém tem uma sugestão ou usa string ou o driver diferente? Gostaria de continuar usando via código e não usar controles datacontrol. Desde já agradeço e obrigado pela força, pessoal!
Ainda na batalha! [ ]s Dado |
|
|
|
|
|
|
|
Postada em 03/03/2011 09:57 hs
Global Conex As New ADODB.Connection
Global AccessConnect As String
Public Sub Conexao()
AccessConnect =
"driver={PostgreSQL};server=ip_banco;database=maubanco;uid=postgres;pwd=postgres;"
Conex.ConnectionString = AccessConnect
Conex.Open AtivConex.ActiveConnection = Conex
End Sub
|
|
|
|
|
|
Postada em 03/03/2011 12:01 hs
Bom dia Juan! Depois de muita batalha e aproveitando seu código acima, consegui resolver o problema. Realmente minha string de conexão estava com problemas. Testei milhares diferentes e consegui uma que funcionou. Segue abaixo a String que funcionou com o bendito Numeric(8,2) ou (10,4), etc: PROVIDER=MSDASQL;DRIVER={PostgreSQL UNICODE}; DATABASE=Teste; SERVER=localhost; UID=postgres; PWD=senha; ByteaAsLongVarBinary=1; Obrigado pelo ajuda e dicas! [ ]s DadoBeer |
|
|
|
NJNEWS
|
AMPARO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 07/03/2011 09:30 hs
Private Sub txtValor_LostFocus()
txtValor.Text = Format$(CCur(txtValor.Text), "0.00")
End Sub no meu funciona normal, como esta na tabela ?? |
|
|
|
NJNEWS
|
AMPARO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 07/03/2011 09:33 hs
esse uso pra digitar txtValor = Format(txtValor.Text, "##,##0.00") |
|
|
|
