Aprendiendo macros OOo Basic [20-Mayo-15]

Desarrollo de Macros y programación en UNO, usar las API, llamar programas externos...

Aprendiendo macros OOo Basic [20-Mayo-15]

Notapor mauricio » Vie Jul 24, 2009 8:30 am

20-Mayo-15
Después de un tiempo fuera, vuelve a estar en línea mi libro para aprender macros.
Ahora, tiene si propio repositorio en GitHub: https://github.com/UniversoLibreMexicoAC/book-macros-basic
Aquí puedes descargarlo directamente.
Si cada uno de los usuarios de este libro donara un dólar, propia fácilmente revisarlo y actualizarlo.


14-Ago-14
Nuestro compañero Eduardo se ha tomado el trabajo de revisar mi libro, actualizarlo y corregirle sus errores y horrores, muchas gracias Eduardo.
Pueden descargar su versión desde aquí: https://drive.google.com/file/d/0B8RJYjxPQ3ubbFhxcEN6TXpOTlE/edit?usp=sharing

27-Jul-10

Estimados Amigos:

Por fin puedo dar por terminado mi libro de OOo Basic, al menos la sección de Calc y estoy muy feliz por ello, hoy mismo he terminado de revisarlo completamente, por cierto, el excelente corrector gramatical me ayudo a encontrar muchos errores y horrores: http://user.services.openoffice.org/es/ ... 627#p11627

Lo nuevo que pueden ver en el es:

  • Agregue un pequeño pero importante tema de estructuras en variables y su uso en matrices
  • Agregue capturas de pantalla que faltaban
  • Completamente revisado con la reciente 3.2.1
  • Un proyecto final "casi" completo, y digo casi por que lo poco que queda es para su tarea, un sencillo pero funcional sistema de
    facturación de poco más de 3,000 líneas de código, esta adaptado para México, pero creo que esta lo suficientemente comentado para que lo puedan adaptar a cualquier otra latitud, es importante bajar el archivo del código fuente del libro, en el viene el proyecto final completo y uno que otro archivo de "pilon"...

Para más información de este puedes visitar: http://www.universolibre.org/node/8

Si les parece que vale la pena los invito a difundirlo en sus bitácoras o páginas favoritas, y si no ya saben, no sean chismosos.

Antes de empezar con el siguiente libro que creo será Base, me tomaré unas merecidas vacaciones, las cuales están cordialmente invitados a sufragar...

Un abrazo desde tierras mexicanas...



18-Jun-10

Por si fuera de su interés, he terminado de revisar el libro completamente con la recién publicada 3.2.1 de nuestro querido OOo, he agregado más capturas de pantalla y algunas que faltaban, también he avanzado un poco en el proyecto final.

Agradeceré la actualización de los espejos. Importante: he movido los archivos a un nuevo servidor por cuestión de costos en las transferencias.

Como siempre, lo pueden descargar en la página de http://www.universolibre.org

Un abrazo desde tierras mexicanas.


22-Oct-09

Por si fuera de su interés, he actualizado algunos temas del libro

9 - Trabajando con eventos
9.1 - Eventos de la aplicación
9.2 - Asignando eventos en controles
9.3 - Principales eventos en controles
9.3.1 - Evento “Botón del ratón pulsado” – Clic de ratón
9.3.2 - Evento “Botón del ratón soltado”
9.3.3 - Evento “Ratón dentro” – Puntero encima
9.3.4 - Evento “Ratón fuera” – Puntero fuera
9.3.5 - Evento “Movimiento del ratón”
9.3.6 - Evento “Mover ratón por medio del teclado” - Movimiento de ratón con tecla pulsada
9.3.7 - Evento “Recepción de foco” - Al activar área
9.3.8 - Evento “Al perder el foco” - Al desactivar área
9.3.9 - Evento “Tecla pulsada”
9.3.10 - Evento “Después de haber pulsado la tecla” - Tecla soltada
9.3.11 - Otros eventos

Agradeceré la actualización de los espejos.
Como siempre, lo pueden descargar en la página de http://www.universolibre.org

Un abrazo desde tierras mexicanas.


04-Oct-09

Por si fuera de su interés, he actualizado algunos temas del libro

8 - Trabajando con cuadros de dialogo
8.1 - Botón de comando (CommandButton)
8.2 - Control gráfico (ImageControl)
8.3 - Casilla de verificación (CheckBox)
8.4 - Cuadro de grupo (FrameControl)
8.5 - Botón de opción (OptionButton)
8.6 - Etiqueta (Label)
8.7 - Campo de texto (TextField)
8.8 - Cuadro de lista (ListBox)
8.9 - Cuadro combinado (ComboBox)
8.10 - Barra de desplazamiento (ScrollBar)
8.11 - Barra de progreso (ProgressBar)
8.12 - Línea (FixedLine)
8.13 - Control de archivo (Filecontrol)
8.14 - Control de árbol (TreeControl)
8.15 - Otros controles

Los controles de los cuadros de diálogo, comparten la mayoría de los métodos y propiedades de los controles de formularios vistos en el tema anterior, por lo que este capítulo es cortito, ya que solo menciono las diferencias importantes y algún nuevo control.
Agradeceré la actualización de los espejos.
Como siempre, lo pueden descargar en la página de http://www.universolibre.org/

El siguiente (y ultimo) tema a desarrollar es "Trabajando con eventos"

Un abrazo desde tierras mexicanas.



22-Sep-09

Por si fuera de su interés, hay una nueva actualización de mis apuntes, con los temas nuevos:

7 - Trabajando con formularios
7.1 - Formularios (Forms)
7.2 - Etiquetas (Label)
7.3 - Cuadros de texto (TextBox)
7.4 - Casilla de verificación (CheckBox)
7.5 - Campo formateado (FormattedField)
7.6 - Botón de comando (CommandButton)
7.7 - Botón de opción (OptionButton)
7.8 - Cuadro de lista (ListBox)
7.9 - Cuadro combinado (ComboBox)
7.10 - Botón de selección (SpinButton)
7.11 - Barra de desplazamiento (ScrollBar)
7.12 - Otros controles
7.12.1 - Botón gráfico (ImageButton)
7.12.2 - Control de imagen (ImageControl)
7.12.3 - Selección de archivo (FileSelection)
7.12.4 - Campo de fecha (DateField)
7.12.5 - Campo de hora (TimeField)
7.12.6 - Campo numérico (NumericField)
7.12.7 - Campo moneda (CurrencyField)
7.12.8 - Campo enmascarado (PatternField)
7.12.9 - Cuadro de grupo (GroupBox)
7.12.10 - Control de tablas (TableControl)
7.12.11 - Barra de navegación

Casi 50 nuevas páginas de trabajo, siguiente tema en redacción "Trabajando con cuadros de dialogo"
Agradeceré la actualización de los espejos.
Como siempre, lo pueden descargar en la página de http://www.universolibre.org/
Un abrazo desde tierras mexicanas.


06-Sep-09
Por si fuera de su interés, tenemos una nueva actualización de mi libro, y ya casi estamos terminando (al menos una primer parte bastante amplia), por los valiosos comentarios de mi amigo Ismael de http://superalumnos.net/, le he dado una nueva estructura a este.

Los temas nuevos son:
6.11 - Funciones personalizadas
6.12 - Configuración global de Calc

Ahora, empiezo la redacción de dos temas no menores, el trabajo con formularios y con cuadros de dialogo, temas bastantes solicitados.
Como siempre, lo pueden descargar en la página de http://www.universolibre.org/

Saludos


26-Ago-09 - Terminados los temas

6.10 - Trabajando con elementos gráficos
6.10.1 - Trabajando con imágenes
6.10.2 - Trabajando con autoformas
6.10.2.1 - Principales propiedades de línea.
6.10.2.2 - Principales propiedades de relleno
6.10.2.3 - Principales propiedades de sombra
6.10.2.4 - Otras propiedades de las autoformas
6.10.2.5 - Agrupando y desagrupando formas
6.10.2.6 - Trabajando con FontWork
6.10.2.7 - Propiedades particulares de algunas formas


22-Ago-09 - Terminado el siguiente tema

6.9 - Graficando datos

17-Ago-09 - Por si fuera de su interés, hay una nueva actualización de mis apuntes, con los temas:

