Avatar billede spejder_leon Nybegynder
25. oktober 2003 - 17:59 Der er 11 kommentarer og
1 løsning

rette værdier i en post fra VBkode.

Jeg har en nøgle [id] til mine værdier.
Jeg kender værdien for id. eks 452.
Jeg skal så rette [pris] i den pågældende post.

Hvordan gør jeg det i vbkode?
25. oktober 2003 - 18:02 #1
docmd.setwarnings false
docmd.runsql "update [Din tabel] Set Pris = " & 1000 & " Where ID = " & 452
docmd.Setwarnings true
Avatar billede spejder_leon Nybegynder
25. oktober 2003 - 18:08 #2
Kunne tjekke med... kan man?

docmd.runsql "update [Din tabel] Set Pris = " & 1000 & " Set Titel = '" & Chef & "' Where ID = " & 452
Avatar billede henrik13 Nybegynder
25. oktober 2003 - 18:13 #3
Lav en knap, og indskriv:
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer20
Avatar billede henrik13 Nybegynder
25. oktober 2003 - 18:15 #4
Det kan også lægges ind i det aktuelle felt, i hændelsen "Ved klik"
Jeg kan godt lave en demo til dig.
Avatar billede spejder_leon Nybegynder
25. oktober 2003 - 18:16 #5
det sidste kan ikke bruges, jeg henter oplysningerne  i en ekstern fil. Er interreseret i at kunn opdatere 3 felter samtidigt, men det ville være rart at kunne gøre det i en sql sætning.
Avatar billede henrik13 Nybegynder
25. oktober 2003 - 18:22 #6
Lav en forespørgsel, og i kriterier skrov:
Like [Søg 1] Or Like [Søg 2] Or Like [Søg 3]
Avatar billede spejder_leon Nybegynder
25. oktober 2003 - 18:23 #7
Forespørgsel er ikke udvejen!
Avatar billede henrik13 Nybegynder
25. oktober 2003 - 18:23 #8
Til 5 ser den sådan ud:
Like [Søg 1] Or Like [Søg 2] Or Like [Søg 3] Or Like [Søg 4] Or Like [Søg 5]
Vh Henrik13
Avatar billede henrik13 Nybegynder
25. oktober 2003 - 18:28 #9
I SQL ser den sådan ud:
SELECT Tabel1.Id
FROM Tabel1
WHERE (((Tabel1.Id) Like [Søg 1] Or (Tabel1.Id) Like [Søg 2] Or (Tabel1.Id) Like [Søg 3]));
Avatar billede fynbohans Nybegynder
25. oktober 2003 - 20:33 #10
Hvis du vil bruge VBA finder du den pågældende post og retter beløbet.
Du skal bruge et felt til at skrive valgte id i [RET] og en knap [RETKNAP].
VedKlik skriver du som Hændelseprocedure:

Private Sub RETKNAP_Click()
            Dim IDRet As Long
           
            IDRet = [ID]
            [ID].SetFocus
            DoCmd.FindRecord [RET]
            If [ID] = IDRet Then MsgBox "Post ikke fundet"
End Sub
25. oktober 2003 - 20:45 #11
Sorry, jeg har lige været væk nogle timer.
Selvfølgelig kan du gøre det i én SQL-sætning:

docmd.runsql "update [Din tabel] Set Pris = " & 1000 & ", Titel = '" & Chef & "' Where ID = " & 452

Henrik-> Hvordan er det lige, at du får opdateret de 2-3 felter via dit forlag??
Avatar billede spejder_leon Nybegynder
25. oktober 2003 - 20:47 #12
endte med at bruge thomasjep... 's første forslag som udgangspunkt... så point til den herre
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester