Pb de suppression dans une base de donnéeRésolu

Question

Bonjour j ai un petit probleme je cherche &#224; supprimer un &#233;l&#233;ment dans une de mes bases de donn&#233;es mais j ai une erreur de type incompatible a la ligne

'D&#233;claration des variables
  Dim DataBaseFile As String
  Dim RstQuery As Recordset
  Dim strsql As String
 
 'Chemin de la base de donn&#233;es
  DataBaseFile = App.Path & "\gestion.mdb"
 
 'On attribue une r&#233;f&#233;rence &#224; la variable DB
  Set Db = OpenDatabase(DataBaseFile)
 
 ' Requ&#234;te SQL: on s&#233;lectionne le genre
  ' du film s&#233;lectionn&#233; dans Listgenre
  strsql = "SELECT Genre FROM Genre"  strsql strsql & " WHERE Genre '" & ListGenre.Text & "'"
  Set RstQuery = Db.OpenRecordset(strsql)
  If Not (RstQuery.BOF And RstQuery.EOF) Then
    Do While Not RstQuery.EOF
      'On affiche les donn&#233;es s&#233;lectionn&#233;es dans les diff&#233;rents labels
        RstQuery.Delete
        RstQuery.Update
    Loop
  End If

la variable db est d&#233;clar&#233; en database

merci pour votre aide, si c est pas du tout comme ca kil faut faire pour supprimer merci de me le dire  
merci pour votre aide

cs_ITALIA · Accepted Answer

Normal ta requ&#233;te est fausse :

'On attribue une r&#233;f&#233;rence &#224; la variable DB
 Set Db = OpenDatabase(DataBaseFile)
 
' Requ&#234;te SQL: on s&#233;lectionne le genre
' du film s&#233;lectionn&#233; dans Listgenre
strsql = "DELETE * FROM Genre"strsql strsql & " WHERE Genre '" & ListGenre.Text & "'"
Db.Execute(strsql)

It@li@

cs_ITALIA · Answer

Ta table et ton champs s'appel "Genre" ?

It@li@

pointdalattitude · Answer

oui je sais c'est b&#234;te mais bon !

pointdalattitude · Answer

Je te remercie encore pour cette aide je sais pas ce que je ferais sans toi c'est la 2&#176; info ki marche ke tu me donne merci encore 

Par contre est ce que tu peux me dire comment on fait pour rafraichir ma list box apres avoir supprimer mon champs? merci

cs_ITALIA · Answer

Tu fais un clear de ta ListBox et tu la reremplis...Il ni a pas d'autres Soluces

D&#233;sol&#233;

It@li@

Pb de suppression dans une base de donnée

5 réponses

Discussions similaires