Campo Memo

20/10/2003 - 16:02 por Alexander | Informe spam
Hola a todos!
Tengo una BD en Access2000Pro Esp. pequeña la cual
captura una informacion para imprimir en unos formuarios
preimpresos.
La idea es que en uno de los campos por el tamaño lo he
creado tipo memo, pero ahi tengo un pequeño problema pues
le he creado una opcion por codigo que cuando llegue la
un limite de caracteres me emita un mensaje "LLego al
tope" pero cuando sucede esto se borra la gran mayoria de
la informacion de ese campo que se ha ingresado y quiero
evitar que eso suceda( Que se borre el contenido del
campo).
este es el codigo que he escrito en la opcion al cambiar
Private Sub DescriptionOfPackagesGoods_Change()
If Len(Me.DescriptionOfPackagesGoods.Text) >= 1100
Then
Me.DescriptionOfPackagesGoods.Value = Left
(Me.DescriptionOfPackagesGoods.Text, 1100)
Me.DescriptionOfPackagesGoods.SelStart = 1100
MsgBox "Se ha llegado al tope"
End If
End Sub
Quiero saber cual puede ser el error o donde hay que
hacer algun cambio para que funcione adecuadamente lo que
se quiere.
Agradezco la colaboracion.
Alexander
Bogota-Colombia.

Preguntas similare

Leer las respuestas

#1 Juan M. Afan de Ribera
20/10/2003 - 19:32 | Informe spam
Hola Alexander,

yo he hecho una prueba con el código que pones aquí y no me ha hecho nada
raro. Al llegar al límite de caracteres, ha recortado la longitud del campo
y ha mostrado un mensaje, quedando el cursor en la última posición. La
totalidad del mensaje estaba ahí. ¿Tienes algún código más que no hayas
mostrado aquí y que pudiera provocar lo que comentas?

Saludos desde Barcelona
Juan M. Afan de Ribera
<MVP Ms Access>
http://www.juanmafan.tk
http://www.clikear.com/webs4/juanmafan


"Alexander" escribió en el mensaje
news:090001c39712$d933c500$
Hola a todos!
Tengo una BD en Access2000Pro Esp. pequeña la cual
captura una informacion para imprimir en unos formuarios
preimpresos.
La idea es que en uno de los campos por el tamaño lo he
creado tipo memo, pero ahi tengo un pequeño problema pues
le he creado una opcion por codigo que cuando llegue la
un limite de caracteres me emita un mensaje "LLego al
tope" pero cuando sucede esto se borra la gran mayoria de
la informacion de ese campo que se ha ingresado y quiero
evitar que eso suceda( Que se borre el contenido del
campo).
este es el codigo que he escrito en la opcion al cambiar
Private Sub DescriptionOfPackagesGoods_Change()
If Len(Me.DescriptionOfPackagesGoods.Text) >= 1100
Then
Me.DescriptionOfPackagesGoods.Value = Left
(Me.DescriptionOfPackagesGoods.Text, 1100)
Me.DescriptionOfPackagesGoods.SelStart = 1100
MsgBox "Se ha llegado al tope"
End If
End Sub
Quiero saber cual puede ser el error o donde hay que
hacer algun cambio para que funcione adecuadamente lo que
se quiere.
Agradezco la colaboracion.
Alexander
Bogota-Colombia.
Respuesta Responder a este mensaje
#2 Búho
20/10/2003 - 19:49 | Informe spam
Hola Alexander. Yo tambien he hecho pruebas y me funciona bien.
No obstante si dicho campo le rellenas con saltos de linea, retornos de
carro etc, ten presente que tambien cuentan a la hora contar los caracteres,
aunque no se vean


Saludos desde Valladolid
Francisco Javier García Aguado

http://www.buho.tk
http://www.clikear.com/webs/accessbhuo/
http://groups.msn.com/Access2000VisualBasic/

.
Respuesta Responder a este mensaje
#3 Alexander
20/10/2003 - 23:57 | Informe spam
Hola CarCar
No se a que parche te refieres, pues esta actualizada la
version del officce.
O prefieres que anexe la BD y la miras pues no es grande
(1.8KB) si prefieres la comprimo.
Agradezco colaboracion al respecto.
Alexander
Hola, Alexander:

