IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

supprimer des records filtrés avec ado


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Janvier 2010
    Messages
    177
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 177
    Par défaut supprimer des records filtrés avec ado
    bonjour

    j'ai filtré un recordset avec le code suivant

    MonRs.Filter = "DAT=" & "'" & Calendar1.Value & "'"

    ça marche, je veux supprimer les records filtrés

    j'ai essayer avec

    MonRs.Delete adAffectAllchapters
    et
    MonRs.Delete adAffectgroup

    mais ça marche pas

    avec ces deux instructions un message d'erreur s'affiche;"l'opération demandé n'est pas autorisée dans ce context"

    et avec
    MonRs.Delete adAffectcurrent
    le message d'erreur est;" informations sur la colonne clé insuffisantes ou incorrectes.trop de ligne sont affectérs par la mise à jours"



    Merci bcp pour votre aide

  2. #2
    Inactif  
    Homme Profil pro
    Inscrit en
    Septembre 2003
    Messages
    570
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Septembre 2003
    Messages : 570
    Par défaut
    et si tu utilise directement ton objet connection en lui redonnant le paramètre date

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    con.execute "delete / from table where DAT=" & "'" & Calendar1.Value & "'"

  3. #3
    Membre confirmé
    Inscrit en
    Janvier 2010
    Messages
    177
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 177
    Par défaut
    Merci bcp
    ça marche en changeant un peu la syntaxe

    Con.Execute "DELETE FROM table WHERE DAT=#" & Format$(Calendar1.Value, "dd-mm-yyyy") & "# "

    Mais le problème est que la suppression ne prend lieux (le recordcount ne diminue) qu'après redémarrage de l'application

    Comment faire pour l'actualiser en cours de l'exécution du code?

    Merci d'avance

  4. #4
    Inactif  
    Homme Profil pro
    Inscrit en
    Septembre 2003
    Messages
    570
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Septembre 2003
    Messages : 570
    Par défaut
    tu peut utiliser la methode requery de ton objet recordset

    si cela ne marche pas tu peut toujours utiliser les deux méthodes close et puis open encore une autre foi

  5. #5
    Membre confirmé
    Inscrit en
    Janvier 2010
    Messages
    177
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 177
    Par défaut
    Merci bcp nsanabi

    ça marche avec requery

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 4
    Dernier message: 11/02/2010, 16h11
  2. [XL-2003] supprimer des fichiers excel avec macro
    Par jah_is_able dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 14/04/2009, 11h56
  3. Supprimer des vieux fichiers avec log4j
    Par ecthelion dans le forum Logging
    Réponses: 1
    Dernier message: 24/11/2007, 11h48
  4. Supprimer des lignes marquées avec Emacs
    Par bibilolo2 dans le forum Applications et environnements graphiques
    Réponses: 5
    Dernier message: 15/10/2007, 20h05
  5. [C#] Supprimer des colonnes (Table avec 2 clés primaire)
    Par sara21 dans le forum Windows Forms
    Réponses: 1
    Dernier message: 05/11/2006, 21h42

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo