update kriterium unverträglich 3464

13/11/2008 - 15:10 von Philippe Malmedé | Report spam
Hallo

habe wieder ein problem.

ich will das dsum ergebnis aus einem unterformular in die tabelle
TBL_artikel_vk eintragen.

bei dem update befehl erhalte ich immer die meldung "datentyp in Kriterium
unvertràglich" Feher-nr 3464

folgenden code hab ich geschrieben

Private Sub Form_AfterInsert()
Dim SQLtext As String
Dim varArtikel_key As String
Dim varBestand As String


varBestand = DSum("lagerort_1_bestand", "TBL_Lagerort", "[artikel_VK] = " &
artikel_vk)

varArtikel_key = artikel_vk

MsgBox "artikel key " + varArtikel_key

SQLtext = "UPDATE TBL_Artikel_vk " & _
"SET TBL_Artikel_vk.Artikel_VK_bestand = '" & Str(varBestand) & "'
" & _
"WHERE TBL_Artikel_vk.Artikel_vk_key = '" & Str(artikel_vk) & "';"

MsgBox SQLtext

DoCmd.RunSQL SQLtext

vielen dank schon mal im voraus

gruß

Philippe
 

Lesen sie die antworten

#1 Thomas Winkler
13/11/2008 - 15:19 | Warnen spam
Hi,

varBestand = DSum("lagerort_1_bestand", "TBL_Lagerort", "[artikel_VK] = " &
artikel_vk)



Wie ist denn die Variable artikel_vk deklariert?

Hier behandelst Du artikel_vk als numerischen Wert.


varArtikel_key = artikel_vk

MsgBox "artikel key " + varArtikel_key

SQLtext = "UPDATE TBL_Artikel_vk " & _
"SET TBL_Artikel_vk.Artikel_VK_bestand = '" & Str(varBestand) & "'
" & _
"WHERE TBL_Artikel_vk.Artikel_vk_key = '" & Str(artikel_vk) & "';"



Hier hingegen behandelst Du ihn als String.

Welchen Datentyp haben denn

die variable artikel_vk und
das Tabellenfeld TBL_Artikel_vk.Artikel_vk_key

nun? Im Falle von Numerisch, müsste die WHERE-Klausel so lauten:

WHERE TBL_Artikel_vk.Artikel_vk_key = " & artikel_vk & ";"

Vielleicht führt auch das fehlende Leerzeichen vor WHERE noch zu einem
Problem.

HTH

Thomas

"Access? Damit arbeite ich nicht. Das ist doch nur ein abgespecktes Excel."

Ähnliche fragen