Avatar billede Slettet bruger
13. november 2007 - 15:01 Der er 8 kommentarer og
1 løsning

SQL-kopiering af record

Jeg bruger denne SQL-kommando for at slette alle record i en tabel:   
DoCmd.RunSQL ("delete * from tidsforbrug")

Og jeg bruger denne for at kopiere en record (current record)
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70
men den går galt når jeg kopierer felter der er bundet til en combobox.
Hvordan ser en SQL-commando ud der kopierer current-record (identificeret ved Autonummerering)
vh. OMN
Avatar billede terry Ekspert
14. november 2007 - 08:19 #1
The code you use to copy a record should work, also with a combo.

What problem do you get?
Avatar billede Slettet bruger
14. november 2007 - 08:22 #2
INSERT INTO tidsforbrug(felt1, felt2)
SELECT forms!DinFormular!felt1 AS Expr1, forms!DinFormular!felt2 AS Expr2;

Så skal du bare huske, at det er det felt i komboboksen, som er sat under egenskaben "bundet kolonne", som der refereres til (det er måske også det problem, du sidder med nu!~)
Avatar billede Slettet bruger
14. november 2007 - 08:23 #3
Hovsa.... Go'morn.. Terry..

Ja, som Terry siger, så burde det virke!~)
Avatar billede terry Ekspert
14. november 2007 - 09:01 #4
Morning every one :o)

If the relationships are in place between the bound field in the combo and the table where the records in the combo are taken from, then ther should be no problme at all using the code you use.
Avatar billede Slettet bruger
14. november 2007 - 15:46 #5
Hej Terry,
I is not easy to explain, but I can send you a little Acces example, which illustrate my problem. You can then try it yourself and maybe see what I am doing wrong.
I am agree - my code should work - but it does not. 

Do you have a mail I can use ?

Vh. OMN
Avatar billede terry Ekspert
14. november 2007 - 15:59 #6
ekspertenATsanthell.dk
AT = @
Avatar billede terry Ekspert
15. november 2007 - 13:55 #7
I think the problem is because the text in the visible column is not unique so it takes the first value which matches. If they were unique it would work ok I think. Anyway a quick and dirty solution :o)

Make the first column which is unique visible before you copy and then hide after.

Me.[AID-Fakt].ColumnWidths = "1cm;4cm;2cm;2cm;5cm;4cm"

    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append
    DoCmd.GoToRecord , , acLast
   
Me.[AID-Fakt].ColumnWidths = "0cm;4cm;2cm;2cm;5cm;4cm"
Avatar billede terry Ekspert
19. november 2007 - 12:45 #8
does this help Ove?
Avatar billede Slettet bruger
22. november 2007 - 13:51 #9
Yes Terry - It works very well, but I have redesignet my code so that I not use a hidden column.

Thanks. OMN
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