Tælle bestemte brugere

Ja, du laver en SQL update på det felt hvor brugernavnet matcher den aktivebruger.
Hvis du f.eks. har en tabel med navnet Taeller og felterne bruger og antal, kan du bruge følgende SQL:
UPDATE taeller SET antal = antal + 1
WHERE (((taeller.Bruger)=currentuser()));

Koden checker hvem der er logget på og tæller vedkommendes tæller op med 1.

Glemte at sige, at ovenstående kode kræver at brugerne ER oprettet i tabellen! ;)

kan du uddybe det lidt?

Gerne. Er det SQL delen eller det logiske i det?

Min plan gik på at hvis man lavede et felt til hver enkelt brugernavn, og har defineret brugere ved hjælp af access indbyggede funktion, om jeg så kunne sig get.user eller noget i den stil for at se hvem der er på og så sige, læg 1 til i tabellen der svarer til brugeren

lidt af hvert tror jeg

ok.
Ved du hvor du indtaster kode i VBA editoren?
(altså, hvordan du \"hægter\" kode på f.eks. en knap?)

Nedenstående kode oodaterer antallet af gange en bruger har åbnet en given formular (forudsætter at brugeren allerede er indtastet i tabellen):

Private Sub Form_Open(Cancel As Integer)
On Error GoTo Formular_Open_Err

DoCmd.SetWarnings False
DoCmd.RunSQL \"UPDATE taeller SET antal = antal + 1 WHERE (((taeller.Bruger)=currentuser()))\"
DoCmd.SetWarnings True

Formular_Open_Exit:
  Exit Sub
Formular_Open_Err:
  MsgBox Error$
  Resume Formular_Open_Exit
End Sub

Tjaaa, jeg har lavet en primitiv tæller, så jeg tror godt lige at jeg kan finde kodedelen, vba altså. :0)

Jeg er rimeligt godt inde i tingene men jeg kunne sgu ikke lige greje den her, men det er jo også ved at være weekend!

:)
(heldigvis!)

med oprette i tabellen, mener du bare at der skal være et felt til hver bruger ikke. og så skal det vel bare have samme navn som brugerens brugernavn

YES! sådan, lige præcis!

det vil jeg prøve men du må lige have tålmodighed til mandag. Databasen er en større sag, så det tager lidt tid!

:) (så vil jeg ønske god weekend)

Jeg har et \"lignende\" problem..
Jeg ønsker at registrere de brugere, der opretter og ændrer felter i tabellerne i DB\'en. Jeg har erfaret at jeg ikke kommer udenom VB, men jeg kan ikke helt lure hvordan jeg får datoer og brugerID smidt ned i en tabel, så jeg kan hente det derfra????

Ok, ugotabe kidding, this one\'s for free!

**************************************************Private Sub Form_Open(Cancel As Integer)
On Error GoTo Formular_Open_Err
DoCmd.SetWarnings False
DoCmd.RunSQL \"INSERT INTO adgang (dato,bruger) Values (now(),CurrentUser())\", -1
DoCmd.SetWarnings True
Formular_Open_Exit:
    Exit Sub
Formular_Open_Err:
    MsgBox Error$
    Resume Formular_Open_Exit
End Sub

**************************************************
DoCmd.SetWarnings False og DoCmd.SetWarnings True
forhindrer at brugeren får at vide, at der er indsat de felter som står beskrevet i:
DoCmd.RunSQL \"INSERT INTO adgang (dato,bruger) Values (now(),CurrentUser())\", -1

Ovenstående linie indsætter dags dato og nuværende bruger i en tabel ved navn \"adgang\".
Husk at denne måde at gøre det på, kræver at alle brugere af systemet allerede er indtastet i tabellen \"adgangs\"\'s felt kaldet \"bruger\".

Mvh.

hvilket felt var det jeg skulle ligge koden på, bare i \"ved start\"

I min ligger den i Form - Open

tjaa, det var vidst også det jeg mente!

:)

nu har jeg oprettet feltnavne svarende til de enkelte brugernavne under tabellen \"bruger\" eksempelvis et feltnavn som \"bruger1\" i tabelle \"bruger\". Men det virker ikke!

whats wrong with th efirst answer you got from puppetmaster?

sikkert ingen ting, men jeg kan ikke få den til at virke, numemr 2 \"lange\" svar givet her på siden er givet til en \"gratis\" adspørgelse fra en anden bruger.

DoCmd.RunSQL \"UPDATE taeller SET antal = antal + 1 WHERE taeller.Bruger = \'\" & currentuser() & \"\'\"

cgleerup:
Der ER noget du har misforstået!
Der skal egentlig kun være to felter i tabellen: brugernavn og antal (gange en given bruger har været logget på)
Det jeg mente er, at alle brugere skal indtastes i tabellen før du begynder at bruge den. dvs. feltet \"bruger\" skal indeholde alle de kendte brugere.

Place the code in the forms on load event

Lidt a la:
Bruger        Antal
puppetmaster    0
cgleerup    0
terry            0

dohhh, naturligvis, det kan jeg jo se ud fra den kode du har lavet!

;0)

jeg vender lige tilbage om to minutter, efter at have testet det!

:)

for lige at skære det ud i pap, jeg tror ikke helt jeg er med alligevel.

den tabel jeg skal i heder \"bruger\"
det ene felt hedder \"navn\"
det andet felt hedder \"antal\"

jeg har sat dem som jeg mener de skal men får en fejl, altså hvor skal jeg sætte hvad ind?

DoCmd.RunSQL \"UPDATE bruger SET antal = antal + 1 WHERE navn = \'\" & currentuser() & \"\'\"

Har du en mailaddresse, så vil jeg sende dig et skærmdump af tabellen.

ok, jeg så havde jeg fanget den, jeg havde bare glemt et enkelt \". Tak!

:o)