exportacion desde ASP

[estudiante]

Estoy exportando una tabla a calc desde una ASP y al abrir el CALC no me aparece el borde de la tabla , como puedo hacer para que me aparezca?

[mauricio]

Hola...

No se como estes haciendo la exportación, si lo haces por código, tienes que generar los bordes por código, otra posibilidad es que uses una plantilla o aun mejor estilos...

POR FAVOR, si esto responde tu pregunta, edita el primer mensaje de este hilo y agrega al principio del título la etiqueta [RESUELTO], de esta forma conseguiremos un foro más ordenado.

Saludos

[estudiante]

Estoy haciendo la exportacion por codigo , como puedo hacer lo de los bordes, me podrias pasar algun ejemplo.Gracias!

[mauricio]

Hola...

En mi libro tienes toda la información necesaria para lograrlo: http://user.services.openoffice.org/es/ ... =50&t=1545

Por favor, si esto responde tu pregunta, edita el primer mensaje de este hilo y agrega al principio del título la etiqueta [RESUELTO], de esta forma conseguiremos un foro más ordenado.

Saludos

[estudiante]

no he logrado encontrar nada en tu libro, si alguien me puede sugerir lago le agradeceria mucho.

[mauricio]

no he logrado encontrar nada en tu libro

Eso de nada, no es verdad compañero, copio y pego de mi libro...

Los bordes de las celdas tienen muchas posibilidades, veamos algunas.

Código: Seleccionar todo

Sub FormatoCeldas14()
Dim oSel As Object
Dim oBordeLinea As New com.sun.star.table.BorderLine

        oSel = ThisComponent.getCurrentSelection()
        
        'Establecemos las características de la linea
        With oBordeLinea
                'El color (rojo)
                .Color = RGB(255,0,0)
                'El ancho de la linea exterior
                .InnerLineWidth = 50
                'El ancho de la linea interior
                .OuterLineWidth = 50
                'La distancia entre las lineas
                .LineDistance = 20
        End With

        'Establecemos los bordes
        With oSel
                .TopBorder = oBordeLinea                'Superior
                .BottomBorder = oBordeLinea             'Inferior
                .LeftBorder = oBordeLinea               'Izquierdo
                .RightBorder = oBordeLinea              'Derecho
        End With                

End Sub

El ancho de las lineas y la distancia entre ellas esta dada en centésimas de milímetros, si establecemos solo una de las dos líneas, veras una linea simple. Si deseas establecer también las líneas diagonales, usa la propiedad DiagonalTLBR para la línea que va desde la esquina superior izquierda a la inferior derecha y DiagonalBLTR para la que va de la esquina inferior izquierda a la superior derecha, tienes que establecerles la misma estructura de línea (com.sun.star.table.BorderLine) vista en los ejemplos.

El código anterior te establecerá el borde de cada celda del rango seleccionado, si quieres establecer el borde de solo los extremos del rango, tiene que usar la estructura TableBorder.

Código: Seleccionar todo

Sub FormatoCeldas15()
Dim oSel As Object
Dim oBordeLinea As New com.sun.star.table.BorderLine
Dim oBordeTabla As New com.sun.star.table.TableBorder

        oSel = ThisComponent.getCurrentSelection()
                
        'Establecemos las características de la linea
        With oBordeLinea
                'El color (azul)
                .Color = RGB(0,0,255)
                'El ancho de la linea interior
                .OuterLineWidth = 75
        End With

        'Establecemos las características de la tabla
        With oBordeTabla
                .TopLine = oBordeLinea                  'Superior
                .IsTopLineValid = True
                .BottomLine = oBordeLinea               'Inferior
                .IsBottomLineValid = True
                .LeftLine = oBordeLinea                 'Izquierdo
                .IsLeftLineValid = True
                .RightLine = oBordeLinea                'Derecho        
                .IsRightLineValid = True
        End With
        
        'Establecemos los bordes
        oSel.TableBorder = oBordeTabla
                
End Sub

Las propiedades IsTopLineValid, IsBottomLineValid, IsLeftLineValid y IsRightLineValid, tienes que establecerlas en verdadero (true) si quieres que se vea la línea.

[estudiante]

hasta aqui voy bastante bien pero lo que no hacierto es donde llamar a la funcion en el ASP, me podriais ayudar?

[estudiante]

en el primer post que escribiste dijiste que otra opcion seria con estilos? como podria hacerlo,esque tengo prisa y me gustaria zanjar cpn este tema cuanto antes

[estudiante]

todavia sigo dandole vueltas ha esto alguien me prodia dar una solucion?

el problema es que pongo la funcion que me ha pasado Maurico en mi ASP PERO NOSE COMO LLAMAR A ESA FUNCION YA QUE LAS COSAS QUE HE PROBADO NO ME FUNCIONAN.

sI NO me podeis ayudar con esto agradeceria que me dierais alguna otra solucion.

Muchas gracias

[mauricio]

Hola...

Si nadie te ha contestado, puede haber muchas razones, dos de ellas pueden ser o nadie sabe la respuesta, o no desean contestarte...

ASP es tema diferente a estos foros, en lo personal jamas la he usado, menos ahora que llevo años sin usar Windows, una simple búsqueda en tu buscador favorito puede ayudarte, lo único que te falta es conectar ASP con OOo

http://www.oooforum.org/forum/viewtopic ... 8a57c271bd
http://forums.devx.com/showthread.php?t=167610

Por lo que veo, conectar en ASP es muy similar a hacerlo desde VB, puedes buscar también por ahí...

Por favor, si esto responde tu pregunta, edita el primer mensaje de este hilo y agrega al principio del título la etiqueta [RESUELTO], de esta forma conseguiremos un foro más ordenado.

Saludos