[Résolu][Base] variable environnement Windows dans rapport

[Kilin]

Bonjour à tous,

Est il possible de récupérer les variables d'environnement Windows aux fins de les afficher sur un rapport de base ?
Ces valeurs en particulier: COMPUTERNAME, PROCESSOR_IDENTIFIER, USERNAME, USERPROFILE

Merci pour votre aide !

Bonne soirée,

[jeanmimi]

Bonjour,
Je ne sais pas si tu as fait une recherche dans le forum, mais j'y ai vu quelques ressources, à adapter dans ton cas.

[Kilin]

Merci pour votre réponse !

Mais comment appeler une macro dans un rapport ? Je sais le faire dans un formulaire mais je n'ai pas vu comment faire dans le rapport...

Bonne soirée

[jeanmimi]

Mais comment appeler une macro dans un rapport ?

Ce qui peut être testé : sauvegarder le Rapport en dehors de la Base, puis activer la Macro par un raccourci clavier par exemple.

[Dude]

Tu n'as qu'à mettre tes variables dans une table. Tu pourras ensuite les intégrer où tu veux.

[Kilin]

Bonjour,

Merci pour tous vos conseils !
J'ai progressé dans ma recherche avec cette partie de code qui récupère les informations de mon formulaire pour générer un rapport.
Je stocke ma variable d'environnement windows dans une deuxième table.
Mon soucis c'est que mon rapport est généré avec une seule table et que ma variable d'environnement est dans une deuxième table.

Est il possible de récupérer la valeur que j'ai stocké dans ma deuxième table pour l'appeler dans mon rapport ? Si oui comment adapter ma macro ?

Code : Tout sélectionner

Sub OuvrirConvoc(oEv as Object)
Dim oForm as object, oRapport as Object
Dim FiltreNom as String, matricule as string, identite as String

Dim oConnexion as Object, maRequete as Object
Dim strSQL as String

matricule = environ("USERNAME")

	if matricule = "0001714" then
		identite = "Monsieur VERT"
	elseif matricule = "0001715" then
		identite = "Monsieur ROUGE"
	else
		identite ="inconnu"
	end if

   oConnexion = thisDatabaseDocument.CurrentController.ActiveConnection
   maRequete = oConnexion.createStatement()

   strSQL = "UPDATE ""UTILISATEUR"" SET  ""USER"" = '" & identite & "'"
   maRequete.executeupdate(strSQL)

   oForm = oEv.Source.Model.Parent
   FiltreNom = oForm.Columns.getByName("tab_NOM").getString
   oRapport = ThisDatabaseDocument.ReportDocuments.getByName("Convocation").openDesign
   With oRapport
      .Filter="""tab_NOM"" ='" & FiltreNom & "'"
   End With
   With ThisDatabaseDocument.ReportDocuments.getByName("Convocation")
      .Store
      .Close
      .Open
   End With
End Sub

Merci pour vos lumières !!

[Dude]

Mon soucis c'est que mon rapport est généré avec une seule table et que ma variable d'environnement est dans une deuxième table.

Tu devrais revoir les concepts de base de données et de modèle relationnel.

[jeanmimi]

Si les deux Tables peuvent être mises en Relation, une requête pourrait alors être créée puis être utilisée pour faire le Rapport.

[Kilin]

Mon soucis c'est que mon rapport est généré avec une seule table et que ma variable d'environnement est dans une deuxième table.

Tu devrais revoir les concepts de base de données et de modèle relationnel.

Mes tables sont déjà en relation, j'arrive a les mettre a jour en cascade et récupérer les données en cascade dans mes formulaires, mais de ce que j'ai cru comprendre le rapport ne récupère les valeurs que d'une table ?

J'ai bien pensé a rajouter une colonne dans ma table principale, mais est ce que c'est la seule solution, alourdir la base de donnée pour un champ que je ne récupère que dans la génération du rapport ?

Si vous faites référence à autre chose je suis désolé mais je suis novice -++ et je ne saisis pas toutes les subtilités ...

[jeanmimi]

As-tu testé de créer une requête pour faire le Rapport ?
https://wiki.openoffice.org/wiki/FR/FAQ ... on_requise

[Kilin]

As-tu testé de créer une requête pour faire le Rapport ?

Oui j'ai testé mais je ne sais pas comment appeler deux tables !

[jeanmimi]

Puisque tes Tables sont en Relation, dans l'Assistant de Requête, tu ajoutes ces Tables, puis tu sélectionnes les champs que tu veux ensuite afficher dans ton Rapport comme dans cet exemple.

[Kilin]

Bonjour Jeanmimi,

J'ai généré mon rapport a partir d'une requête sur deux tables comme vous le suggériez, le résultat est conforme à mes attentes, je vous remercie beaucoup !!

Bon week-end !