Répondre à la discussion
Affichage des résultats 1 à 9 sur 9

Ajouter du contenu à un Combobox grâce à un document texte



  1. #1
    Arnoid

    Exclamation Ajouter du contenu à un Combobox grâce à un document texte


    ------

    Bonjours tout le monde il y a plusieurs jours que je travail sur un logiciel et je suis bloquer aujourd'hui car je voudrais faire lire un Combobox un fichier txt stocker en ligne le stockage et la lecture fonctionne parfaitement mais quand je veux faire lire mon fichier txt le Combobox me marque ceci :

    Code:
    adminarnoid
    Au lieu de marquer ceci :

    Code:
    admin
    arnoid
    Je ne sais pas quel code utiliser, j'ai déjà utiliser cette façon :

    Code:
    Dim MAJ As New WebClient
              Dim Liste As String = MAJ.DownloadString("https://dl.dropboxusercontent.com/s/cb17lpwcngmwo7n/Listaccept.txt")    ' mon fichier txt en ligne
              Dim nbr_ligne As Integer = 0
              Dim ligne As String
              Dim sr As New StreamReader(Liste)
            
    
    
              While sr.Peek <> -1
                  nbr_ligne += 1
                  ligne = sr.ReadLine()
              ComboBox1.Items.Add(Ligne)
             End While
    Mais cela ne marche pas


    Merci d'avance !!

    -----
    Dernière modification par Arnoid ; 22/09/2013 à 14h25.

  2. Publicité
  3. 📣 Nouveau projet éditorial de Futura
    🔥🧠 Le Mag Futura est lancé, découvrez notre 1er magazine papier

    Une belle revue de plus de 200 pages et 4 dossiers scientifiques pour tout comprendre à la science qui fera le futur. Nous avons besoin de vous 🙏 pour nous aider à le lancer...

    👉 Je découvre le projet

    Quatre questions à explorer en 2022 :
    → Quels mystères nous cache encore la Lune 🌙 ?
    → Pourra-t-on bientôt tout guérir grâce aux gènes 👩‍⚕️?
    → Comment nourrir le monde sans le détruire 🌍 ?
    → L’intelligence artificielle peut-elle devenir vraiment intelligente 🤖 ?
  4. #2
    Arnoid

    Re : Ajouter du contenu à un Combobox grâce à un document texte

    Dsl j'ai oublier de préciser que je programme en vb.net

  5. #3
    bisou10

    Re : Ajouter du contenu à un Combobox grâce à un document texte

    Tu t'emmeles les pinceaux. Tu ouvres un fichier comme une chaine, et après tu utilises un streamreader sur ta chaine, mais le streamreader ne va pas te découper ta liste.

    Si tu veux que ca marche, Liste doit être un StreamReader.

    A mon avis tu utilises un code trouvé sur le net que tu ne comprends pas, parce que tu t'embètes pour rien. Un SR sur ton fichier, un Split() et un data binding sur ta ComboBox et roule.

  6. #4
    Arnoid

    Talking Re : Ajouter du contenu à un Combobox grâce à un document texte

    Merci je vais essayer je ne suis pas sur d'avoir compris mais j'essaye et je te dit les resultats.

  7. A voir en vidéo sur Futura
  8. #5
    Arnoid

    Re : Ajouter du contenu à un Combobox grâce à un document texte

    Enfaîte je n'ai as réussi(compris)

  9. #6
    bisou10

    Re : Ajouter du contenu à un Combobox grâce à un document texte

    Je ferais pas comme ça mais ca peut marcher ça (syntaxe approximative selon mes souvenirs...)

    Code:
    Dim sr as New StreamReader()
    sr = My.Computer.FileSystem.OpenTextFileReader("C:\\monfichier.txt")
    
    While sr <> EOF 
         ComboBox1.Items.Add(sr.ReadLine())
    Wend
    
    
    sr.Dispose();
    Dernière modification par bisou10 ; 23/09/2013 à 22h44.

  10. Publicité
  11. #7
    Arnoid

    Smile Re : Ajouter du contenu à un Combobox grâce à un document texte

    J'ai essayer mais plusieurs erreurs sont apparues :

    Erreur 1 La résolution de surcharge a échoué, car aucun 'New' accessible n'accepte ce nombre d'arguments.

    Erreur 2 Argument non spécifié pour le paramètre 'FileNumber' de 'Public Function EOF(FileNumber As Integer) As Boolean'.


    code entier :

    Code:
    Imports System.Net
    Imports System.IO
    
    Public Class Form2
        Dim touche
    
        Sub Truk()
            Dim MAJ As New WebClient   
            Dim Liste As String = MAJ.DownloadString("https://dl.dropboxusercontent.com/s/cb17lpwngmwo7n/Listaccept.txt")
    
            Dim sr As New StreamReader()                                                      'erreur 1
            sr = My.Computer.FileSystem.OpenTextFileReader(Liste)
    
            While sr <> EOF()                                                                         'erreur 2
                ComboBox1.Items.Add(sr.ReadLine())
            End While
    
    
            sr.Dispose()
    
        End Sub
    
        Sub Admin()
            Dim MAJ As New WebClient
            Dim motdp As String = MAJ.DownloadString("https://dl.dropboxusercontent.com/s/aeifvgnd280zrm/admin.txt")
            If ComboBox1.Text = "admin" Then
                If motdp = TextBox1.Text Then
                    Form3.Show()
                    Me.Close()
                Else
                End If
            Else
            End If
        End Sub
    
        Sub User1()
            Dim MAJ As New WebClient
            Dim motdp As String = MAJ.DownloadString("https://dl.dropboxusercontent.com/s/7a0hg8xzvd5w2/user1.txt")
            If ComboBox1.Text = "user1" Then
                If motdp = TextBox1.Text Then
                    Form3.Show()
                    Me.Close()
                Else
                End If
            Else
            End If
        End Sub
    
        Private Sub Form2_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
            Truk()
        End Sub
    
        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            Admin() 'ajoute ici les new users
            User1()
    
        End Sub
    End Class
    merci d'avance
    Dernière modification par Arnoid ; 24/09/2013 à 16h39.

  12. #8
    bisou10

    Re : Ajouter du contenu à un Combobox grâce à un document texte

    Crée un fichier C:\test.txt contenant:
    Code:
    ItemA
    ItemB
    ItemC

    Et ensuite:
    Code:
    Dim sr As New StreamReader("C:\test.txt")
    		
    While sr.EndOfStream <> True
    	ComboBox1.Items.Add(sr.ReadLine())
    End While
    			
    sr.Dispose()

  13. #9
    Arnoid

    Wink Re : Ajouter du contenu à un Combobox grâce à un document texte

    Merci beaucoup d'avoir répondu aussi vite et d'avoir répondu tout court

Discussions similaires

  1. Insérer le contenu d'un fichier "PDF" dans un document Word (Word 2002).
    Par Lauret dans le forum Logiciel - Software - Open Source
    Réponses: 0
    Dernier message: 20/10/2011, 10h26
  2. Excel 2003 - Filtrer une ComboBox
    Par jorge1201 dans le forum Logiciel - Software - Open Source
    Réponses: 4
    Dernier message: 23/04/2011, 16h31
  3. Dans WORD, texte horizontal + texte vertical comment ?
    Par Cornemuse dans le forum Logiciel - Software - Open Source
    Réponses: 6
    Dernier message: 24/01/2010, 07h28
  4. [EXCEL VBA] => Lister des combobox et écrire leur contenu
    Par catsur dans le forum Logiciel - Software - Open Source
    Réponses: 3
    Dernier message: 20/05/2008, 10h13
  5. Positionner un bloc de texte en bas de la dernière feuille d'un document ?
    Par Myr dans le forum Logiciel - Software - Open Source
    Réponses: 0
    Dernier message: 31/03/2007, 21h43