Søg
Avatar billede snowball Novice
22. september 2003 - 13:17 Der er 10 kommentarer og
1 løsning

Find næste ledige nummer (design af form)

Hej.

Jeg har aldrig brugt Access som frontend før, så jeg aner ikke hvordan man gør det her, men det er sikkert meget let for en der jævnligt bruger Access som frontend.

Med udgangspunkt i nedenstående Access97 DB, skal jeg have lavet følgende:

Når man på formen vælger noget i de 2 comboboxe, så skal Access automatisk finde det næste ledige nummer i serien ud fra et opslag i Kort tabellen. Altså, vælger man M og derefter H så skal der i Nyt Id feltet stå MH003 da det er det næste ledige nummer i MH rækkefølgen. Vælger man f.eks. P og derefter H så skal der i Nyt Id feltet stå PH004 da det er det næste ledige nummer i PH rækkefølgen. Håber det giver mening.

Access97 DB: http://home1.inet.tele.dk/j-cgeert/form.mdb

Resultatet kan du enten ligge online på din egen side, eller maile det til mig på mail@geertsen.dk (det første er at foretrække pga. Ekspertens regler, men ellers ligger jeg det online bagefter)

På forhånd tak.

Snowball
Avatar billede terry Ekspert
23. september 2003 - 09:44 #1
you seem to be getting lots of help here snowball :o)

I've had a quick look at the dB and something you dont mention is that the next number is actually part of the "MaskinNr" and also that there ar a number of characters BEFORE the two letters.
So this doesnt make a solution easier which is more than likley why you havnet got much help!
Avatar billede snowball Novice
23. september 2003 - 10:46 #2
terry: Det burde jeg måske have nævnt, men så det ikke som et stort problem (det ville det ikke ha' været i f.eks. Delphi). Men hvis det gør opgaven nemmere, så kan jeg nok også godt leve med at MaskinNr feltet i Kort tabellen splittes op så det kommer til at ligge i 3 (4) felter (f.eks. ("123") "P", "H" og "001")

Snowball
Avatar billede terry Ekspert
23. september 2003 - 11:32 #3
Snowball it isnt hard in Access/VBA either but because your first three characters are NOT in order as the last three are then the MaskinNr is NOT sorted so we have to find a way of getting them sorted to get the highest of the last three characters. And I could also ask, are there always three characters first?
Avatar billede snowball Novice
23. september 2003 - 11:50 #4
terry: Sorry, endnu en ting jeg skulle ha' nævnt for jer. De tal der står foran f.eks. PH er helt vilkårlige og kan for så vidt også være bogstaver og mere eller mindre end 3 karakterer. Men dem skal i faktisk bare ignorere, så i kun arbejder med f.eks. PH003 delen af MaskinNr.

Prøv og hent databasen igen fra ovenstående link - felterne er nu blevet splittet op, og det er som sagt så bare felterne Afdeling, Gruppe og Nummer i skal koncentrere jer om.

Håber jeg har fået alle detaljer med nu ;)

Snowball
Avatar billede terry Ekspert
23. september 2003 - 12:12 #5
The requirement specification is finished (hopefully) NOW we can find a solution :o)
Actually had one already!
Avatar billede terry Ekspert
23. september 2003 - 12:38 #6
just having some lunch, back in 5 (or so)
Avatar billede snowball Novice
23. september 2003 - 12:44 #7
Helt fint :)

Snowball
Avatar billede terry Ekspert
23. september 2003 - 13:05 #8
Make a function on your form. Then in each of the combo's AFTER UPDATE events write

=FindNextNumber()

Function FindNextNumber() As String
Dim n As Integer

    If Not IsNull(Me.Combo0) And Not IsNull(Me.Combo2) Then  'Both selected
   
        'Convert to integer. If not found default to 0
        n = CInt(Nz(DMax("Nummer", "kort", "Afdeling = '" & Me.Combo0.Column(1) & "' AND Gruppe = '" & Me.Combo2.Column(1) & "'"), 0))
       
        Me.Text7 = Me.Combo0.Column(1) & Me.Combo2.Column(1) & Format(n + 1, "000")
       
    End If

End Function
Avatar billede terry Ekspert
23. september 2003 - 13:58 #9
snowball can you use this?
Avatar billede snowball Novice
23. september 2003 - 14:03 #10
Perfekt. Det virker som det skal.

Tak for hjælpen :)

Snowball
Avatar billede terry Ekspert
23. september 2003 - 14:12 #11
selv tak :o)
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
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
en word dotx fil stilles om til at blive gemt i skyen Af per2edb i Access 9 16/04/202620:11 21/04/202615:43
AI integreret i Access Af per2edb i Access 3 06/04/202610:42 06/04/202612:58
Autonummerering Af hlnviv i Access 2 06/03/202606:24 06/03/202607:48
stigende sortering på et Link felt Af hlnviv i Access 6 03/03/202613:18 04/03/202608:09
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
07/1022:52 Google beskeder har/havde en bug, så den sendte tilfældige gamle beskeder gemt indeni nye beskeder efter skifte til ny Samsungtelefon via Samsung Smart Switch Af KennethLykke i Apps til Android
05/1010:31 Min IPAD vil ikke oplade. Af Nørdnot i Mac
04/1018:04 Findes der et "Papir-kurv" symbol, man kan sætte på Firefox og Google Chrome ? (For oven) Af Ikke-ekspert i Browsere
03/1012:14 Ang udskrift Canon mb5050 Af made18 i Printere
02/1021:29 Vedr. Windows 11 version 26H2 Af ErikHg i Fri debat
White papers
Flere white papers »