Avatar billede michael-schou Novice
20. maj 2007 - 21:51 Der er 9 kommentarer og
1 løsning

Opdater Tabel

Hey

Håber der er en herinde der kan hjælpe mig :-)

Jeg har en tabel som jeg indtaster nogle oplysninger i via en formular.

På min formular har jeg nogle knapper, min Gem og Slet knap vil jeg gerne have til at opdatere tabelen efter at jeg har gemt og slettet i tabelen.

Hvordan opdatere jeg min tabel?


--KODE START--

Svar = MsgBox("Vil du oprette denne person : " & Tekst1 & "?", vbYesNo + vbQuestion)
If Svar = vbYes Then

Tabel1PostSet.AddNew
Tabel1PostSet("Navn") = Tekst1
Tabel1PostSet("Hyperlink") = Tekst2
Tabel1PostSet.Update

Svar = MsgBox("Følgende person er blevet oprettet : " & Tekst1 & vbCrLf & "Hyperlink : " & Tekst2, vbInformation)

--KODE SLUT--
Avatar billede kjulius Novice
20. maj 2007 - 22:07 #1
Er det listen på skærmen du vil have opdateret? Eller er det tabellen?

Hvis det er listen, kan du gøre det med en

Me.Requery
Avatar billede lasserasch Juniormester
20. maj 2007 - 22:09 #2
Hvad er Tabel1PostSet for en kontrol på din form?
Avatar billede michael-schou Novice
20. maj 2007 - 22:24 #3
Jeg vil gerne have opdateret tabellen :-)

--KODE HER--

Dim akDb As Database
Dim Tabel1tabel As TableDef
Dim Tabel1PostSet As Recordset
Dim Sog As String
Dim Text As String
Dim Svar As Integer

Set akDb = CurrentDb()
Set Tabel1tabel = akDb.TableDefs("Tabel1")
Set Tabel1PostSet = akDb.OpenRecordset("Titel", dbOpenDynaset)

Svar = MsgBox("Vil du oprette denne person : " & Tekst1 & "?", vbYesNo + vbQuestion)
If Svar = vbYes Then

Tabel1PostSet.AddNew
Tabel1PostSet("Navn") = Tekst1
Tabel1PostSet("Hyperlink") = Tekst2
Tabel1PostSet.Update

--KODE SLUT--

Det foklare nok lidt mere :-)
Avatar billede kjulius Novice
21. maj 2007 - 19:19 #4
Nej, faktisk ikke. Hvad er dit problem, helt nøjagtigt? Får du en fejlmelding fra koden?
Avatar billede michael-schou Novice
21. maj 2007 - 20:11 #5
Problemet er den her : Tabel1PostSet.Update

Mine data bliver lagt i tabellen men jeg skal lukke access og åbne min DB igen før jeg kan aflæse mine nye data på min formular
Avatar billede kjulius Novice
21. maj 2007 - 21:54 #6
Som jeg allerede skrev i min tidligere kommentar, burde det være nok at afslutte din kode med Me.Requery, umiddelbart efter din update. Det er i hvert fald rigtigt, hvis din kode ligger i samme form som din Gem knap.

Hvis dine knapper ligger på en anden form end din liste, skal du i stedet skrive

Forms!formNavn.Requery

hvor formNavn er navnet på den form, hvor din tabel/forespørgsel bliver listet.

Jeg håber det hjælper dig... :-)
Avatar billede kjulius Novice
21. maj 2007 - 21:58 #7
Det var da vist noget sludder jeg fik skrevet.

"Det er i hvert fald rigtigt, hvis din kode ligger i samme form som din Gem knap." skulle have været:

Det er i hvert fald rigtigt, hvis din kode/Gem knap ligger i samme form som den form der viser dine rækker.

Håber det giver mere mening... :-)
Avatar billede michael-schou Novice
21. maj 2007 - 23:54 #8
Jeg prøver det lige :-)
Avatar billede michael-schou Novice
22. maj 2007 - 00:03 #9
Hey kjulius

Det virker bare som det skal .. takker mange gange :-)
Smid et svar og du får points.
Avatar billede kjulius Novice
22. maj 2007 - 18:15 #10
Okay, det kommer her... :-)
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
Kurser inden for grundlæggende programmering

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