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.NET Discussion :

Help ecriture vers base Access


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    Responsable Maintenance
    Inscrit en
    Août 2012
    Messages
    479
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable Maintenance

    Informations forums :
    Inscription : Août 2012
    Messages : 479
    Par défaut Help ecriture vers base Access
    Bonjour à tous j'ai essayé milles trucs provenant des forums ma ca reste d'un flou artistique et j'aimerai comprendre pour avancer dans ce que je fait.

    Voici ce que je veux faire j'ai une liste d’élément se trouvant dans un for X et dans un datagridview.
    selon ce que je sélectionne, j'importe dans le nouveau datagridview qui lui est lié à une datatable d'un dataset ( provenant d'une base Access).

    Je pensais qu'il fallait procéder de la manière suivante :
    - Ajouter les infos au datable destination.
    - Mettre à jour la base de données.
    - remettre à jour la vue écran du datagridview

    Les infos s'ajoutent en fait dans la datatable cependant lorsque je retourne sur l'autre Form la datatable est à nouveau vide. Donc les infos ne sont pas enregistrer de façon définitive.
    Il faut donc que la base de donées soient enregistrer avant de retourner sur l'autre form...

    Je sais ouvrir une connexion OleDB mais après pour ajouter les lignes créer ??? je tourne en rond sur les forums.

    Une idée de la marche à suivre ?

  2. #2
    Membre Expert
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Novembre 2010
    Messages
    793
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : France, Mayenne (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Novembre 2010
    Messages : 793
    Par défaut
    Peut-on voir le code pour voir ce qui ne va pas ?

  3. #3
    Membre éclairé
    Homme Profil pro
    Responsable Maintenance
    Inscrit en
    Août 2012
    Messages
    479
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable Maintenance

    Informations forums :
    Inscription : Août 2012
    Messages : 479
    Par défaut
    je mets le code que j'ai mis pour mettre a jour ma database mais ca ne me fait simplement rien

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
       Dim cn As New OleDbConnection
            cn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Eric\Documents\Visual Studio 2010\Projects\GMAO\GMAO\DBGMAO.accdb")
            cn.Open()
     
     
            Dim AccessCommand As New System.Data.OleDb.OleDbCommand("INSERT INTO InterventionConso(N°Intervention,ID,Article,Quantité,IDUNIQUE) SELECT N°Intervention,ID,Article,Quantité,IDUNIQUE from [InterventionConso] ", cn)
     
            cn.Close()

  4. #4
    Membre confirmé
    Homme Profil pro
    Inscrit en
    Avril 2007
    Messages
    57
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Avril 2007
    Messages : 57
    Par défaut
    - tu n'a pas exécuté ta requête, il manque AccessCommand.ExecuteNonQuery() avant la fermeture de la connexion.
    - J'ai pas compris l'utilité de ta requête : tu fais insérer dans la table [InterventionConso] son contenu qui est déjà vide

  5. #5
    Membre éclairé
    Homme Profil pro
    Responsable Maintenance
    Inscrit en
    Août 2012
    Messages
    479
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable Maintenance

    Informations forums :
    Inscription : Août 2012
    Messages : 479
    Par défaut
    En fait ce que je veux faire , c'est prendre la table du Dataset qui a 2 lignes au moment la présent dans la table et écraser dans access ( suis un peu Brute moi).
    ou bien les deux lignes a copier.

  6. #6
    Membre éclairé
    Homme Profil pro
    Responsable Maintenance
    Inscrit en
    Août 2012
    Messages
    479
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Responsable Maintenance

    Informations forums :
    Inscription : Août 2012
    Messages : 479
    Par défaut
    J'ai essayer ceci

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
      Dim cn As New OleDbConnection
            cn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Eric\Documents\Visual Studio 2010\Projects\GMAO\GMAO\DBGMAO.accdb")
            cn.Open()
            ADP = New OleDbDataAdapter
            ObjetDataRow = DBGMAODataSet.Tables("InterventionConso").NewRow()
            ObjetDataRow("N°Intervention") = Convert.ToInt32(Form2.TextBox5.Text)
            ObjetDataRow("ID") = string01
            ObjetDataRow("Article") = string02
            ObjetDataRow("Quantité") = 1
            DBGMAODataSet.Tables("InterventionConso").Rows.Add(ObjetDataRow)
            'Pour modifier les valeurs changées dans le DataAdapter
            ObjetCommandBuilder = New OleDbCommandBuilder(ADP)
            'Mise à jour
            ADP.Update(DBGMAODataSet, "InterventionConso")
            'On vide le DataSet et on le 'recharge' de nouveau.
            DBGMAODataSet.Clear()
            ADP.Fill(DBGMAODataSet, "InterventionConso")
            InterventionConso = DBGMAODataSet.Tables("InterventionConso")
            cn.Close()
    Je sens que je ne suis pas loin du But .. mais j'ai cette erreur

    Impossible d'effectuer un cast d'un objet de type 'InterventionConsoRow' en type 'System.IConvertible'.Impossible de stocker <WindowsApplication1.DBGMAODataSet+InterventionConsoRow> dans la colonne N°Intervention. Type attendu est Int32.

    ??? j'ai pourtant ajouter convert.tonINT32 pour le format ??

Discussions similaires

  1. Email vers base Access
    Par cjacquel dans le forum VBA Outlook
    Réponses: 2
    Dernier message: 24/09/2007, 11h46
  2. Chaine de connexion absolue vers Base Access
    Par Ensiaste2006 dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 20/08/2007, 23h19
  3. Copier base de données SQL server en vers base access
    Par t1marlartiste dans le forum ASP.NET
    Réponses: 11
    Dernier message: 23/05/2007, 14h15
  4. Menu vers base Access
    Par .:Djil:. dans le forum Access
    Réponses: 2
    Dernier message: 06/03/2007, 08h03
  5. Exporter un select vers base Access
    Par dehorter olivier dans le forum MS SQL Server
    Réponses: 3
    Dernier message: 23/11/2006, 14h22

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