Olá,
Eu uso a seguinte rotina copiada de
http://www.oooforum.org/forum/viewtopic.phtml?t=29084
Sub abreOutroFormulario
oContexto = CreateUnoService("com.sun.star.sdb.DatabaseContext")
'O Arquivo Base deve estar regsitrado em Opções >> Bancos de dados
'Há como fazer isso sem ele estar registrado tb
oFonte = oContexto.getRegisteredObject("NomeDoBandoDeDadosRegistrado")
oForms = oFonte.DatabaseDocument.FormDocuments
oAConnection = oFonte.getConnection("","")
Dim pProp(1) As New com.sun.star.beans.PropertyValue
pProp(0).Name = "ActiveConnection"
pProp(0).Value = oAConnection
pProp(1).Name = "OpenMode"
pProp(1).Value = "open"
oForm = oForms.loadComponentFromURL("NomeDoSeuForm", "_blank", 0, pProp())
End Sub
Uma vez criada a SUB basta atribui-la ao evento "Botão do mouse
liberado" do botão ou outro elemento do form.
Até mais,
2009/10/8 Lucas Filho <[email protected]>:
> Olá Comunidade,
>
> Tenho um arquivo no Base chamado "Cadastro".
> Dentro deste arquivo possuo dois formulário. Um chama-se "CD" e o outro
> "Músicas".
> No Formulário "CD" quero inserir um botão que, ao ser clicado, possa acessar
> o formulário "Músicas". E no formulário "Músicas", inserir um outro botão que
> possa acessar o "CD".
>
> Já tentei hyperlink mas só consigo ir para o arquivo e não para formulário.
> Nas propriedades do Botão, não encontrei nada que fizesse referência a outro
> formulário.
>
> Alguém pode me dar uma luz?
>
>
> Até mais,
> Lucas Filho
> Open-Ce Tecnologias e Serviços
> http://www.open-ce.com
>
--
José Ricardo Simões Rodrigues
jricardosimoes at gmail.com
ricardo at ricardosimoes.com
ricardosimoes.com
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