6.8 - Bases de datos
6.8.1 - Importando datos
6.8.2 - Insertando nuevos datos
6.8.3 - Actualizando datos
6.8.4 - Borrando datos

Los archivos para descargar en la siguiente página http://www.universolibre.org/

Es importante, esta vez, que descarguen el archivo con los ejemplos, pues en ellos van dos bases de datos que se usan en los temas actualizados.

Los compañeros que amablemente tienen un espejo, favor de actualizarlos. Como siempre, espero sus comentarios y mejoras.

Un abrazo a todos desde tierras mexicanas.


Mauricio
Última edición por mauricio el Mié May 20, 2015 9:53 pm, editado 24 veces en total
Razón: Actualización del libro
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO

Notapor RGB-es » Vie Jul 24, 2009 11:28 am

El único comentario que tengo por el momento es: ¡muchas gracias!
Pongo el tema como "fijo" para que sea más visible.
¡Muchas gracias por tu gran trabajo! :bravo:
No respondo mensajes privados sobre AOO, por favor, utilice el foro para sus preguntas

AOO/LibO en openSUSE con escritorio Plasma
---
Existen dos clases de personas: las que dicen que existen dos clases de personas y las que no.
Avatar de Usuario
RGB-es
 
Mensajes: 4738
Registrado: Lun Nov 24, 2008 10:46 am

Re: Apuntes de OOo Basic ACTUALIZADO (02-Ago-09)

Notapor cmarcen » Mié Ago 05, 2009 6:59 am

Estoy siguiendo estos apuntes. Se me ha abierto el cielo porque quería abandonar MS y tenían unas macros en VB que me habían costado mucho. He conseguido reproducirlas con OOo Basic. Espero la continuación como agua de mayo.
Muchas gracias.
OpenOffice 3.1 en Windows XP
cmarcen
 
Mensajes: 6
Registrado: Mié Ago 05, 2009 6:56 am

Re: Apuntes de OOo Basic ACTUALIZADO (08-Ago-09)

Notapor mauricio » Sab Ago 08, 2009 11:19 pm

Hola...

Que bueno que te han servido, me es muy útil la retroalimentación para el desarrollo de más temas, ojala puedas enviarme tus comentarios a mi correo personal.

Gracias

Mauricio
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (17-Ago-09)

Notapor cmarcen » Mar Ago 18, 2009 8:00 pm

Hola Mauricio,

Como digo más arriba, los apuntes me parecen excelentes y estoy esperando la nuevas actualizaciones.
Permíteme una sugerencia que podría ayudar a los usuarios que se inician en OpenOffice-Basic.
Se trata del acceso a documentos cuando se trata con cuando no se trabaja con uno solo.
Creo que permitiría crear un documento con las macros y colocar los botones en un formulario.
Yo he resuleto el problema del modo siguiente.
Código: Seleccionar todo   Expandir vistaContraer vista
- Defino variables globales para cada documento:
Public docMacros, DocTodos,  DocMatricula, DocNiveles, DocMaterias as object
- Después los abro con la siguiente rutina:
   DocMatricula=AbreDoc("matricula.ods")
   DocNiveles=AbreDoc("niveles.ods")
   DocMaterias=AbreDoc("materias.ods")

function AbreDoc(doc as string)
dim i as integer
dim lExiste as boolean
dim urlDoc
dim Dummy()

UrlDoc =url+doc

   'Genera una lista de domumentos abiertos en la matriz NombreDocumentos
   ListaDocumentos
   'Comprueba si ya está abierto
   for i=0 to  UBound( NombreDocumentos() )
      lExiste=(doc=NombreDocumentos(i))
      if lExiste then
         AbreDoc=aDocumentos(i)
         exit function
      end if
   next
   ' Si no está abierto lo abre
   if not lExiste then
      AbreDoc=StarDesktop.LoadComponentFromURL(urlDoc,doc,0,Dummy())
   end if

end function

- Luego accedo del modo siguiente:

....
hojaOrigen=docMatricula.sheets(0)
hojaDestino=docTodos.sheets(0)
....
...
      aRegistro(12)=hojaOrigen.getCellByposition(1,fila).string
      aRegistro(13)=hojaOrigen.getCellByposition(2,fila).string
      aRegistro(14)=hojaOrigen.getCellByposition(3,fila).string
