Discussion :

[Tatoine]

Bonjour,

je souhaite ins"rer dans ma table UC differentes données:
IDUC, AdresseIp, RamTailleMo, Processeur, OS, ecranResolution

Ces données, je veux les récupérer de zones de texte d'un formulaire.
(les zones de texte sont également identifiées par: IDUC, AdresseIp, RamTailleMo, Processeur, OS, ecranResolution et sont "indépendantes")

j'ai donc écrit le code suivant en VBA

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Private Sub ajouter_Click()
On Error GoTo Err_ajouter_Click
Dim strFiltre As String
Dim strSQL As String
 
strSQL = "Insert Into UC(IDUC, AdresseIp, RamTailleMo, Processeur, OS, ecranResolution) Values (Me.IDUC,Me.AdresseIp,Me.RamTailleMo,Me.Processeur,Me.OS,Me.ecranResolution)"
 
DoCmd.RunSQL strSQL
 
Exit_ajouter_Click:
    Exit Sub
 
Err_ajouter_Click:
    MsgBox Err.Description
    Resume Exit_ajouter_Click
 
End Sub

Hors, lorsque je clique sur le bouton, on me demande les valeurs de Me.IDUC, Me.AdresseIp ...etc

Comment je peux récupérer ces satanées données!

je suis sur que c'est pas compliqué...question de guillemet ou autre, mais je bloque depuis 3/4 d'heures!

une idée?
merci

[vmolines]

<Me.xxx> est une référence valide dans le contexte d'execution VBA. Mais quand tu passes une chaine sql comme tu le fais, le <Me.xxx> dans la chaine sql, c'est le moteur sql qui interprête ; or il ne connait pas <Me.xxx>.

Il faut que la chaîne contienne déjà les bonnes valeurs. Il s'agit donc bien d'un problème de guillemet (dit vulgairement).

A toi de jouer pour "sortir" ceci de ta chaine sql et lui passer les valeurs et non pas les références.

[Tatoine]

bon, je dois bien avouer que je sèche...

j'ai essayé les guillemets un peu partout.
ou en utilisant le Me.IDUC.Value
mais, je ne trouve tjs pas.

mais je sens que vous etes en mseure de pouvoir m'aider facilement n'est-ce pas ?

[vmolines]

Je ne suis pas celui qui prend par la main. Help yourself !

Mais je te montre la voie :

http://cafeine.developpez.com/access...el/debugprint/

[LostIN]

strSQL = "Insert Into UC(IDUC, AdresseIp, RamTailleMo, Processeur, OS, ecranResolution) Values (Me.IDUC,Me.AdresseIp,Me.RamTailleMo,Me.Processeur,Me.OS,Me.ecranResolution)"

strSQL = "Insert Into UC " _
& " (IDUC,...) " _
& " Values ('"& Me.IDUC &"' ,...)"

fait gaffe au ' si tu en as dans tes valeurs
donc fonction replace

[LostIN]

et pour isoler les sources de bogues

tu mets ton me.iduc ou ce que tu cherches dans une variable
et ensuite ton ordre sql avec ta variable.

'"& mavariable &"'

[Tatoine]

Merci beacoup à vous deux.

en fait, mon problème ne venait pas des guillemets, mais des cotes !

déjà en php je me faisais avoir!

[Tofalu]

Si c'est résolu, faudrait penser à cliquer sur le bouton !