Copiar datos entre bases II

Estoy seguro de que funcionaría cambiando el tipo de dato de la
columna a nchar pero lo que pasa es que no puedo hacerlo porque no
tengo derechos administrativos sobre el servidor y al DBA ni se lo
planteo
De todas formas, en cuanto tenga una mejor oportunidad realizaré algo
de "ingenieria social" para ver si puedo conseguirlo ;-)
Gracias de igual modo

"Miguel Egea" wrote in message

> intenta convertir el campo de char a nchar en la base de datos y nos
> cuentas.
> saludos
> Miguel Egea
> "sergio" escribió en el mensaje
> news:
> > Hola:
> >
> > Ya tengo el problema muuuuy localizado:
> >
> > Por ejemplo, este código funciona bien:
> >
> > With objRst
> > .Open "<nombre_tabla>", objCnn, , adLockOptimistic, adCmdTable
> > .AddNew
> > .Fields("<nombre_campo>") = "01"
> > .Fields("<nombre_campo>") = "01"
> > .Fields("<nombre_campo>") = "TEXTIL"
> > On Error Resume Next
> > .Update
> > End With
> >
> > Pero esto otro NO funciona:
> >
> > With objRst
> > .Open "<nombre_tabla>", objCnn, , adLockOptimistic, adCmdTable
> > .AddNew
> > .Fields("<nombre_campo>") = "02"
> > .Fields("<nombre_campo>") = "01"
> > .Fields("<nombre_campo>") = "TÊXTIL"
> > On Error Resume Next
> > .Update 'aquí da el error debido a "TÊXTIL"
> > End With
> >
> > Me da el siguiente error:
> >
> > Err.Number: -2147467259
> > Err.Description: [IBM][CLI Driver] CLI0109E Truncamiento por la
> > derecha de los datos de la serie de caracteres. SQLSTATE"001
> > Err.Source: Microsoft OLE DB Provider for ODBC Drivers
> >
> > Esta claro que no le gusta el caracter Ê
> >
> > Si depuro campos del recordset (abriéndolo como sólo lectura desde la
> > base de datos desde la quiero copiar):
> >
> > (ok)
> > Value: TEXTIL
> > DefinedSize: 25
> > ActualSize: 25
> > Len(strValue): 6
> >
> > (ko)
> > Value: TÊXTIL
> > DefinedSize: 25
> > ActualSize: 24 "Esto no puede ser porque el tipo de columna es adChar"
> > Len(strValue): 6
> >
> > Yo me rindo pero esta claro que es problema del conjunto de
> > caracteres, ADO no se entera... y ¿qué puedo hacer?
> >
> > Gracias y perdonar mi insistencia.
> >
> > "Accotto Maximiliano D." wrote in
> message news:...
> > > y tienes el motor configurado para soportar esos caracteres?
> > >
> > >
> > >
> > > Maximiliano Damian Accotto
> > > "sergio" escribió en el mensaje
> > > news:
> > > > Hola:
> > > >
> > > > Ya se cual es el problema. Siempre que encuentro caracteres

> > > > ej. ê ñ o cualquier otro, me da problemas, pero insisto en que me

> > > > problemas si hago algo así:
> > > >
> > > > objRstOrigen.Fields.Item(j).Value objRstDestino.Fields.Item(j).Value
> > > >
> > > > si leo el valor de objRstDestino a una variable intermedia no da
> > > > problemas
> > > >
> > > > Un saludo y gracias