...
...
...
      for i=0 to  UBound( aRegistro() )
         hojaDestino.getCellByposition(i,fila).string=aRegistro(i)
      next


Espero que esta sugerencia puedas incluirla, a mi me habría ahorrado mucho tiempo de búsqueda.
Saludos
Carlos
OpenOffice 3.1 en Windows XP
cmarcen
 
Mensajes: 6
Registrado: Mié Ago 05, 2009 6:56 am

Re: Apuntes de OOo Basic ACTUALIZADO (17-Ago-09)

Notapor mauricio » Mar Ago 18, 2009 8:16 pm

Hola Carlos...

Gracias por la sugerencia, la revisare con calma y lo consideraré...

Como vez el día de ayer hubo actualización, tal vez podrías considerar pasar tus datos a una base de datos...

Saludos

Mauricio
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (17-Ago-09)

Notapor cmarcen » Mar Ago 18, 2009 8:59 pm

Hola Mauricio

Por supuesto que estoy muy interesado en la base de datos.
Mis últimos pinitos los hacía en MSAccess
El trabajo del post anterior consiste en exportar datos de un programa de gestión (evaluación de un centro), exporta en CSV y tengo que manipularlos para obtener otras tablas para otro programa.
Supongo que con bases de datos tambíen podría optimizar el trabajo y exportar las tablas.
Gracias y saludos

Carlos
OpenOffice 3.1 en Windows XP
cmarcen
 
Mensajes: 6
Registrado: Mié Ago 05, 2009 6:56 am

Re: Apuntes de OOo Basic ACTUALIZADO (17-Ago-09)

Notapor mauricio » Mar Ago 18, 2009 9:02 pm

Hola...

Si estas manipulando CSV, tal vez te interese el siguiente hilo:

viewtopic.php?f=50&t=1640

En el, subí un ejemplo de como manipular un CSV, puede adaptarse al formato del tuyo.

Saludos

Mauricio

P.D. Pronto empezare la redacción de Base con OOo Basic
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (06-Sep-09)

Notapor Alfredo_9172 » Mar Sep 08, 2009 3:17 am

Hola, baje los apuntes y voy en la pagina 21, ¡wow! muchas gracias, enserio que me sorprendo de que haya gente que comparta sus conocimientos sin pedir $$nada$$ a cambio.
De nuevo gracias y mis respetos por tu desinteres.

Saludos
Open Office 3.1.0 y esta instalado en Sistema operativo: Windows XP Profesional SP3,ubuntu 9.04
Alfredo_9172
 
Mensajes: 35
Registrado: Jue Ago 27, 2009 6:42 pm
Ubicación: Guadalajara Jalisco

Re: Apuntes de OOo Basic ACTUALIZADO (22-Sep-09)

Notapor caifanmmx » Dom Sep 27, 2009 6:57 pm

Estimado Mauricio mi nombre es Lenin y ante todo quisiera agradecerte infinitamente tus estupendos aportes apenas voy a leer tu manual me ha surgido el interes en programar en calc debido a que actualmente trabajo en el imss y ahi solo utilizan openoffice y realmente me he quedado fascinado con la versatilidad de las macros y procedures que hay .. Ante todo que bueno que un Mexicano sea el que enaltezca mediante este tipo de material nuestro pais de antemano mucha suerte y si hay alguna duda en particular pudiese contar con tu apoyo
Un abrazo desde Ecatepec Estado de Mexico
OPEN OFFICE 3.1.1 EN MANDRIVA 2009.1
caifanmmx
 
Mensajes: 1
Registrado: Dom Sep 27, 2009 6:43 pm

Re: Apuntes de OOo Basic ACTUALIZADO (22-Sep-09)

Notapor mauricio » Lun Sep 28, 2009 2:24 am

Hola Lenin:

Si, estoy enterado que en el IMSS están usando OOo, también se que los responsables de esta implementación están un poco desligados de la comunidad OOo, eso podría cambiar vía los usuarios, como tu, felicidades por tu interés e invita a tus compañeros de trabajo a sumarse a la comunidad. Por supuesto que cuentan con mi apoyo, pueden resolver sus dudas, este foro donde procuro responder frecuentemente.

