se aktive brugere i access 97

http://www.hugopedersen.dk/access/

kunne du være lidt mere konkret, da jeg ikke lige kan finde et kode eksempel på dette ?

hvis ikke du kan finde den, så læg din mail...

Den vil jeg gerne havde tilsendt, da jeg ikke kan finde den. Min E-mail er:
oz1bua@wanadoo.dk
På forhånd tak  :o)

hvad med bare at skrive koden her ??

den eneste jeg synes at kunne finde der, der ligner noget er

Public Function fhpGetComputerName() As String
' -----------------------------------------------------------------------------------
' Purpose      : Retrieves the networkname of the computer running the application
' Called from  :
' Returns      :
' Remarks      :
' -----------------------------------------------------------------------------------
On Error Resume Next
  Dim lpBuff As String * 255                                  'Buffer variable
  Dim lngRetVal As Long                                      'Testvariable
  Dim strComputerName As String                              'Computername
   
  strComputerName = "Test"                                    'If an error
 
  lpBuff = Space$(255)                                        'Prepare buffer
 
  lngRetVal = hp_api_GetComputerName(lpBuff, 255)            'Do API call
  strComputerName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1)  'Remove some chars
 
  fhpGetComputerName = strComputerName                        'The retrieved computername
 
  On Error GoTo 0

End Function

men denne melder fejl

sendt...

den er lidt federe den jeg har sendt til dig...

approved@solar.dk

tj@milla.dk (tak :o)

sendt til jer begge...

sendt... endnu engnag... ellers andre.. :) første, anden, tredje..

thnx :o)

Den virker dog ikke på min maskine, da stien til min database indeholder punktum (den metode, som finder .ldb-filen spørger efter "."!)

Koden kan vel heller ikke fortælle hvem, der allerede er logget af, vel? (det står der jo ikke noget om i .ldb-filen)

Men ellers smart.

I Access 2000 er det lidt nemmere, da du kan bruge ADOX til at finde brugere, som er logget på til hver en tid.

hvorfor virker din ikke siger du? hvilken fejl kommer den med thomas?

hvad siger hnto? virker det som det skal?

Ferdinand->Det er ikke nogen alvorlig fejl (jeg kan selv skrive det om, så det virker ved lejlighed). Men fejlen skyles at stien til databasen ser således ud:
C:\Documents and Settings\tj.MILLA\Dokumenter\Temp

Og i koden benyttes denne sætning til at finde .ldb'en:
sPath = Left(sPath, InStr(1, sPath, ".")) + "LDB"

Problemet er så, at den finder det første punktum og tror at .ldb-filen hedder:
C:\Documents and Settings\tj.ldb

But never mind....jeg kan sagtens bruge koden :o)

ahh, ja så er du selv uden om det... :O)

>> ferdinand.k
Virker perfekt hos mig, så tak for tilsendte.  :o)

takker