Mi objetivo es ejecutar consultas simples desde LibreOffice Calc y obtener los resultados de una base de datos PostgreSQL remota.
Traté de hacer algo similar a esta respuesta pero me sale un error.
Esto es lo que tengo:
Sub GetQuery Dim oParms(1) as new com.sun.star.beans.PropertyValue Dim oStatement As Object Dim oResult As Object Dim oConnection As Object oParms(0).Name = "user" oParms(0).Value = "serveruser" oParms(1).Name = "password" oParms(1).Value = "serverpwd" oManager = CreateUnoService("com.sun.star.sdbc.DriverManager") sURL = "dbname=mydatabase hostaddr=XXXX port=5432 user=postgresuser password=postgrespwd" oConnection = oManager.getConnectionWithInfo(sURL, oParms()) oStatement = oConnection.createStatement() oResult = oStatement.executeQuery("select count(*) from mytable") MsgBox "Result: " & oResult oStatement.close() End Sub Cuando intento ejecutar esto, aparece "Variable de objeto no configurada" en la línea oStatement = oConnection.createStatement() .
Como puede ver, tengo una experiencia muy limitada en la conexión de bases de datos remotas.