Supongo que has de trabajar en el D.F., ¿no?, de todos modos Ecatepec no esta muy lejos y conozco, pues viví unos años en la vecina Tultitlan

Saludos

Mauricio
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (04-Oct-09)

Notapor cmarcen » Lun Oct 05, 2009 8:01 pm

Felicidades y muchas gracias por el trabajo realizado.
Es una gran ayuda tener una guía tan bien estructurada.
Ahora echaremos de menos un documento similar dedicado la las bases de datos.
Me estoy planteando si entrar en este tema desde OOo Basic o dedicarme directamente a MySql, Creo que el segundo caso puede ser más interesante de cara a una gestión en red local de un programa de facturación.
Ahor atengo mucho trabajo, pero a un año vista tendré más tiempo y me gustaría colaborar en un trabajo de gestión de bases de datos.
Lo último serio que hice fue en Cliper.
Saludos.
OpenOffice 3.1 en Windows XP
cmarcen
 
Mensajes: 6
Registrado: Mié Ago 05, 2009 6:56 am

Re: Apuntes de OOo Basic ACTUALIZADO (04-Oct-09)

Notapor mauricio » Sab Oct 10, 2009 7:17 am

Hola...

Gracias por tus palabras. Si, estoy de acuerdo contigo, hace falta algo así para las bases de datos, por ello, tengo contemplado empezarlo en cuanto termine este dedicado a la hoja de calculo, de hecho, estos tres últimos temas, Formularios, Cuadros de diálogo y Eventos (en desarrollo), sirven para cualquiera de las aplicaciones de OOo, por lo que aprovecharemos esta documentación ya generada.

¡¡Clipper!!, muy buen lenguaje de programación, pero tiene como quince años que no toco una línea de este lenguaje, ahora estoy con OOo Basic y Phyton.

Toda colaboración para la comunidad es bien recibida, hay mucho trabajo por delante y no necesariamente tienen que saber programar.

Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (22-Oct-09)

Notapor emari2 » Lun Nov 16, 2009 5:11 pm

Impresionante y felicidades. Echo de menos algo que ando buscando y no soy capaz a sacarlo
aunque lo intentaré, pero Vds. si que lo podrían poner en el manual,.
Se trata de exportar una hoja completa de ooocalc a la base de datos ooobase y despues actualizar
la base a medida que se va modificando la hoja.
Les explico el problema para mejor comprensión
Tengo una tabla con los siguientes campos
Nombre 1er. examen parcial 2nd. examen parcial examen final notaMedia actitudenclase Nota final

Luis 5.2 6.1 Marcela 3.4 3.8

etc. asi hasta 30 alumnos.
Lo que he hecho ha sido crear la base de datos y seleccionar el rango(en la hoja de calculo) con los nombres que luego(después) se convierten en nombres del campo en
la base de datos y pegarla dentro de la base, con lo que ya se genera la tabla. Como este paso lo tengo que hacer una sola vez, es fácil y no necesito hacerlo por código. Por lo que ya tengo la base
de datos de alumnos con las notas del 1er y 2do parcial.
Una vez que hacen el examen final que introduzco en la hoja de cálculo, quiero actualizar la base de datos. Esto quiero hacerlo con un pushbutton
en la propia hoja que al pulsar ejecuta la macro de actualización de la base de datos. Y asi para los otros datos. De tal manera que haga uso
del boton, las veces que sean necesarias.
Es un poco pedirles la expansión del apartado Exportación mutatis mutandis como el de Importación. Como el nombre puede cambiar o modificarse por mal escrito o cualquier nota previa también por erronea
la necesidad es no solo exportar un campo concreto(nota final) sino todas de nuevo para asimilar los cambios que pudieran haberse realizado.
Saludos Cordiales
OpenOffice 3.1
emari2
 
Mensajes: 5
Registrado: Sab Nov 14, 2009 8:34 pm

Re: Apuntes de OOo Basic ACTUALIZADO (22-Oct-09)

Notapor mauricio » Lun Nov 16, 2009 7:19 pm

Hola...

