On Friday 22 May 2009 08:51:58 Alexandro Colorado wrote:
> On Thu, 21 May 2009 11:03:13 -0500, francisco f. <[email protected]>
>
> wrote:
> > Seguimos dando guerra.
> > OOo 3.1 contra una BD mysql
> > Necesito ejecutar una secuencia sql tal que
> >
> > update `lineas-factura` set `total` =concat(`cantidad`*`precio-baremo`)
> > where
> > `Id-factura` = 1
> >
> > Es facil, solo multiplica cantidad por el precio unitario y lo coloca en
> > total
> >
> > Quiero asignar esto a un boton con una macro que la ejecute.
>
> Para esto simplemente crea un boton en la barra que necesites (agregar
> boton personalizado) y la dirijes a la instruccion Macros -> Tu Modulo.

Eso no es un problema, ya esta resuelto
La puñeta esta en que con todas las ordenes de conexion a BD del OOo no me 
funciona ninguna
la macro de abajo por ejemplo dice que no existe la BD.
En mysql la BD se llama   "en-ga"
al conectar OOo con mysql aparece  la BD "en-ga" y debajo las tablas y puedo 
operar bien con ella a 
excepcion de esta macro que no hay manera de que reconozca que existe.
No se si es que para BD de mysql hay que usar algun otro metodo de conexion.


>
> > Sacado de un correo de Alexandro
> >
> > Sub calculatotallineas ( event as Object )
> >  Dim sTableName$ 'El nombre de la nueva tabla
> >  Dim oTable 'valor para la tabla en la base de datos
> >  Dim oTables 'Tablas en el documento
> >  Dim oTableDescriptor 'Define el funcionamiento de una tabla
> >  Dim oCols 'Las columnas de una tabla
> >  Dim oCol 'Descripcion de una columna
> >  Dim oCon 'Conexion a la db
> >  Dim oBaseContext 'Database context service.
> >  Dim oDB 'Fuente de almacenamiento de la base de datos
> >  Dim oResult 'Resultado de SQL
> >  Dim nCount As Long 'Contando variables
> > Dim oStmt
> > Dim sSql$
> >  eng = "en-ga"
> >
> > REM Usa DatabaseContext para obtener la referencia de una DB.
> > oBaseContext = CreateUnoService("com.sun.star.sdb.DatabaseContext")



 oDB = oBaseContext.getByName(eng) --------------------- aqui ya se queda
                                                                                
 y  dice que no existe la BD




> > oCon = oDB.getConnection("en-ga", "en-ga")
> >
> > ¿El login y pass hace falta si el ooo ya los dio para conectarse al
> > iniciar?
>
> Creo que si, aunque puedes crear una libreria (similar a PHP) donde solo
> se llame a la conexion. Hay un comando para llamar el modulo de conexion.

demasiado profundo :))
>
> > strSQL = "update ""lineas-factura"" " & "set " & """total"" = "
> > & "(""cantidad""" & " " & "*" & " " & """precio-baremo"")" & " " &
> > "where"
> > & " " & """Id-factura""" & " = " & "1"
> >
> > oStmt = oCon.createStatement()
> > oResult = oStmt.executeQuery(strSQL)
> >
> > End Sub
> >
> > Bueno a ver si alguien sabe algo de esto

saludos y gracias

---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Responder a