ordonnancement

Question

je dois faire une application sommaire d'aide à l'ordannancement de tâches utilisant des ressources partagées.

cahier des charges:
c'est l'utilisateur qui définit l'ordonnancement des taches, l'utilisation simultanée d'une ressource par 2 taches est interdit. les taches sont indépendantes.
les données utilisées seront mémorisées de manière durable dans des fichiers textes formatés. ces données sont composées de la liste des ressources de la liste des taches:ressources nécessaires,duré,e délais, heure de début
j'ai pour objectif:
- pouvoir visualiser l'occupation des ressources avec un GANTT ressources
-être sur de ne pas avoir de conflit d'utilisation  des ressources
-connaitre les taches qui ne respecteront pas leur délai
-connaitre la marge des autres taches pour pouvoir envisager le retard
- disposer des indicateurs:taux d'occupation, taux de service

je sais pas mettre les données dans un fichier texte et je ne vois pas comment faire la visualisation du Gantt
Je suis débutant en vb alors si vous pouvez des pistes et des idées pour démarrer svp merci

acive · Answer

Salut, alors on va faire par étapes...
Pour inscrire des données dans le fichier texte:

dim Donnees as string
Donnees = "Tes données"
open "c:\fichier.txt" for append as #1
print #1, Donnees
close

Dont "Append" inscrit une ligne à la fin de ton fichier texte avec tes données..
Violà une première étape... (la plus simple)

A+

A.C.I.V.E SARL
Automatismes Conception Informatique Vidéo Electronique

breton53 · Answer

comment ca se passe quand on rentre la donnée à partir d'un textbox ?

acive · Answer

dim Donnees as string
Donnees = text1.text
open "c:\fichier.txt" for append as #1
print #1, Donnees
close

A.C.I.V.E SARL
Automatismes Conception Informatique Vidéo Electronique

breton53 · Answer

j'ai réussi à écrire dans le fichier texte merci pour ton aide

Private Sub Valider_Click()
Dim donnees, donnees2, donnees3, donnees4 As String
donnees = Text1.Text
donnees2 = Text2.Text
donnees3 = Text3.Text
donnees4 = Text4.Text
Open "taches.txt" For Append As #1
Print #1, donnees; vbTab; donnees2; vbTab; donnees3; vbTab; donnees4
Close
End Sub 

comment puis je faire pour supprimer une donnée? et comment fait on un gantt?

acive · Answer

Re..
Alors pour supprimer le mieux c'est de lire tout le fichier, les stoquer sur des constantes, supprimer la constante correspondante puis éffacer le fichier avec kill par exemple et le re-créer avec toutes les données sauf celle qu'on a éffacé.
ca évite les blancs sur le fichier

A+

A.C.I.V.E SARL
Automatismes Conception Informatique Vidéo Electronique

Ordonnancement

5 réponses

Discussions similaires