Christine je te remercie pour ta collaboration mais je suis profane en la matière, je bidouille un peu et en plus je n'ai aucune formation informatique.
Je te transmet l'erreur à la ligne user, password.
Pour information  mon rapport se nomme CAISSE
Si tu peux voir de quoi il en retour en espérant ne pas trop t'embêter.
Je vais garder précieusement les information que tu m'a envoyées.

Sub OuvrirRapport()
dim optFichier(2) as new com.sun.star.beans.PropertyValue

monDoc = thisComponent
lesReports = monDoc.Parent.ReportDocuments
monReport = lesReports.getByName("NomRapport")

optFichier(0).Name = "ActiveConnection"
optFichier(0).Value = monDoc.Parent.DataSource.getConnection("","") user, password A cette ligne il me répond :" Syntax error BASIC symbole inattendu :,.
optFichier(1).Name = "OpenMode"
optFichier(1).Value = "open"

lesReports.loadComponentFromURL(monReport.Name, "", 0, optFichier())
-----------------
Avec tous mes remerciement amicalement HR
End Sub
Christine Brou a écrit :
' Ouvrir un formulaire à partir d'un autre

Sub OuvrirFormulaire()
dim optFichier(2) as new com.sun.star.beans.PropertyValue

monDoc = thisComponent
lesForm = monDoc.Parent.FormDocuments
monForm = lesForm.getByName("NomFormulaire")

optFichier(0).Name = "ActiveConnection"
optFichier(0).Value = monDoc.Parent.DataSource.getConnection("","") '
user, password
optFichier(1).Name = "OpenMode"
optFichier(1).Value = "open"

lesForm.loadComponentFromURL(monForm.Name, "", 0, optFichier())

End Sub


'Ouvrir un rapport à partir d'un formulaire

Sub OuvrirRapport()
dim optFichier(2) as new com.sun.star.beans.PropertyValue

monDoc = thisComponent
lesReports = monDoc.Parent.ReportDocuments
monReport = lesReports.getByName("NomRapport")

optFichier(0).Name = "ActiveConnection"
optFichier(0).Value = monDoc.Parent.DataSource.getConnection("","")     '
user, password
optFichier(1).Name = "OpenMode"
optFichier(1).Value = "open"

lesReports.loadComponentFromURL(monReport.Name, "", 0, optFichier())

End Sub

Pour les requêtes je ne sais pas, mais tu peux créer un formulaire sur ta
requête et ouvrir le formulaire

Tu assignes les macros sur l'événement "Lors du déclenchement" de tes
boutons

Christine


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Répondre à