Discussion :

[electrosat03]

Bonjour à tous,

Suite à un téléchargement sur un site web, des tas de pub sont apparues quand on ouvre firefox ou IE sur le pc d'un ami.
J'ai nettoyé son pc avec certains logiciels spécialisés, ça a l'air OK.

Le problème important qui est apparu, c'est avec son appli access, lors de l'ouverture de l'appli il y a un champ date qui n'affiche plus la date et un module se lance également afin de faire des requêtes

Code :

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

1
2
3
4
5
6
7
 Dim StrSQL_Liste_An_Fact As String
 
    'Table des factures pour les années en yyyy
    StrSQL_Annee_Fact = "SELECT Format([datefact],'yyyy') AS Expr1" & _
                        " FROM T_Facture" & _
                        " GROUP BY Format([datefact],'yyyy')" & _
                        " ORDER BY Format([datefact],'yyyy') desc;"

C'est là qu'une erreur apparait : -2147217900 Format([datefact],'yyyy')

Je ne vois pas pourquoi il met cette erreur puisque l'appli fonctionne depuis plusieurs mois et fonctionne toujours sur d'autre PC.

Si qq'un sait me dire de quoi cela peut provenir, ou faut-il que je réinstalle Office 2010

[User]

Salut,

Tu as essayé de compiler le projet ?

Cdlt,

[electrosat03]

Salut,

Oui, bien sur mais rien ne change.

C'est quand même bizarre que ça ai changé comme ça!

[User]

En fait c'est quoi la description de l'erreur donnée dans la boîte de message ?
car avec ce numéro je ne trouve rien sur le net

[electrosat03]

Je ne sais plus exactement, mais c'est du genre erreur 2147217900 Format([datefact],'yyyy') comme quoi il y a une erreur sur le format ???

[User]

Oui la fonction format dans le sql de la requête :

Essaie d'exécuter le code :

Code :

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

? Format(Date(),"yyyy")

Dans la fenêtre d'exécution d'un module...