Discussion :

[Kalvin_20]

Bonjour à tous

j'ai un formulaire recherche qui me permet de chercher dans ma base de données les informations souhaitées seulement voila comme ma base est sur le reseau y'a certain tableau que je dois mettre en masquer et du coup j'ai eu une erreur qui me dis "Erreur de compilation dans le module caché : Form_Recherche

voici le code qui me permet de faire mes recherches

Code :

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

1
2
3
4
5
6
7
8
9
10
Set db = CurrentDb()
 
   For Each tbl In db.TableDefs
      If tbl.Name = "Semaine" Then
         db.TableDefs.Delete (tbl.Name)
      End If
   Next tbl
   strSQL = "SELECT Tableau.Date, Tableau.Semaine, Tableau.Equipe, Tableau.Machine, Tableau.[Nom Pièce], Tableau.Îlot, Tableau.[Pièces Bonnes], Tableau.Réappairage, Tableau.[Coût Réappairage], Tableau.[% Rebut], Tableau.[Coût rebut], Tableau.[% Pièces bonnes / qté produite], Tableau.[% Rebuts / qté produite] INTO Semaine FROM Tableau WHERE Tableau.semaine Like '" & semaine_rechercheavance.Value & "'"
   db.Execute (strSQL)
   DoCmd.OpenTable "Semaine", acViewNormal, acReadOnly

Question :

1- à quoi est du cette erreur ???

2- Comment faire pour la resoudre ???

3- est ce que c'est je suis obligé d'afficher mes tableaux pour que mon formulaire recherche fonctionne ???

Merci à vous

[Jean-Philippe André]

Bonjour,
lorsque tu utilises une requete de type

Code SQL :

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

SELECT INTO NewTable FROM

NewTable sera automatiquement détruite avant d'y mettre le résultat de la sélection.
Ta partie DB.TableDefs.Delete n'est donc pas nécessaire.

Pour l'erreur de compilation, je n'ai pas trop d'idée. Compacte la base pour voir ?

[Kalvin_20]

Pour le delete c'est fais expret comme ça dans le cas d'une nouvel recherche si le NewTable existe je le supprime et j'execute ma nouvel requete puis je l'affiche dans un nouveau tableau qui s apel aussi NewTable et ainsi de suite

sa veux dire quoi compacter ma base stp ?

Merci

[Jean-Philippe André]

Ca permet de passer au crible ton code,
Outils>Utilitaires Base de données>COmpacter une base de données.

[ullgom]

Bonjour,

Je me trompe peut être mais pour moi le compactage ne fait qu'épurer la base de données, pour "passer au crible le code", il faut aller dans l'éditeur de code et faire debug > Compile

Cordialement,