Discussion :

[monphp]

Bonjour tt le monde ,

je voulais savoir comment faire pour faire une insertion dynamique à partir d'un identifant sans le saisir prealablement du style

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

INSERT INTO MYTABLE (chp1, chp2, chp3) values(8, "prenom", "nom")

j'ai pensé plutôt faire txtNum.value à la place de 8 qui est le champ du numero identifiant

merci d'avance

[Invité]

j'ai pensé plutôt faire txtNum.value à la place de 8 qui est le champ du numero identifiant

Bonjour,

Il faut que tu testes avant de poser la question, juste une chose, pense que tu crées une chaine de caratères, donc il y'a concaténation.

Starec

PS : Tu es sur la bonne voie.

[monphp]

merci starek,

en fait j'ai essayé de faire comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into mytable(chp1, ch2, .. ) values ('txtNum.value' & ' '  , ... , .. )

mais ça ne marche pas .

merci d'avance de votre aide

[Invité]

Re

1 - Pense à mettre les balises codes
2 - Ce n'est pas starek, mais Starec
3 - Je t'ai dis par concaténation, ce serait plutôt

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

insert into mytable(chp1, ch2, .. ) values ('" & me.txtNum.value & "' , ... , .. )

' pour du texte
# pour des dates
rien pour du numérique

Starec

[monphp]

merci Starec de ton aide ,

par contre au niveau de la suppression j'ai procede ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

me.lstresult.RemoveItem(me.lstresult.listIndex)

mais le probleme je ne trouve pas l'equivalent de removeItem dans vba access donc j'ai encore utilisé cette solution ,mais elle ne fonctionne pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ListBox1.Items.Remove(ListBox1.SelectedItem)

[monphp]

j'ai un petit souci par rapport à la supprssion d'un element dans ma listbox que je n'arrive pas à resoudre et en plus je n'arrive pas à trouver l'equivalent de removeItem car il me dit que la methode est introvable
merci d'avance de votre aide
voici le bout de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub cmdSupprimer_Click()
 Dim ligne As Integer
 For ligne = 0 To Me.lstConsult
  If Me.lstConsult.Selected(Me.lstConsult.Selected(ligne)) = True Then
   Me.lstConsult.RemoveItem (ligne)
  End If
Next ligne
End Sub

[Invité]

Re

Qu'elle version d'Access as-tu ? Car RemoveItem est apparu à partir d'Access 2002.

Starec

[monphp]

j'utilise la version 2000

[Invité]

Re

Donc pas de RemoveItem ou de AddItem.

Je dois partir, mais fait une recherche sur le forum, il y'a moins d'un mois j'ai donnée une solution sans ces deux éléments.

Starec