Por favor que no te ofendan mis palabras, lo aclaro, porque por estos lares son muy susceptibles, pero soy muy directo y no dejaré de serlo solo por algunos.

Recibo constantemente solicitudes de este tipo, es decir, poner cosas en el manual que resuelven una necesidad concreta de un usuario, y esa no es la idea de los apuntes. Te confieso algo, en el libro están las bases suficientes y ejemplos suficientes para resolver lo que estas planteando.

Te invito a que, como dices, lo intentes, publica tus avances o dudas particulares (y concretas) en este foro, que estaré en la mejor disposición de ayudarte.

Saludos y un abrazo.
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (22-Oct-09)

Notapor emari2 » Mié Nov 18, 2009 7:55 am

Gracias Mauricio. Lo he intentado y lo he conseguido. Lo que más me costó ha sido la sSQL porque no encontraba bien el camino. Quizá no es lo más elegante. Yo creo que lo mejor sería actualizar un registro de la Calc en un registro de Base.
Ahi va mi código
Código: Seleccionar todo   Expandir vistaContraer vista
Sub Actualizar_Base
Dim oHoja As Object
Dim oCelda As Object
'Hacemos una referencia a la hoja activa
oHoja = ThisComponent.getCurrentController.getActiveSheet()
Dim Col As Long
Dim Fil As Long
dim nombre as string
dim primerparcial as string
dim final as string
dim ejerciciosclase as string
dim notrafinal1 as string
dim actitud as string
dim notafinal as string
Dim oDBC As Object
Dim oBD As Object
Dim oConexion As Object
Dim oDeclaracion As Object
Dim sBaseDatos As String
Dim sSQL As String
dim URL

URL=thisComponent.URL
url=Mid(URL,1,len(URL)-9)
'
sBaseDatos=url+ "curso.odb"


col=0
fil=5
dim i as integer
dim j as integer
'aqui se declara la base y se abre
'se hace que se pueda leer el primer registro

j=2
for i=fil to fil+41

oCelda = oHoja.getCellByPosition( Col,i )

nombre=oCelda.getString()
  if len(nombre)=0 then
exit for
end if

oCelda = oHoja.getCellByPosition( Col+1,i )
primerparcial=oCelda.getString()
  if len(primerparcial)=0 then
primerparcial=""
end if
oCelda = oHoja.getCellByPosition( Col+2,i )
final=oCelda.getString()
if len(final)=0 then
final=""
end if

oCelda = oHoja.getCellByPosition( Col+3,i )
ejerciciosclase=oCelda.getString()
  if len(ejerciciosclase)=0 then
ejerciciosclase=""
end if
oCelda = oHoja.getCellByPosition( Col+4,i )
notafinal1=oCelda.getString()
  if len(notafinal1)=0 then
notafinal1=""
end if
oCelda = oHoja.getCellByPosition( Col+5,i )
actitud=oCelda.getString()
  if len(actitud)=0 then
actitud=""
end if
oCelda = oHoja.getCellByPosition( Col+6,i )
notafinal=oCelda.getString()
if len(notafinal)=0 then
notafinal=""
end if
 


sSQL = "UPDATE ""simix1"" SET ""NOMBRE""='" & nombre & "'," & """primerparcial""" &  "='" & primerparcial   &  "'," &  """final""" &  "='" & final   &  "'," &  """ejerciciosclase""" &  "='" & ejerciciosclase   &  "'," &  """notafinal1""" &  "='" & notafinal1   &  "'," &  """actitud""" &  "='" & actitud   &  "'," &  """notafinal""" &  "='" & notafinal   &  "' WHERE ""ID""=" & j &""


   oDBC = createUnoService("com.sun.star.sdb.DatabaseContext")   
   oBD = oDBC.getByName(sBaseDatos)
   
   oConexion = oBD.getConnection("","")
   oDeclaracion = oConexion.createStatement()
   oDeclaracion.executeUpdate( sSQL)


'luego se pasa al siguiente registro
'y luego se cierra la base
j=j+1   
next i
   oDeclaracion.close()
   oConexion.close()
   oDeclaracion = Nothing
   oConexion = Nothing

End Sub



Gracias por todo
OpenOffice 3.1
emari2
 
Mensajes: 5
Registrado: Sab Nov 14, 2009 8:34 pm

