Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

problema con upgrade en postgres

Estas en el tema de problema con upgrade en postgres en el foro de Visual Basic clásico en Foros del Web. hola maestros. tengo una aplicacion que funcionaba en postgres , hace pocas horas hicieron upgrade al servidor y al intentar conectar via odbc a la ...
  #1 (permalink)  
Antiguo 17/07/2008, 14:16
Avatar de mveraa  
Fecha de Ingreso: diciembre-2002
Ubicación: santiago-chilito
Mensajes: 1.931
Antigüedad: 21 años, 4 meses
Puntos: 2
problema con upgrade en postgres

hola maestros.

tengo una aplicacion que funcionaba en postgres , hace pocas horas hicieron upgrade al servidor y al intentar conectar via odbc a la base de datos me sale el siguiente error.

-2147467259

client encoding mismatch


¿alguna idea ?

saludos.
__________________
"Cuando se adelanta un oponente, enfréntalo y salúdalo; si intenta retroceder, déjalo seguir su camino"
  #2 (permalink)  
Antiguo 17/07/2008, 15:21
Avatar de mveraa  
Fecha de Ingreso: diciembre-2002
Ubicación: santiago-chilito
Mensajes: 1.931
Antigüedad: 21 años, 4 meses
Puntos: 2
Respuesta: problema con upgrade en postgres

dato extra.

anteriormente tenia codificacion
UNICODE

ahora tiene uft8
y la version de posrgres hora es:
8.2
__________________
"Cuando se adelanta un oponente, enfréntalo y salúdalo; si intenta retroceder, déjalo seguir su camino"
  #3 (permalink)  
Antiguo 18/07/2008, 07:21
Avatar de mveraa  
Fecha de Ingreso: diciembre-2002
Ubicación: santiago-chilito
Mensajes: 1.931
Antigüedad: 21 años, 4 meses
Puntos: 2
Respuesta: problema con upgrade en postgres

aqui es el punto donde falla.
alguien sabe de alguna manera de decirle a la conexion que la codificacion es uft8?



Public Sub conecta()
On Error GoTo conexion



Set CON = New ADODB.Connection
Set rt = New ADODB.Recordset


CON.CommandTimeout = 40
CON.CursorLocation = 1



CON.Open ("dsn=licitaciones")

Set comd.ActiveConnection = CON
comd.CommandType = 1


conexion:


If (Err.Number = Val("-2147467259")) Then
MsgBox "NO HAY CONEXION CON EL SERVIDOR CONTACTE AL ADMINISTRADOR ANEXO:713-6464,CERRANDO EL PROGRAMA", vbCritical, "ERROR"
End
End If
__________________
"Cuando se adelanta un oponente, enfréntalo y salúdalo; si intenta retroceder, déjalo seguir su camino"
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 05:21.