Dos preguntas objetos ole y fecha
Tengo una aplicación que estoy trabajando con fechas de, tengo que ingresar en un text1. El nombre del mes "enero" pero el sistema me lo entiende en ingles "January" en ya lo arregle, pero voy a otra maquina pero me resulta que "enero" que ingrese el sistema ya noes january sino enero es por el tipo de fecha e puesto set date bristh pero igual que es lo que haría, que comando utilisaria para convertir las fecha más que todo los meses maquinas, y la otra es si se puede guaradr un objetoole en algún campo o que como galarlo a fox un documento de word, pero gauradarlo en fox en algún campo
1 respuesta
Respuesta de Víctor Arturo Mercado Fernández
1
Para el problema de las fechas se me ocurre crear un arreglo (array) con el nombre de los meses en español y lo accesas de acuerdo al número de mes, esto hace tu código más transportable al no depender de archivos externos.
Function Fecha (m.dDate)
Local m.aMes
Dimension m.aMes(12)
m.aMes[01] = 'Enero'
m.aMes[02] = 'Febrero'
m.aMes[03] = 'Marzo'
.
.
.
.
m.aMes[12] = 'Diciembre'
Return NtoC( day( m.dDate ), 2 ) + ' de ' + m.aMes[ month( m.dDate ) ] + ' de ' + NtoC( year( m.dDate ), 4 )
Function NtoC( m.nNumero, m.nTamaño )
Return padl( alltrim( str( m.nNumero ) ), m.nTamaño, '0' )
------
Con respecto a lo del objeto OLE, puedes incluir un campo 'General' en tu base de datos y guardar el documento de Word (o cualquier otro documento u hoja de cálculo) en él, pero esto incrementaría el tamaño de tu archivo y complicaría la modificación del contenido del campo. Yo sugeriría que guardaras en un campo 'Carácter' la ruta de acceso al archivo.
Bueno, eso digo yo...
Function Fecha (m.dDate)
Local m.aMes
Dimension m.aMes(12)
m.aMes[01] = 'Enero'
m.aMes[02] = 'Febrero'
m.aMes[03] = 'Marzo'
.
.
.
.
m.aMes[12] = 'Diciembre'
Return NtoC( day( m.dDate ), 2 ) + ' de ' + m.aMes[ month( m.dDate ) ] + ' de ' + NtoC( year( m.dDate ), 4 )
Function NtoC( m.nNumero, m.nTamaño )
Return padl( alltrim( str( m.nNumero ) ), m.nTamaño, '0' )
------
Con respecto a lo del objeto OLE, puedes incluir un campo 'General' en tu base de datos y guardar el documento de Word (o cualquier otro documento u hoja de cálculo) en él, pero esto incrementaría el tamaño de tu archivo y complicaría la modificación del contenido del campo. Yo sugeriría que guardaras en un campo 'Carácter' la ruta de acceso al archivo.
Bueno, eso digo yo...
