Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : listbox access [ Archives Visual Basic / Formulaire ] (le__prince)

mardi 2 mai 2006 à 11:54:29 | listbox access

le__prince

bonjour a tt le monde

j'ai listbox que je vais met  des element  appellé d'un base de donne (access)  (  des noms de fichiers  ).

il y apossibilité de met un element plus qu'1 fois

je veu un code pour testé la listbox si ce nom de fichier existe  ds la liste.

ds la 2 eme operation je veu sauvegardé  ma liste ds la base comment je peu mettre chaque element  ds son place ds la bas.

merci de repondre

1000 merci 

 


mardi 2 mai 2006 à 13:52:54 | Re : listbox access

PCPT

Administrateur CodeS-SourceS
salut,
je crois me rappeler avoir supprimé ton dernier topic (le même).
pas de langage, pas de question, phrases incompréhensibles!
tu as lu le règlement?

mardi 2 mai 2006 à 14:46:59 | Re : listbox access

le__prince

mais c'est pas ca le prob !
je veu reponse svp j'ai pas de temps !
merci de repondre

mardi 2 mai 2006 à 15:36:56 | Re : listbox access

PCPT

Administrateur CodeS-SourceS
RéPONDRE A QUOI !!!!
LIS LE REGLEMENT ET REFORMULE EN CONSéQUENCE !!!!
DONC LANGAGE, QUESTION CLAIRE, ET SI POSSIBLE EN FRANçAIS !!!!

"c'est pas çà le problème" ?
bah attend-toi à rester avec le tien sur les bras...

Jovialement :)
PCPT  [AFCK]

mardi 2 mai 2006 à 15:50:33 | Re : listbox access

le__prince

bonjour a tt le monde

j'ai un projet  : j'utilise  vb6  et access.

j'ai listbox que je vais met  des element  appellé d'une base de donne (access)  (  des noms de fichiers  ).

je veu un code pour testé la listbox si 1 nom de fichier existe  ds la liste???????.
si oui  sort un msgbox.
sinon  ajoute le nom a la liste.

voila ma code pour ajouté   je veu  testé ma liste si 1 nom de fichier existe    :


Private Sub Command2_Click()

Dim list1text As String
conn = CurDir() & "\base\BD_Renseignement.mdb"
Dim ObjConn As New ADODB.Connection
Dim rs As ADODB.Recordset
ObjConn.Provider = "Microsoft.Jet.OLEDB.4.0"
ObjConn.ConnectionString = "Data Source=" & conn

If Label9.Caption = "" Or Label9.Caption = "0" Then
MsgBox "Pas de fichier a ajouter !?"
Else


If ObjConn.State = 0 Then ObjConn.Open
Set rs = ObjConn.Execute("select * from fichier")
If Not (rs.EOF And rs.BOF) Then
rs.MoveFirst
While Not rs.EOF
If Label9.Caption = CStr(rs!code_fichier) Then
list1text = CStr(rs!titre_fichier)
List1.AddItem list1text
End If
rs.MoveNext
Wend
End If
End If

End Sub

ds la 2 eme operation je veu sauvegardé  ma liste ds la base .
comment je peu mettre chaque element  ds son place ds la base de donne ???.

merci de repondre

1000 merci 


lundi 22 mai 2006 à 00:54:21 | Re : listbox access

le__prince

Réponse acceptée !

Dim iPos As Integer
    iPos = 0
    'Si la listbox est vide il quitte la fonction
    IfList3.ListCount < 1 ThenExit Sub
 
    Do WhileiPos < List3.ListCount
        List3.Text = List3.List(iPos)
        'Verifie si le text existe deja
 
        IfList3.ListIndex <> iPosThen
            'Si c'est le cas il supprime et garde la position iPos...
            List1.RemoveItem iPos
            
        Else

            'Si ce n'est pas le cas il change la position iPos...
            iPos = iPos + 1
        End If
    Loop

    'Utiliser pour désélectionner la dernière ligne
    List1.Text = "-"







http://www.vbfrance.com/code.aspx?ID=20418

 




Cette discussion est classé dans : access, met, listbox, element, ds


Répondre à ce message

Sujets en rapport avec ce message

Element ds ListBox [ par Gendarmette ] Comment vérifier la présence d'un élément dans une ListBox en utilisant les FSO?Merci! Gend<font color=b MAJ d'un element d'une db aprés avoir selectionner cet element ds une listbox ? [ par neo_tsubasa ] Bonjour à tous, Je met en place un logiciel qui va repertorier les problemes lier a l'utilisation de machines rezo et les solutions pour resoudre les suppression d'un element d'une listbox sous access [ par babylonne ] bonjour tt le monde, je rencontre un probleme au niveau de la suppression d'un element dans listbox , j'ai procede ainsi  Dim ligne as Integer For  li recuperer un element selectionner ds menu deroulant [ par mqsi ] salut,comme le titre signale,je cherche a recuperer l'element selectioner ds un menu deroulant,j'arrive a pointer sur le menu deroulant ds la page.<di utilisation des RecordSet sous Access pour remplir une table [ par samster ] Bonjour, J'ai créé une petite base access avec un formulaire de recherche multicritères me renvoyant les résultats de recherches dans une listbox (sit Boutton -> selectionne un element listbox [ par Maxime31 ] Bonjour,truc tout simple (je débute :) ) :Quelle instruction permet de selectioner un élément donné dans une listbox ? (je suis en compact framework, UserForm Access (listbox) [ par imsse ] Bonjour, voila je cherche a maitriser les UserForms sur access, plusieur personnes m'ont expliké que les formulaires sont beaucoup plus facile a utili ACCESS 2002 EXTRACTION DS UN CHAMPS MEMO de N° téléphone et REMPLISSAGE ACCESS [ par STEPHANDALLEINE ] Je développe pour le plaisir,je souhaite extraire des n° de téléphones dans des annonces publiées sur internet,cé annonces sont dans une Table1 dans u listbox access [ par le__prince ] bonjour a tt le monde j'ai un projet  : j'utilise  vb6  et access.j'ai listbox que je vais met  des element  appellé d'une base de donne (access)  (


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


HTC G1

Entre 449€ et 449€


Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,936 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.