Re: Apuntes de OOo Basic ACTUALIZADO (22-Oct-09)

Notapor emari2 » Mié Nov 18, 2009 6:27 pm

Aunque yo lo que realmente ando buscando pero no encuentro la solución es a una actuación exactamente igual a esta(mutatis mutandis)

Sub appProb()

On Error GoTo 1

Dim XLTable As TableDef

Set Db = OpenDatabase(mdbFile)
Set XLTable = Db.CreateTableDef("tblProbTemp")

XLTable.Connect = "Excel 5.0;DATABASE=" & xlsFile
XLTable.SourceTableName = "tblXLProb"
Db.TableDefs.Append XLTable

strSQL = "Insert into tblProb Select * FROM tblProbTemp"
Db.Execute strSQL

1:
Err.Clear
On Error Resume Next
Db.TableDefs.Delete "tblProbTemp"
Db.Close
OpenOffice 3.1
emari2
 
Mensajes: 5
Registrado: Sab Nov 14, 2009 8:34 pm

Re: Apuntes de OOo Basic ACTUALIZADO (22-Oct-09)

Notapor atribis » Sab Ene 30, 2010 12:23 am

Le he echado un primer vistazo al manual y tiene muy buena pinta, seguro que me ayuda un montón. Muchas gracias por compartirlo :D
OpenOffice 3.1 en Windows 7
atribis
 
Mensajes: 3
Registrado: Dom Ene 24, 2010 8:47 pm

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor RMG » Vie Jul 30, 2010 10:44 am

Pues nada Mauricio, que disfrutes de tus ganadas vacaciones. Tanto como sufragarte las vacaciones, que más pudiera uno, pero si vienes al viejo continente, concretamente a Valencia, seguro que si te puedo invitar a una paella de las autenticas (cocinada por mi).

Te animo a que el proximo proyecto sea para Base, lo estoy deseando con ansiedad.

Un abrazo, y que pases unas felices vacaciones
Ramón
OpenOffice 4.1.5 y LibreOffice 5.4.5.1 en W-10, y LibreOffice 4.1.6.2 en Open Suse 13.1(VirtualBox)
RMG
 
Mensajes: 3337
Registrado: Mar Nov 17, 2009 6:59 am
Ubicación: Valencia - España

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor mauricio » Vie Jul 30, 2010 6:07 pm

Que conste, ya apunte Valencia como punto obligatorio de paso ahora que vaya a Europa...

Un abrazo.
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor pedrito76 » Sab Jul 31, 2010 10:23 am

mauricio, no olvide Sevilla, yo soy de allí y es maravillosa, aunque preparate para pasar mucho calor :D
OpenOffice.org 3.2
pedrito76
 
Mensajes: 78
Registrado: Jue Jul 08, 2010 3:02 pm

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor pedrito76 » Mié Ago 04, 2010 11:39 am

por cierto no me puedo descargar la nueva versión, me da un error en la pag 107
OpenOffice.org 3.2
pedrito76
 
Mensajes: 78
Registrado: Jue Jul 08, 2010 3:02 pm

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor mauricio » Mié Ago 04, 2010 1:47 pm

Un error en la página 107?, prueba a descargarlo de nuevo... http://www.universolibre.org/node/8

Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor pedrito76 » Mié Ago 04, 2010 5:11 pm

Gracias ya tengo la nueva versión :super:
OpenOffice.org 3.2
pedrito76
 
Mensajes: 78
Registrado: Jue Jul 08, 2010 3:02 pm

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor fcassia » Lun Feb 21, 2011 10:20 am

Estimado Mauricio,

¿Podrías por favor subir tus archivos a algún otro host independiente, para tener una copia de seguridad? Todos los links que aparecen en este thread están rotos (los archivos no están más allí).

Si quieres tengo varios proyectos activos en SourceForge.net y, si me das tu permiso, puedo subirlos allí.

