Multi User. Db_Stuff 24.10.2005 13:33:04 I would like to know if there is a way to retrieve the name of any computer that is connected to an access database that is residing on the server. And if so, how do I go about performing this action? Any help in this area will be greatly appreciated. Thanks

Re: Multi User. "Rogelio Pérez via AccessMonster.com" <u2586[ at ]uwe> 24.10.2005 14:50:26 Db_Stuff wrote: [Quoted Text] >I would like to know if there is a way to retrieve the name of any computer >that is connected to an access database that is residing on the server. And >if so, how do I go about performing this action? Any help in this area will >be greatly appreciated. > >Thanks HI Try This Function CompName() Dim WshNetwork Set WshNetwork = CreateObject("WScript.Network") CName = WshNetwork.computername MsgBox CName End Function -- Message posted via http://www.accessmonster.com

Re: Multi User. "Douglas J. Steele" <NOSPAM_djsteele[ at ]NOSPAM_canada.com> 24.10.2005 21:23:20 "Rogelio Pérez via AccessMonster.com" <u2586[ at ]uwe> wrote in message news:565247a1519e0[ at ]uwe... [Quoted Text] > Db_Stuff wrote: >>I would like to know if there is a way to retrieve the name of any >>computer >>that is connected to an access database that is residing on the server. >>And >>if so, how do I go about performing this action? Any help in this area >>will >>be greatly appreciated. >> >>Thanks > > HI > Try This > Function CompName() > Dim WshNetwork > Set WshNetwork = CreateObject("WScript.Network") > CName = WshNetwork.computername > MsgBox CName > End Function Or, likely more efficient (since you don't have the overhead of loading WScript.Networks) is the API approach illustrated in http://www.mvps.org/access/api/api0009.htm at "The Access Web" -- Doug Steele, Microsoft Access MVP http://I.Am/DougSteele (no e-mails, please!)