He creado en Access 97 una tabla con un campo que se


llama
exactamente igual que el tuyo, un formulario para
actualizar la tabla y el procedimiento que indicas
funciona PERFECTAMENTE. He hecho lo mismo en un


Microsoft
Access 2000 (9.0.2812) y también funciona correctamente.

Mira de bajarte de la web de Microsoft el último parche
del producto... no se me ocurre nada más. :-(

Saludos,
CarCar
MVP-Access


Hola a todos!
Tengo una BD en Access2000Pro Esp. pequeña la cual
captura una informacion para imprimir en unos




formuarios
preimpresos.
La idea es que en uno de los campos por el tamaño lo he
creado tipo memo, pero ahi tengo un pequeño problema




pues
le he creado una opcion por codigo que cuando llegue la
un limite de caracteres me emita un mensaje "LLego al
tope" pero cuando sucede esto se borra la gran mayoria




de
la informacion de ese campo que se ha ingresado y




quiero
evitar que eso suceda( Que se borre el contenido del
campo).
este es el codigo que he escrito en la opcion al cambiar
Private Sub DescriptionOfPackagesGoods_Change()
If Len(Me.DescriptionOfPackagesGoods.Text) >= 1100
Then
Me.DescriptionOfPackagesGoods.Value = Left
(Me.DescriptionOfPackagesGoods.Text, 1100)
Me.DescriptionOfPackagesGoods.SelStart = 1100
MsgBox "Se ha llegado al tope"
End If
End Sub
Quiero saber cual puede ser el error o donde hay que
hacer algun cambio para que funcione adecuadamente lo




que
se quiere.
Agradezco la colaboracion.
Alexander
Bogota-Colombia.
.



.

Respuesta Responder a este mensaje
#4 CarCar
21/10/2003 - 08:46 | Informe spam
Hola:

Si quieres enviarme la base de datos, por favor que sea
comprimida, hazlo a esta cuenta:
ccarpiohARROBAterraPUNTOes. Cuando me refiero al último
parche del producto, me refiero a la última versión del
mismo de la Web de Microsoft, después de leer lo que han
dicho los compañeros Búho y Juan M. me reafirmo en que
debe de ser un Bug de la versión que tienes instalada.

Saludos,
CarCar
MVP-Access


Hola CarCar
No se a que parche te refieres, pues esta actualizada la
version del officce.
O prefieres que anexe la BD y la miras pues no es grande
(1.8KB) si prefieres la comprimo.
Agradezco colaboracion al respecto.
Alexander
Hola, Alexander:

He creado en Access 97 una tabla con un campo que se


llama
exactamente igual que el tuyo, un formulario para
actualizar la tabla y el procedimiento que indicas
funciona PERFECTAMENTE. He hecho lo mismo en un


Microsoft
Access 2000 (9.0.2812) y también funciona correctamente.

Mira de bajarte de la web de Microsoft el último parche
del producto... no se me ocurre nada más. :-(

Saludos,
CarCar
MVP-Access


Hola a todos!
Tengo una BD en Access2000Pro Esp. pequeña la cual
captura una informacion para imprimir en unos




formuarios
preimpresos.
La idea es que en uno de los campos por el tamaño lo he
creado tipo memo, pero ahi tengo un pequeño problema




pues
le he creado una opcion por codigo que cuando llegue la
un limite de caracteres me emita un mensaje "LLego al
tope" pero cuando sucede esto se borra la gran mayoria




de
la informacion de ese campo que se ha ingresado y




quiero
evitar que eso suceda( Que se borre el contenido del
campo).
este es el codigo que he escrito en la opcion al cambiar
Private Sub DescriptionOfPackagesGoods_Change()
If Len(Me.DescriptionOfPackagesGoods.Text) >= 1100
Then
Me.DescriptionOfPackagesGoods.Value = Left
(Me.DescriptionOfPackagesGoods.Text, 1100)
Me.DescriptionOfPackagesGoods.SelStart = 1100
MsgBox "Se ha llegado al tope"
End If
End Sub
Quiero saber cual puede ser el error o donde hay que
hacer algun cambio para que funcione adecuadamente lo




que
se quiere.
Agradezco la colaboracion.
Alexander
Bogota-Colombia.
.



.



.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida