execution d'un projet

**new_wave** · 07/08/2006, 10h59

Bonjour,

Je voudrais executer une seule form de mon projet pour voir si le code implémenté est correct.

Or je n'y parviens pas ,car en executant uniquement cette form j'ai besoin de renseigner des données qui proviennent d'autres forms .
Il faut donc que je reprenne l'execution de puis le début du projet, ce que j'ai fait( ce proejt fait lui même partie d'un proejt de plkus grande envergure).

Après avoir lancé l'execution sur la première form du projet je constate que rien n'est executé.
Pourriez vous me dire ce qu'il faut faire pour pouvoir executer le projet et tester mon nouveau code.

Merci beaucoup de votre aide.

Bien cordialement.

Nathalie

**Asdorve** · 07/08/2006, 11h15

salut,

alors, si je comprends bien, tu reprends un ancien projet, composé de plusieurs forms, et tu ne veux exécuter qu'une seule des forms.
Et le problème réside dans le fait que ta form a besoin d'infos qui sont sur les autres forms, c'est ça?

Explique plus en détail ton objectif s'il te plait.

Merci

**Asdorve** · 07/08/2006, 11h18

Envoyé par harbonne

Je voudrais executer une seule form de mon projet pour voir si le code implémenté est correct.

Or je n'y parviens pas ,car en executant uniquement cette form j'ai besoin de renseigner des données qui proviennent d'autres forms .

S'il n'y a pas beaucoup de données "extérieures", pourquoi ne pas mettre dans le code de la form que tu exécutes des valeurs "en dur" pour ces données? Ainsi tu ne vas pas chercher ailleurs, mais tu restes dans ta form et tu fais tes tests.

Tu dis...

**new_wave** · 07/08/2006, 11h27

Oui , c'est tout à fait cela.

En fait il s'agit d'informations sur une table de base de données.
j'ai donc besoin d'executer l'ensemble du projet pour pouvoir récuperer les infos concernant cette table de base de données.

le probleme est qu'en éxecutant l'ensemble du projet, je reste en mode designer et pas en mode d'execution.

J'espère que cela est plus clair maintenant.
Cordialement.
Nathalie

**Asdorve** · 07/08/2006, 11h29

Mais si tu veux simplement vérifier une form, pourquoi ne fais tu pas du pas à pas. Tu mets un point d'arrêt l'initialisation de cette form et tu fais F8 pour continuer pas à pas...

**new_wave** · 07/08/2006, 11h51

Bonjour,
tu écris[text]Tu mets un point d'arrêt l'initialisation de catte form[/text]
que veux tu dire.
Je peux mettre un point d'arrêt à un certain endroit de ctte form mais tout au début, comment faire?

Merci de ton aide.
Cordialement.
Nathalie

**Asdorve** · 07/08/2006, 11h57

normalement, quand tu charges ta form, tu as dans le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Private Sub Form_Load()

Tu te place sur cette ligne et tu fais F9, normalement la ligne se surligne.

Quand tu lances ton projet, il s'arrêtera sur cette ligne lorsqu'il y arrivera. Pour continuer ligne par ligne tu fais avec F8.

Tu es avec quelle version de vb?

**new_wave** · 07/08/2006, 12h27

Bonjour,

Je suis en version vb.6

Cordialement.
Nathalie

**new_wave** · 07/08/2006, 12h30

Rebonjour,
Je viens de faire ce que tu m'as conseillé et voici que je bloque justement sur cette ligne de la fonction Private Sub Form_Load() en faisant F8

Set langue = OpenDatabase(bibLi & "psPARAM.mdb")
et je reçois : psPARAM.mdb : fichier introuvable

Merci beaucoup de votre aide.
Cordialement.
Nathalie

**sovo** · 07/08/2006, 12h56

Envoyé par harbonne

Set langue = OpenDatabase(bibLi & "psPARAM.mdb")
et je reçois : psPARAM.mdb : fichier introuvable

ca veux tout simplement dire qu'il ne retrouve pas le fichier.

qu'est qu'il y a dans bibli ??

**new_wave** · 07/08/2006, 13h27

bonjour,

la variable bilbi n'est pas initioalisée dans le projet en cours mais dans un autre.

voici ce qu'on trouve à propos de son intialisation

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
bibLi = ""
On Error Resume Next
Open "c:bibli.mdb" For Input As #1
On Error Resume Next
Input #1, bibLi
On Error Resume Next
Close #1

Et ce code apparaît dans une form du projet nommée"psgpint".

Puis ensuite dans le projet je ne vois écrit que des lignes qui utilisent la variable bibli ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set inp = DBEngine.Workspaces(0).OpenDatabase(bibLi & "psgpcpta.mdb")

en fait c'est cette partie du code que l'on retrouve

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

OpenDatabase(bibLi & "psgpcpta.mdb")

où on voit différents noms de bases de données à la place de psgpcpta.mdb.

J'espère que cela vous éclairera.
Merci beaucoup à vous de votre aide.

Cordialement.
Nathalie

**sovo** · 07/08/2006, 13h49

bon ton code montre que tu recuperes le chemin de ta base de donnee dans un fchier.

fait ceci juste avant (pour voir le chemin de la base de donne afin d'y mettre manuellement la base si elle n'y est pas).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

msgbox bibLi & "psgpcpta.mdb"

**new_wave** · 07/08/2006, 14h07

Rebonjour,

a quel endroit dois je écriire cete ligne de code?

0 l'endroit où bilbi est initilaisé ou à l'endroit où le message d'eeruer apparaît , c'est à dire à ce niveau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Set langue = OpenDatabase(bibLi & "psPARAM.mdb")

Merci de ton aide.
Cordialement.
Nathalie

**sovo** · 07/08/2006, 14h23

fait comme ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
msgbox bibLi & "psPARAM.mdb"
end
Set langue = OpenDatabase(bibLi & "psPARAM.mdb")

**new_wave** · 07/08/2006, 14h56

J'ai fait comme tume l'as demand" mais finalement j'ai décidé de'executer le projet dans sa totalité en créant un raccourci vers l'executable du projet, comme cela je ne me posse pas de pb pour tous ces liens entre forms.

Merci beaucoup à toi.
cordialement.
Nathalie