Supprimer un article dans Fichier [VB6]

Question

Bonsoir &#224; tous
dans ma FORM ,j'ai une listbox,un textbox et un bouton pour enregistr&#233;.A l'ouverture de ma FORM je r&#233;cupere les articles qui ont &#233;taient enregistr&#233; dans un fichier.Gdx.



&#224; l'aide du bouton, j'enregistre des Articles dans un fichier .GDX,voila le code
Private Sub ajoutarticles()
Dim i As Integer
Dim article As String
For i = 0 To List.ListCount
    If txt_codec = List.List(i) Then
        MsgBox "Cet article est d&#233;j&#224; enregistr&#233; dans la base"
        txt_article.Text = ""
        Exit Sub
    End If
Next i
If TabStrip1.Tag = 1 Then
    ReDim Preserve famille(dimtfamille)
    taudio(dimtfamille) = txt_codec
    List.AddItem tfamille(dimtfamille)
    dimtfamille = dimtfamille + 1


ElseIf TabStrip1.Tag = 2 Then
    ReDim Preserve tvideo(dimtcategorie)
    tvideo(dimtcategorie) = txt_article    List.AddItem tcategorie(dimtcategorie)
    dimtcategorie = dimtcategorie + 1
End If
 K = List.NewIndex
    txt_article.Text = ""
End Sub

et &#224; l'aide d'un autre bouton je voudrais,quand un article est s&#233;lectionn&#233; dans la Listbox le supprim&#233; du le fichier.
est ce possible,si oui,comment faire 
merci
@ plus
petchy

Gobillot · Answer

non pas possible de supprimer une ligne particuli&#232;re dans un fichier,

faut r&#233;&#233;crire tout le fichier,

mais comme ta ListBox est le reflet de ton fichier, il suffit de supprimer la ligne dans la ListBox,

et de r&#233;&#233;crire toute la ListBox (en fin de programme)





si tu veux g&#233;rer des suppressions, il faudrait que ton fichier soit en mode Random,

avec un code particulier qui dirait si l'enregistrement est supprim&#233; ou pas,

dans ce cas une simple r&#233;&#233;criture de l'enregistrement avec le code
supprim&#233; est possible, et bien que toujours pr&#233;sent, il sera consid&#233;r&#233;
par le programme, comme supprim&#233;.

Daniel

cs_petchy · Answer

Salut Daniel
Ok,je vais voir pour passer par ma base ACCESS
merci
bonne soir&#233;e et bonne f&#234;te de fin d'ann&#233;e
Petchy

Supprimer un article dans Fichier [VB6]

2 réponses

Discussions similaires