runsql med dlookup

dim sql as string
sql = "SELECT Tabel.Alder, DLookUp("[Felt]","Tabel","[Alder]=" & [Alder]-2) AS P1 INTO tInput FROM Tabel;"
docmd.runsql sql

Prøv!~)

hvis sql'en skal deles op, så kan man gøre sådan:
dim sql as string
sql = "SELECT Tabel.Alder, DLookUp("[Felt]","Tabel","[Alder]=" & [Alder]-2) AS P1" & _
"INTO tInput FROM Tabel;"
docmd.runsql sql

Jeg ved dog ikke om det har nogen betydning, hvor der deles?~)
Normalt så genererer jeg mine sql'er og så deler jeg hvor generatoren har delt....

men skal der ikke være nogle "&"-tegn ind imellem?
Fx:
"SELECT Tabel.Alder, DLookUp(" & [Felt] & ","Tabel","[Alder]=" & [Alder]-2) AS P1 INTO tInput FROM Tabel;"

Jeg mener: bliver den ikke forvirret over at der pludselig inde midt i sætningen kommer gåseøjne (")? Vil den ikke anse det som slutningen af sætningen?

Har du prøvet?~)

nej det gør jeg lige

den siger:
"Compile error.
expected end of statement"
og markerer området lige efter 2. gåseøje

den tror vel at udtrykket slutter her

jeg tror at du skal dele udtrykket

alder2 = DLookup("[Felt]", "Tabel", "[Alder]=" & [Alder] - 2)
sql = "SELECT Tabel.Alder, " & alder2 & " AS P1 INTO tInput FROM Tabel;"
DoCmd.RunSQL sql

Det var en god idé. Det øger overskuelilgheden. Men det løser ikke umiddelbart problemet. Dog ser det ud til, at problemet er af en lidt anden karakter, end jeg troede. For den vil slet ikke tage linien:

alder2 = DLookup("[Felt]", "Tabel", "[Alder]=" & [Alder] - 2)

Og det forstår jeg ikke helt. Det fungerer i en tabeloprettelsesforesp. jeg har lavet, men åbenbart ikke i VB. Kan det være fordi der jo ikke eksisterer alder - 2 i de første to rækker i tabellen? I tabeloprettelsesforespørgslen sætter den bare værdien nul ind i de første to rækker.

Nå men jeg tror lige, at I får lov at dele pointsene, og så opretter jeg et nyt spm. vedr. ovenstående nye problem.
Vil du smide et svar Kabbak?

og også dig spq

takker!~)
hilsen
spg

et svar ;-))