Otras opciones son AuthorStream.com, o Google Docs (http://docs.google.com) que ahora permite subir cualquier tipo de archivos (incluso PDF).

Saludos y gracias desde ya.
FC
OpenOffice.org 3.3 / Windows XP, Fedora 14
fcassia
 
Mensajes: 1
Registrado: Lun Feb 21, 2011 10:15 am

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor mauricio » Lun Feb 21, 2011 3:52 pm

Hola...

Puedes descargarlo desde aquí: http://www.universolibre.org/node/8

Es software libre, puedes subirlo donde creas conveniente...

Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor elenitaex5 » Lun Jul 25, 2011 12:42 pm

Hola Mauricio,
Ante todo darte las gracias por la labor que haces en este foro resolviendo todas las dudas y por los manuales que publicas e intentas tener al día.

Sin embargo tengo una pregunta acerca del manual: El punto 4 - El lenguaje OOo Basic muestra los condicionantes y los bucles. Sin embargo dentro de los bucles sólo nos enseña el FOR/NEXT y el DO/LOOP, y dos variables de éste último que son el DO/LOOP WHILE y el DO/LOOP UNTIL. Revisando el Wiki de OpenOffice.org he encontrado un elemento que resolvía una duda que tenía pero sin embargo no estaba en el manual que está publicado en castellano.
En él he encontrado el uso del WHILE/WEND y de DO WHILE/LOOP y DO UNTIL, que no aparecían en el manual y me creaban gran confusión. El enlace donde he encontrado esto es:
http://wiki.services.openoffice.org/wiki/Documentation/BASIC_Guide/Loops

Lo escribo aquí porque creo que son elementos útiles para tener en el manual castellano y creo que serían de mucha utilidad. Como además el OOo funciona sobretodo mediante la colaboración entre todos los usuarios quería también poner mi granito de arena.

Espero que te haya sido de utilidad Mauricio y que se pueda barajar la posibilidad de ponerlo en el manual.

Muchas gracias por todo
Openoffice 3.3.0
Sistema operativo Windows
elenitaex5
 
Mensajes: 56
Registrado: Sab Nov 28, 2009 2:49 pm
Ubicación: Madrid, España

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor telematico » Vie Ene 20, 2012 4:37 pm

Muchas gracias por existir esta comunidad, y por haber quien comparta sus conocimientos sin fines de lucro. Yo he sido administrador de redes por casi 8 años, he tomado cursos muy basicos de MSAccess, SQL sever, pero nunca aprendi programacion, solo explotar la informacion y hacer reportes con ella. Y ahora que he probado OO Calc veo que es muy rico en posibilidades, y me he planteado un reto, quiero aprender el Basic de Calc y realizar una pequeña aplicación que me permita llevar un control de cuentas bancarias y sus movimientos, como cheques, depositos y traspasos, con conciliacion de los movimientos e impresion de cheques, deseo introducir los datos a traves de formularios y que Calc solo se use como "base de datos" y no para escribir directamente sobre las celdas.

Yo no se nada del lenguaje de programación de calc, he visto el lenguaje VB 6.0 porque un proveedor nos realizo un programa que usaba access como base de datos, y me doy idea de los objetos, propiedades, eventos..

Mi pregunta concreta, y espero no ofender a nadie o que me regañen diciendo "primero lee y luego pregunta" ¿Este es el manual correcto para aprender desde cero lo necesario y desarrollar esto que quiero hacer, o debo buscar algo mas, es decir es este un buen punto de arranque?

Muchas gracias y felicidades por su sitio
Oppen Office 3.2 en Ubuntu 10.04
telematico
 
Mensajes: 1
Registrado: Vie Ene 20, 2012 4:23 pm

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor mauricio » Vie Ene 20, 2012 5:54 pm

Si... es el manual correcto...
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
AOO 4.1 | LibO 5.4 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
mauricio
 
Mensajes: 5649
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: México, D.F.

Re: Apuntes de OOo Basic ACTUALIZADO (27-Jul-10)

Notapor cruztineo » Vie Feb 24, 2012 8:37 pm

Saludos Mauricio he estado observando tus apuntes, podrías por favor tener intervención en el hilo "listas en cascadas" viewtopic.php?f=4&t=6405, para ver en que me puedes ayudar.
OpenOffice 2.4 en canaima
cruztineo
 
Mensajes: 13
Registrado: Jue Feb 25, 2010 1:53 pm

Siguiente

Volver a Macros y API UNO

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 5 invitados