Avatar billede s_pede Nybegynder
25. juli 2003 - 13:51 Der er 9 kommentarer og
1 løsning

Bog-arkivering

Hej!.
Jeg er i gang med at lave en database over noget diverse litteratur...
Jeg har lavet en standard formular med de 50 største værker og et navnefelt i toppen, så man kan skrive hvem der bruger formularen. Ved hvert værk kan man trykke på "kommentar".. Herefter åbner en ny formular hvor man skrive en kommentar. Så langt er jeg nået. Men når så en anden bruger skal bruge formularen, laver formularen en ny record og navnefeltet er tomt.. Hvis man så trykke på kommentar nu, står der stadig det samme som den sidste bruger skrevet... Det skal ændres, men hvordan???

Jeg åbner den nye formular sådan her:

    DoCmd.OpenForm "Mark", , , "Bog='2'"

Jeg kan godt se fejlen, nemlig at Bog=2 er konstant... Men ved ikke hvordan det skal rettes
Avatar billede s_pede Nybegynder
25. juli 2003 - 14:40 #1
ok... men lad os hellere stille spørgsmålet!? Da jeg selv fandt ud af noget..

Denne kommando:
DoCmd.OpenForm "Mark", , , , "Bog='" & navn & "-bog02'"
åbner kun hvis bog har den værdi... Men hvis man værdien ikke findes hvordan får man den til at lave en ny post...?
Avatar billede mlhave Nybegynder
25. juli 2003 - 17:23 #2
jeg antager at dit kommentarfelt ligger i samme tabel som de øvrige data om bogen.
Opret en formular der kun indeholder feltet kommentar og de nødvendige nøglefelter. Lav derefter en knap, der hvor kommentarfeltet skal findes fra - gerne ved hjælp af guiden - der åbner den nye formular.
Læg evt en mailadresse så skal jeg sende et eksempel.

Koden på knappen i mit tilfælde bliver:

Private Sub Kommandoknap29_Click()
On Error GoTo Err_Kommandoknap29_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "xxx test"
   
    stLinkCriteria = "[MødeNr]=" & Me![MødeNr]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Kommandoknap29_Click:
    Exit Sub

Err_Kommandoknap29_Click:
    MsgBox Err.Description
    Resume Exit_Kommandoknap29_Click
   
End Sub
Avatar billede terry Ekspert
25. juli 2003 - 19:50 #3
s_pede>If you can send the dB to eksperten@santhell.dk then I can take a look to see exactly what you mean!

You can easily find out if the book exists BEFORE you open th eform and if it does NOT open the form ready for entering a new record.

If Dcount ("*", "SomeTableNameGoesHere", "Bog='" & navn & "-bog02'") > 0 Then

DoCmd.OpenForm "Mark", , , , "Bog='" & navn & "-bog02'"

Else

Msgbox "Bogen findes ikke"

DoCmd.OpenForm "Mark", , , , acFormAdd, , navn & " - bog02

end if

Then in the form load event for the form "Mark" you can use the openargs to copy the value of the book name into the book name field.

Private Sub Form_Load()

    If Not IsNull(Me.OpenArgs) Then Me.SomeFieldOrOther = Me.OpenArgs
End Sub
Avatar billede terry Ekspert
25. juli 2003 - 19:52 #4
Little error there I can see :o)

DoCmd.OpenForm "Mark", , , , acFormAdd, , navn & "-bog02"
Avatar billede s_pede Nybegynder
27. juli 2003 - 15:10 #5
Tak... Jeg har lige været på ferie i weekenden, hvilket er grunden til jeg først svare nu
Avatar billede s_pede Nybegynder
27. juli 2003 - 15:12 #6
Det er rigtig svar, men det virker ikke fordi at kommentarfeltet er i en anden tabel..
Avatar billede s_pede Nybegynder
27. juli 2003 - 16:00 #7
Terry>> Det virker som om du godt forstår dansk, men hvis du vil have jeg skriver på engelsk er dette også muligt..

Men din besvarelse åbner korrekt nok en ny form, men for det første indsætter den nye form ikke det argument man sender med til den nye form. Og for det andet, hvis man åbner tablen og indsætter en værdi, (bare for at se om det virker), åbner den hellere ikke den post som svarer Bog 's argument
Avatar billede terry Ekspert
27. juli 2003 - 18:42 #8
No need to write in English, I understand dinish fine.

You say your comment field is in anoter table! Well the tables should be related in some way, so you will need to use the foreign key field to find the right record. Its a little hard to give a precise answer as I dont know how your tables are made up. I will take a look if you send it to me that way I have a better chance of making suggestions.
Avatar billede s_pede Nybegynder
27. juli 2003 - 20:31 #9
Jeg kan ikke sende filen før i morgen... Men er det virkelig nødvendigt, (Nu tænker jeg mere på ikke at bruge så meget af din tid). Problemet er jo bare at "Bog" skal defineres sådan så den læses fra en anden (ekstern) tabel.. Umiddelbart virker det da rimelig simpelt.
Avatar billede terry Ekspert
28. juli 2003 - 08:15 #10
Its (almost) always simple for the person who designed the system to understand it! The only information I have on your system is what you have given here, so it shard for me to say why it doesnt work. Can you show the the table layout, also which table the form form entering comments is using.
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