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 :

De VB 6.0 à VB.net


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre actif
    Inscrit en
    Novembre 2004
    Messages
    67
    Détails du profil
    Informations forums :
    Inscription : Novembre 2004
    Messages : 67
    Par défaut De VB 6.0 à VB.net
    Bonjour, depuis de nombreuses années je fais appel dans mon code à des requêtes SQL.

    Voici l'exemple qui m'interesse sous VB 6.0
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Dim rs As ADODB.Recordset
     
    Data.rsPsRibbon "MDIFORM"
    Set rs = Data.rsPsMenuRibbon
     
    Do Until rs.EOF
        Debug.Print rs("RIBBON_KEY")
        Debug.Print rs("RIBBON_FR")
    rs.MoveNext
    Loop
    rs.Close
    Je n'arrive pas à reproduire la même chose sous VB.net :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim tb As New LTEDATADataSetTableAdapters.PsMenuRibbonTableAdapter()
            tb.Fill(LTEDATADataSet.PsMenuRibbon, "'MDIFrm'")
    Principalement dans la lectue de la table :

    do while ???


    loop

    Merci de me donner un coup de main, malgré des heures de tests j n'arrive pa à trouver la solution qui est certainement très simple.

  2. #2
    Membre Expert Avatar de hunteshiva
    Homme Profil pro
    Chef de projet en SSII
    Inscrit en
    Février 2010
    Messages
    1 069
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Chef de projet en SSII
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2010
    Messages : 1 069
    Par défaut
    et bien sa dépend,
    je connais pas très bien vb6, je suis très rapidement arrivé sur vb 2008 (ou vb.net)

    que cherche tu a faire exactement?
    plutôt que d'essayer de reprendre le même code, essaye de trouver un maniére de le faire différement en vb.net

    tu te connecte a ta base ou ?

  3. #3
    Rédacteur
    Avatar de Hinault Romaric
    Homme Profil pro
    Consultant
    Inscrit en
    Janvier 2007
    Messages
    4 570
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Cameroun

    Informations professionnelles :
    Activité : Consultant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Janvier 2007
    Messages : 4 570
    Billets dans le blog
    121
    Par défaut
    si c'est juste pour afficher les données, faut binder ton DataTable sur un DGV.

    @++
    Vous souhaitez participer aux rubriques .NET ? Contactez-moi

    Si déboguer est l’art de corriger les bugs, alors programmer est l’art d’en faire
    Mon blog, Mes articles, Me suivre sur Twitter
    En posant correctement votre problème, on trouve la moitié de la solution

  4. #4
    Membre actif
    Inscrit en
    Novembre 2004
    Messages
    67
    Détails du profil
    Informations forums :
    Inscription : Novembre 2004
    Messages : 67
    Par défaut la suite
    J'ai rien compris !

    Binder.

    Je lis la table, en je récupère les valeurs des champs je ne remplis pas un datagrid etc..

    cpest simplemnent une lecture.
    salutations

  5. #5
    Membre chevronné Avatar de rikemSen
    Homme Profil pro
    Analyste Développeur Web - Fizzup.com
    Inscrit en
    Décembre 2007
    Messages
    387
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : France, Bas Rhin (Alsace)

    Informations professionnelles :
    Activité : Analyste Développeur Web - Fizzup.com
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Décembre 2007
    Messages : 387
    Par défaut
    Ca peut parraitre con et je sais pas si c'est bien ce qu'il vous faut...

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    dim myCommand as new OdbcCommand
    dim myReader as OdbcDataReader
     
    myCommand.Connection = laconnection
    myCommand.CommandText = "SELECT * FROM table"
    myReader = myCommand.executeReader
    do while myReader.read = true
    msgbox(myReader("nomduchamp"))
    loop
    myreader.close
    C'est ca?

  6. #6
    Membre actif
    Inscrit en
    Novembre 2004
    Messages
    67
    Détails du profil
    Informations forums :
    Inscription : Novembre 2004
    Messages : 67
    Par défaut suite
    Merci pour ton info, je connais cette methode, mais je souhaite lire l'objet TB déclaré plus haut de la même façon que ton exemple.

    Salutations

Discussions similaires

  1. [Débat] Technologie .NET vs JAVA
    Par neo.51 dans le forum Débats sur le développement - Le Best Of
    Réponses: 1047
    Dernier message: 14/01/2019, 16h15
  2. [Débat] Expériences au sujet de .NET
    Par DevX dans le forum Débats sur le développement - Le Best Of
    Réponses: 46
    Dernier message: 25/05/2014, 11h16
  3. A ceux qui ont migré de VB6 vers VB.Net
    Par Fox dans le forum VB 6 et antérieur
    Réponses: 81
    Dernier message: 21/05/2008, 14h56
  4. utiliser les tag [MFC] [Win32] [.NET] [C++/CLI]
    Par hiko-seijuro dans le forum Visual C++
    Réponses: 8
    Dernier message: 08/06/2005, 15h57
  5. Fichier PDOXUSRS.NET
    Par yannick dans le forum Paradox
    Réponses: 5
    Dernier message: 05/04/2002, 09h45

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