VBA - ACCESS 2000 - GESTION AVANCEE D'UN PARC INFORMATIQUE

Commentaire de 106 le 18/11/2005 08:54:31

Pour reprendre PLUPLU, 'C'est du bon boulot'. On voit la maîtrise d'Access.
Pour ce qui est de la gestion des erreurs, elle doit être faisable de la même façon que sous VB.
Quelques questions :
   - Avec quoi as tu fais ton fichier d'aide ?
   - Est-il possible de déployer une telle base avec le même principe du Runtime ?

106

Commentaire de Filou07 le 18/11/2005 14:26:48

Merci pour les comms. C'est vrai que je n'ai pas trop cherché à verrouiller l'accès au code et aux objets d'Access puisque si on maintient la touche maj enfoncée, on a acès à tout.

J'ai créé mon fichier d'aide avec le soft gratos de MS (HTML Help Workshop je crois).

Pour pouvoir utiliser la base avec le runtime il vaut mieux compiler l'installation avec l'assistant empaquetage qui est dans le kit Office 2000 developer, car j'utilise qq ocx pas forcément installés avec le runtime et aussi une version de comdlg32

Commentaire de Neo.balastik le 18/11/2005 19:32:34

Filou07 >  Doué ou pas en Access, sache qu'il est possible d'inhiber le comportement de la touche Shift ;O)  Documente-toi sur la propriété AllowBypassKey.  Il serait dommage qu'Access ne puisse pas bloquer l'accès à tous ses objets à cause d'une stupide touche...
Ici, c'était par Access 97 : http://www.mvps.org/accessfr/general/gen0040.htm

Pour 2000 :
Setting Startup Options Programmatically in Access 2000
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnacc2k/html/acstartupoptions.asp

Autres liens :
http://access.developpez.com/faq/?page=TAAdmin#inhiber
Et ce lien pour ce qui est de la sécurité et autres sujets dans une appli Access :
http://officesystem.access.free.fr/runtime/developpement.htm

Guy

Commentaire de Filou07 le 19/11/2005 17:39:40

Pour HERLECI : A la première utilisation, il faut indiquer le chemin d'accès au fichier nommé donnees.mdb qui se trouve.... là où tu as décompacté le zip.

Merci  Neo.balastik pour le tuyau

Pour ARNOLDM, petite info : il n'y a pas de mot de passe ! ;-)

Commentaire de gloups le 24/11/2005 17:59:44

Bonjour,

J'aimerai profiter de ce code (alléchant d'après les autres commentaires), mais je ne vois pas le fichier .mdb dans le zip ...

Merci

Commentaire de becfive le 15/12/2005 10:36:08

salut
svp esct ce que qq 1 peut me dire comment démarrer ce code
je lé déja télécharger mais je sais pas d'où je commence et je suis débutant en vb

Merci

Commentaire de Herleci le 20/12/2005 00:22:10

J'ai téléchargé la base access mais elle ne s'ouvre pas j'ai un message d'erreur qui me dit que la base n'est pas sur mon disc alors qu'elle y est que dois-je faire?
Excuses moi si c'est un peu bête mais je débute.

Commentaire de Herleci le 21/12/2005 02:49:27

Oui pardon je ne l'ai lu qu'après mais je n'ai pas eu le temps de poster la rectif à ma question. Merci

Commentaire de Filou07 le 16/01/2006 15:16:35

Pour l'instant, je ne pense pas aller plus loin que des corrections de bugs, voire éventuellement des éditions supplémentaire. Je vais aussi mettre en ligne mes pages ASP !!

a+

Commentaire de aliensurfeur le 31/01/2006 14:47:19

Heu je peux aller dans quoi pour renommer "gestion", "administration" ou un sous menu par exemple "commandes" etc... ?? merci !

Commentaire de barbu1944 le 08/02/2006 11:16:34

Jeune amateur pour programmer (62 ans), mais j'aime et lorsque l'on aime on a toujours 20 ans.
J'ai fait quelques applis avec Access mais qui sont très lourdes.
Comment fait-on pour rendre une appli genre MATTOS ?
Merci .....

Commentaire de anassmaroc21 le 04/04/2006 12:22:51

bonjour,je m'interroge seulement pourqoui vous avez utilisé la table modelcomposent

Commentaire de jeraos le 04/04/2006 13:43:19

SVP mettez un zip complet .Manque de formes et de projet.vbs comment alors peux je l 'executer merci de le remettre pour une 2eme fois.

Commentaire de Filou07 le 05/04/2006 09:24:31

Pour anassmaroc21 : j'utilise la table ModelesComposants de la même manière que la table Modeles : elle me sert de "catalogue" de composants dans lequel je puise des articles pour les affecter à des objets

Commentaire de lafuitedo2006 le 09/04/2006 11:56:43

Du très bon boulot, avec un code commenté, un etat avec les relations, merci pour ce caviar, c'est une excellente base pour mon projet.

Commentaire de sihamben le 10/06/2006 17:11:30

Salut Filou07. Geniale ta base de données.Elle va beaucoup m'aider pour mon projet de fin d'année:-).
J'ai créée un site web pour l'ensemble des étudiantes en base de données d'Interface3 et je voudrai vous demander si je peux prendre votre base de données et la mettre à leur disposition.
Merci

Site:  http://sihamben.qdo.org/
Email: s.benhammadi@interface3.be

Commentaire de sihamben le 12/06/2006 20:11:07

Merci :-)

Commentaire de moustapha7fr le 04/08/2006 15:20:21

Bonjour Filou.juste une petite suggestion sur ton perso.
il faut faire un lien vers "Matos" apartir de http://phil.volle.free.fr/
merci pour ton boulot c'est du balaise.

Commentaire de sihamben le 24/05/2007 15:48:18

Bonjour Filou,

le lien vers le matos II ne marche plus.Pouvez vous le mettre en ligne et nous donner le lien s.v.p car c'est une chuete DB qui pourras bcp nous aider :-)
Merci d'avance

Commentaire de sihamben le 29/05/2007 11:55:03

Merci beaucoup Filou07.....tu es genial

Commentaire de Laurent31480 le 03/08/2007 15:31:27

bonjour,

tres bonne application que j'utilise depuis un moment. je ne suis pas programmeur et pour moi c du chinois mais chapeau ca "fonctionnait" tres bien sous access 2003. le probleme vient maintenant d' access 2007, probleme visuel au niveau du choix des entités, l'ascenseur a du mal a apparaitre. le second soucis, ce pose quand on choisi dans la liste d'entité, un entités avec plusieur objets,  la ca bug "erreur d'execution '13'  incompatibilité de type

dans microsoft VB,  dans Form_frmGObjects (Code)

Private Sub RemplirLaListview(Optional NumObjet)
    Dim rsObjets As Object
    Dim i As Integer
    Dim numobj As Object
    Dim txtSQL As String
    Dim nbo As String
'Remplit la listview avec les objets de l'entité en cours
    ' Initialisation et vidage de la listview

la ligne suivante est en jaune

    Set lvwPostes = Me.lvw1.Object

    lvwPostes.ListItems.Clear
    Me.lblNbObjets.Caption = "Pas d'objet"
    If IsNull(Me.N°Entite) Then Exit Sub
    'Debug.Print Me.N°Entite, Me!N°Entite
    'Ouverture de la requête
    Set mabase = CurrentDb
    txtSQL = "SELECT OBJETS.N°Entite, OBJETS.N°SerieObjet, OBJETS.N°Objet, OBJETS.DelocAtelier, GENRES.GENRE, GENRES.NUmimage FROM (GENRES INNER JOIN MODELES ON GENRES.N°Genre = MODELES.N°Genre) INNER JOIN OBJETS ON MODELES.N°Modele = OBJETS.N°Modele WHERE n°entite=" & Me.N°Entite & " ORDER BY GENRES.NUmimage, GENRES.Genre, OBJETS.N°SerieObjet;"
    Set rsObjets = mabase.OpenRecordset(txtSQL, dbOpenSnapshot)


voila comme je dit c un peu beaucoup du chinois pour moi, si tu as une solution je t'en remercie d'avance. je ne peuthelas plus utilisé office 2003!!  ggrrrr

Laurent

Commentaire de Renfield le 08/08/2007 08:35:52 administrateur CS

pas de bnoeud parent avec la clé
"k" & RSEntites![N°EntiteS]
n'existe.

Commentaire de Renfield le 08/08/2007 10:14:53 administrateur CS

TU demandes a ajouter un noeud enfant à un noeud existant.
le noeud parent que TU souhaites utiliser a pour clé :
"k" & RSEntites![N°EntiteS]

le message d'erreur que tu surviens peut etre là pour de multiples raisons...
l'une d'elle est qu'aucun noeud n'a pour clé celle que tu spécifie.

d'autres raisons ? N°EntiteS, N°Entite ou Entite ne sont pas des champs valides de ton RecordSet...

Commentaire de Renfield le 08/08/2007 10:26:35 administrateur CS

je ne vais pas me substituer a ton aide en ligne...
il s'agit là de créer ton noeud parent (si effectivement il n'existe pas), pour cela, utilises la méthode Add de la collection Nodes de ton TreeView, comme tu le fias actuellement, mais sans spécifier de noeud parent.

Commentaire de arni32 le 28/02/2008 18:22:45

je suis d'accord avec tout le monde : "c'est du bon boulot"

Aurais-tu la gentillesse de me donner un petit coup de main en ce qui concerne le setup
pour la consultation en Intranet , je sèche dessus depuis des heures
j'ai bien crée le lien odbc
mais rien à faire  
je n'y arrive pas
D'avance merci

Commentaire de arni32 le 29/02/2008 10:09:24

Effet ,je ne sais pas très bien comment lancer la consultation .
J'ai cree le lien odbc dans outil d'administration qui point bien sur données.mdb
ensuite je ne sais pas si je dois liée tes fichiers asp et htm avec IIS ,en tous cas lorsque j'ouvre consult_cadr.htm IE m'ouvre non pas la base de données dans laquelle
j'ai fais quelles encodages ,mais t'as bien base d'origine.
lorsque je click sur  un des elements ex:dept1 je reçois voulez telecharger le fichier consult_objet.asp  
Questions:
dois-je extraire ton fichier zip à un endroit bien spécific?
Dois-je utiliser IIS si oui quel est le fichier de base (index.htm,acceuil.html...)?
A partir d'un pc reseau qu'elle ligne de commande ou code ou url dois-je utiliser?

Désolé d'être aussi long mais comme tu vois je ne suis pas très doué et il n'est pas evident d'être conci.

En tout cas je te remercie pour ta disponibilité et te souhaite dors et déjà un bon weekend
  

Commentaire de Filou07 le 29/02/2008 14:42:37

PS : je prépare une mise à jour de la version web avec une page supplémentaire pour éditer une fiche matos identique à celle que l'on peut éditer dans l'application access.