From m.i.davis at verizon.net Tue Mar 5 07:31:26 2019 From: m.i.davis at verizon.net (Mary Davis) Date: Tue, 5 Mar 2019 13:31:26 +0000 (UTC) Subject: [AccessD] an ACCESS query References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> Message-ID: <2052199538.9341430.1551792686185@mail.yahoo.com> I posted my question to a different list yesterday -- perhaps the wrong listserv.With apologies, I'll repost here. I'm trying to use a query to match 2 tables: accounts and contacts.The account ID is case sensitive.? (it comes from SalesForce.) I thought I found a way to add criteria to a simple query to look for case sensitive ID matches.? But I'm not able to figure out how to run this.Is this possible?? If so, can you provide me some instructions??? This is what I came up with. SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID]WHERE (((StrComp([I&P-44-4-accounts.account id],[I&P-44-4-contacts].[account id]))=0)); thanks very much for your help. MaryWilmington Delaware From DMcGillivray at ctc.ca.gov Tue Mar 5 10:27:41 2019 From: DMcGillivray at ctc.ca.gov (McGillivray, Don) Date: Tue, 5 Mar 2019 16:27:41 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: <2052199538.9341430.1551792686185@mail.yahoo.com> References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> Message-ID: <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> Hi Mary, Access is case-insensitive by default, so if your data resides in native Access tables you should be able to compare values without concern for case - unless you've altered the default (not sure if that's possible). Or if your data is in tables linked from some other DBMS (Oracle, SQL Server, etc.) you may need to abide by the case-sensitivity of the source DBMS. In either case, if you want to be sure that you're comparing your values in the same case, you can do a case conversion in the ON clause of the JOIN to force both values to be compared using the same case: SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON UCase([I&P-44-4-accounts].[Account ID]) = UCase([I&P-44-4-contacts].[Account ID]); Hope this helps. Don -----Original Message----- From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mary Davis Sent: Tuesday, March 05, 2019 5:31 AM To: accessd at databaseadvisors.com Subject: [AccessD] an ACCESS query I posted my question to a different list yesterday -- perhaps the wrong listserv.With apologies, I'll repost here. I'm trying to use a query to match 2 tables: accounts and contacts.The account ID is case sensitive.? (it comes from SalesForce.) I thought I found a way to add criteria to a simple query to look for case sensitive ID matches.? But I'm not able to figure out how to run this.Is this possible?? If so, can you provide me some instructions? This is what I came up with. SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID]WHERE (((StrComp([I&P-44-4-accounts.account id],[I&P-44-4-contacts].[account id]))=0)); thanks very much for your help. MaryWilmington Delaware -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Tue Mar 5 10:31:26 2019 From: rockysmolin at bchacc.com (Rocky Smolin) Date: Tue, 5 Mar 2019 08:31:26 -0800 Subject: [AccessD] FW: [dba-Tech] Access query References: <218247909.3575376.1551749237134.ref@mail.yahoo.com> <218247909.3575376.1551749237134@mail.yahoo.com> Message-ID: <00c801d4d370$e1488090$a3d981b0$@bchacc.com> Mary: Here's a couple of links that address your problem of creating a case sensitive query: https://www.oreilly.com/library/view/access-cookbook/0596000847/ch01s14.html https://stackoverflow.com/questions/10046627/how-to-write-case-sensitive-query-for-ms-access If this doesn't get you where you want to go, write back and we'll think of something else. :) HTH Rocky Smolin Beach Access Software 760-683-5777 www.bchacc.com www.e-z-mrp.com Skype: rocky.smolin -----Original Message----- From: dba-Tech [mailto:dba-tech-bounces at databaseadvisors.com] On Behalf Of Mary Davis Sent: Monday, March 04, 2019 5:27 PM To: dba-tech at databaseadvisors.com Subject: [dba-Tech] Access query I hope I'm posting my question in the right place. I'm trying to use a query to match 2 tables: accounts and contacts.The account ID is case sensitive. (it comes from SalesForce.) I thought I found a way to add criteria to a simple query to look for case sensitive ID matches. But I'm not able to figure out how to run this.Is this possible? If so, can you provide me some instructions? This is what I came up with. SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID]WHERE (((StrComp([I&P-44-4-accounts.account id],[I&P-44-4-contacts].[account id]))=0)); thanks very much for your help. MaryWilmington Delaware _______________________________________________ dba-Tech mailing list dba-Tech at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-tech Website: http://www.databaseadvisors.com From wrwehler at gmail.com Tue Mar 5 10:48:33 2019 From: wrwehler at gmail.com (Ryan W) Date: Tue, 5 Mar 2019 10:48:33 -0600 Subject: [AccessD] an ACCESS query In-Reply-To: <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> Message-ID: I'm curious if the case sensitivity matters, if StrComp would help https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/strcomp-function Something like SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID] WHERE StrComp([I&P-44-4-accounts].[AccountID],[I&P-44-4-contacts].[AccountID], 0) <> 0; On Tue, Mar 5, 2019 at 10:28 AM McGillivray, Don wrote: > Hi Mary, > > Access is case-insensitive by default, so if your data resides in native > Access tables you should be able to compare values without concern for case > - unless you've altered the default (not sure if that's possible). Or if > your data is in tables linked from some other DBMS (Oracle, SQL Server, > etc.) you may need to abide by the case-sensitivity of the source DBMS. > > In either case, if you want to be sure that you're comparing your values > in the same case, you can do a case conversion in the ON clause of the JOIN > to force both values to be compared using the same case: > > SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account > ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON > UCase([I&P-44-4-accounts].[Account ID]) = > UCase([I&P-44-4-contacts].[Account ID]); > > Hope this helps. > > Don > > -----Original Message----- > From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mary Davis > Sent: Tuesday, March 05, 2019 5:31 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] an ACCESS query > > > I posted my question to a different list yesterday -- perhaps the wrong > listserv.With apologies, I'll repost here. > I'm trying to use a query to match 2 tables: accounts and contacts.The > account ID is case sensitive. (it comes from SalesForce.) I thought I > found a way to add criteria to a simple query to look for case sensitive ID > matches. But I'm not able to figure out how to run this.Is this possible? > If so, can you provide me some instructions? This is what I came up with. > SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account > ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON > [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID]WHERE > (((StrComp([I&P-44-4-accounts.account id],[I&P-44-4-contacts].[account > id]))=0)); > > thanks very much for your help. > MaryWilmington Delaware > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From wrwehler at gmail.com Tue Mar 5 10:49:22 2019 From: wrwehler at gmail.com (Ryan W) Date: Tue, 5 Mar 2019 10:49:22 -0600 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> Message-ID: Whoops! That should probably be WHERE .... = 0 (strings are identical)... On Tue, Mar 5, 2019 at 10:48 AM Ryan W wrote: > I'm curious if the case sensitivity matters, if StrComp would help > > > https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/strcomp-function > > Something like > > SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account > ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON > [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID] > WHERE > StrComp([I&P-44-4-accounts].[AccountID],[I&P-44-4-contacts].[AccountID], 0) > <> 0; > > > > > > On Tue, Mar 5, 2019 at 10:28 AM McGillivray, Don > wrote: > >> Hi Mary, >> >> Access is case-insensitive by default, so if your data resides in native >> Access tables you should be able to compare values without concern for case >> - unless you've altered the default (not sure if that's possible). Or if >> your data is in tables linked from some other DBMS (Oracle, SQL Server, >> etc.) you may need to abide by the case-sensitivity of the source DBMS. >> >> In either case, if you want to be sure that you're comparing your values >> in the same case, you can do a case conversion in the ON clause of the JOIN >> to force both values to be compared using the same case: >> >> SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account >> ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON >> UCase([I&P-44-4-accounts].[Account ID]) = >> UCase([I&P-44-4-contacts].[Account ID]); >> >> Hope this helps. >> >> Don >> >> -----Original Message----- >> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> Mary Davis >> Sent: Tuesday, March 05, 2019 5:31 AM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] an ACCESS query >> >> >> I posted my question to a different list yesterday -- perhaps the wrong >> listserv.With apologies, I'll repost here. >> I'm trying to use a query to match 2 tables: accounts and contacts.The >> account ID is case sensitive. (it comes from SalesForce.) I thought I >> found a way to add criteria to a simple query to look for case sensitive ID >> matches. But I'm not able to figure out how to run this.Is this possible? >> If so, can you provide me some instructions? This is what I came up with. >> SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account >> ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON >> [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID]WHERE >> (((StrComp([I&P-44-4-accounts.account id],[I&P-44-4-contacts].[account >> id]))=0)); >> >> thanks very much for your help. >> MaryWilmington Delaware >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> > From DMcGillivray at ctc.ca.gov Tue Mar 5 11:59:16 2019 From: DMcGillivray at ctc.ca.gov (McGillivray, Don) Date: Tue, 5 Mar 2019 17:59:16 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> Message-ID: <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> I can see from the responses of others that I misunderstood the point of your question. I took you to mean that you wanted the join to work regardless of whether there was an exact match. If you want only those records where there is an exact case match, then Ryan is right. You need the additional argument in the StrComp() function to make the comparison binary. Then test for a result of 0. Sorry for muddying the waters. -----Original Message----- From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of McGillivray, Don Sent: Tuesday, March 05, 2019 8:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query Hi Mary, Access is case-insensitive by default, so if your data resides in native Access tables you should be able to compare values without concern for case - unless you've altered the default (not sure if that's possible). Or if your data is in tables linked from some other DBMS (Oracle, SQL Server, etc.) you may need to abide by the case-sensitivity of the source DBMS. In either case, if you want to be sure that you're comparing your values in the same case, you can do a case conversion in the ON clause of the JOIN to force both values to be compared using the same case: SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON UCase([I&P-44-4-accounts].[Account ID]) = UCase([I&P-44-4-contacts].[Account ID]); Hope this helps. Don -----Original Message----- From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mary Davis Sent: Tuesday, March 05, 2019 5:31 AM To: accessd at databaseadvisors.com Subject: [AccessD] an ACCESS query I posted my question to a different list yesterday -- perhaps the wrong listserv.With apologies, I'll repost here. I'm trying to use a query to match 2 tables: accounts and contacts.The account ID is case sensitive.? (it comes from SalesForce.) I thought I found a way to add criteria to a simple query to look for case sensitive ID matches.? But I'm not able to figure out how to run this.Is this possible?? If so, can you provide me some instructions? This is what I came up with. SELECT [I&P-44-4-accounts].[Account ID], [I&P-44-4-contacts].[Account ID]FROM [I&P-44-4-accounts] INNER JOIN [I&P-44-4-contacts] ON [I&P-44-4-accounts].[Account ID] = [I&P-44-4-contacts].[Account ID]WHERE (((StrComp([I&P-44-4-accounts.account id],[I&P-44-4-contacts].[account id]))=0)); thanks very much for your help. MaryWilmington Delaware -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Tue Mar 12 11:35:35 2019 From: John.Clark at niagaracounty.com (John W. Clark) Date: Tue, 12 Mar 2019 16:35:35 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov>, <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> Message-ID: I haven't been out here in quite a while, but I'm hoping someone can save me. I seem to have forgotten some things and I need to grab a user's Active Directory login ID and put it in a record. I actually haven't programmed anything in quite a while. I've been playing with VoIP phones and email lately and haven't needed to work with MS Access in a very long time. I still lurk every now and then and read the posts, but I haven't needed to use it. I'm praying someone has some code I can use to do this quick. I was trying to use a couple of things, like: Dim strUser as String strUser = ActiveDirectory.User() MsgBox "Welcome back, " & strUser but I get nothing...no errors, just nothing. I've tried variations and some other code I've found as well. Is the "ActiveDirectory" code above native or should I be invoking something to make it work? Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. From BWalsh at healthinsight.org Tue Mar 12 11:38:52 2019 From: BWalsh at healthinsight.org (Bob Walsh) Date: Tue, 12 Mar 2019 16:38:52 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov>, <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> Message-ID: Something like this? Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias "GetUserNameA" _ (ByVal lpBuffer As String, nSize As Long) As Long Function fOSUserName() As String ' Returns the network login name Dim lngLen As Long, lngX As Long Dim strUserName As String strUserName = String$(254, 0) lngLen = 255 lngX = apiGetUserName(strUserName, lngLen) If (lngX > 0) Then fOSUserName = Left$(strUserName, lngLen - 1) Else fOSUserName = vbNullString End If End Function From: AccessD On Behalf Of John W. Clark Sent: Tuesday, March 12, 2019 9:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query [Attn: This is an external email.] I haven't been out here in quite a while, but I'm hoping someone can save me. I seem to have forgotten some things and I need to grab a user's Active Directory login ID and put it in a record. I actually haven't programmed anything in quite a while. I've been playing with VoIP phones and email lately and haven't needed to work with MS Access in a very long time. I still lurk every now and then and read the posts, but I haven't needed to use it. I'm praying someone has some code I can use to do this quick. I was trying to use a couple of things, like: Dim strUser as String strUser = ActiveDirectory.User() MsgBox "Welcome back, " & strUser but I get nothing...no errors, just nothing. I've tried variations and some other code I've found as well. Is the "ActiveDirectory" code above native or should I be invoking something to make it work? Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ________________________________ HealthInsight is a private, nonprofit, community-based organization dedicated to improving health and health care, with offices in four western states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage Renal Disease Networks in the Western United States. The information and any materials included in this transmission may contain confidential information from HealthInsight. The information is intended for use by the person named on this transmittal. If you are not the intended recipient, be aware that any disclosure, copying, distribution, or use of the contents of this transmission is prohibited. If you have received this message in error, please inform the sender and delete all copies. From wrwehler at gmail.com Tue Mar 12 11:40:32 2019 From: wrwehler at gmail.com (Ryan W) Date: Tue, 12 Mar 2019 11:40:32 -0500 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> Message-ID: What about just Environ("Username") ? On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh wrote: > Something like this? > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > "GetUserNameA" _ > (ByVal lpBuffer As String, nSize As Long) As Long > > Function fOSUserName() As String > ' Returns the network login name > Dim lngLen As Long, lngX As Long > Dim strUserName As String > strUserName = String$(254, 0) > lngLen = 255 > lngX = apiGetUserName(strUserName, lngLen) > If (lngX > 0) Then > fOSUserName = Left$(strUserName, lngLen - 1) > Else > fOSUserName = vbNullString > End If > End Function > > From: AccessD On Behalf Of John W. > Clark > Sent: Tuesday, March 12, 2019 9:36 AM > To: Access Developers discussion and problem solving < > accessd at databaseadvisors.com> > Subject: Re: [AccessD] an ACCESS query > > [Attn: This is an external email.] > > I haven't been out here in quite a while, but I'm hoping someone can save > me. I seem to have forgotten some things and I need to grab a user's Active > Directory login ID and put it in a record. > > I actually haven't programmed anything in quite a while. I've been playing > with VoIP phones and email lately and haven't needed to work with MS Access > in a very long time. I still lurk every now and then and read the posts, > but I haven't needed to use it. > > I'm praying someone has some code I can use to do this quick. I was trying > to use a couple of things, like: > > > Dim strUser as String > strUser = ActiveDirectory.User() > MsgBox "Welcome back, " & strUser > > but I get nothing...no errors, just nothing. I've tried variations and > some other code I've found as well. > > Is the "ActiveDirectory" code above native or should I be invoking > something to make it work? > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd< > http://databaseadvisors.com/mailman/listinfo/accessd> > Website: http://www.databaseadvisors.com > > ________________________________ > HealthInsight is a private, nonprofit, community-based organization > dedicated to improving health and health care, with offices in four western > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > Renal Disease Networks in the Western United States. The information and > any materials included in this transmission may contain confidential > information from HealthInsight. The information is intended for use by the > person named on this transmittal. If you are not the intended recipient, be > aware that any disclosure, copying, distribution, or use of the contents of > this transmission is prohibited. If you have received this message in > error, please inform the sender and delete all copies. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From paul.hartland at googlemail.com Tue Mar 12 11:41:53 2019 From: paul.hartland at googlemail.com (Paul Hartland) Date: Tue, 12 Mar 2019 16:41:53 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> Message-ID: John, I always use a similar method to the one here..... https://stackoverflow.com/questions/168659/how-can-i-get-the-currently-logged-in-windows-user-in-access-vba/168682 Paul On Tue, 12 Mar 2019 at 16:36, John W. Clark wrote: > I haven't been out here in quite a while, but I'm hoping someone can save > me. I seem to have forgotten some things and I need to grab a user's Active > Directory login ID and put it in a record. > > I actually haven't programmed anything in quite a while. I've been playing > with VoIP phones and email lately and haven't needed to work with MS Access > in a very long time. I still lurk every now and then and read the posts, > but I haven't needed to use it. > > I'm praying someone has some code I can use to do this quick. I was > trying to use a couple of things, like: > > > Dim strUser as String > strUser = ActiveDirectory.User() > MsgBox "Welcome back, " & strUser > > but I get nothing...no errors, just nothing. I've tried variations and > some other code I've found as well. > > Is the "ActiveDirectory" code above native or should I be invoking > something to make it work? > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- Paul Hartland paul.hartland at googlemail.com From John.Clark at niagaracounty.com Tue Mar 12 12:01:59 2019 From: John.Clark at niagaracounty.com (John W. Clark) Date: Tue, 12 Mar 2019 17:01:59 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> , Message-ID: Wow, I was overthinking that one just a bit, eh?! Thanks, I think this will suffice! ________________________________ From: AccessD on behalf of Ryan W Sent: Tuesday, March 12, 2019 12:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query What about just Environ("Username") ? On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh wrote: > Something like this? > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > "GetUserNameA" _ > (ByVal lpBuffer As String, nSize As Long) As Long > > Function fOSUserName() As String > ' Returns the network login name > Dim lngLen As Long, lngX As Long > Dim strUserName As String > strUserName = String$(254, 0) > lngLen = 255 > lngX = apiGetUserName(strUserName, lngLen) > If (lngX > 0) Then > fOSUserName = Left$(strUserName, lngLen - 1) > Else > fOSUserName = vbNullString > End If > End Function > > From: AccessD On Behalf Of John W. > Clark > Sent: Tuesday, March 12, 2019 9:36 AM > To: Access Developers discussion and problem solving < > accessd at databaseadvisors.com> > Subject: Re: [AccessD] an ACCESS query > > [Attn: This is an external email.] > > I haven't been out here in quite a while, but I'm hoping someone can save > me. I seem to have forgotten some things and I need to grab a user's Active > Directory login ID and put it in a record. > > I actually haven't programmed anything in quite a while. I've been playing > with VoIP phones and email lately and haven't needed to work with MS Access > in a very long time. I still lurk every now and then and read the posts, > but I haven't needed to use it. > > I'm praying someone has some code I can use to do this quick. I was trying > to use a couple of things, like: > > > Dim strUser as String > strUser = ActiveDirectory.User() > MsgBox "Welcome back, " & strUser > > but I get nothing...no errors, just nothing. I've tried variations and > some other code I've found as well. > > Is the "ActiveDirectory" code above native or should I be invoking > something to make it work? > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd< > http://databaseadvisors.com/mailman/listinfo/accessd> > Website: http://www.databaseadvisors.com > > ________________________________ > HealthInsight is a private, nonprofit, community-based organization > dedicated to improving health and health care, with offices in four western > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > Renal Disease Networks in the Western United States. The information and > any materials included in this transmission may contain confidential > information from HealthInsight. The information is intended for use by the > person named on this transmittal. If you are not the intended recipient, be > aware that any disclosure, copying, distribution, or use of the contents of > this transmission is prohibited. If you have received this message in > error, please inform the sender and delete all copies. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. From wrwehler at gmail.com Tue Mar 12 12:03:16 2019 From: wrwehler at gmail.com (Ryan W) Date: Tue, 12 Mar 2019 12:03:16 -0500 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> Message-ID: No prob. :) On Tue, Mar 12, 2019 at 12:02 PM John W. Clark wrote: > Wow, I was overthinking that one just a bit, eh?! Thanks, I think this > will suffice! > > ________________________________ > From: AccessD on behalf of Ryan W < > wrwehler at gmail.com> > Sent: Tuesday, March 12, 2019 12:40 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > What about just > > Environ("Username") ? > > > > On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh > wrote: > > > Something like this? > > > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > > "GetUserNameA" _ > > (ByVal lpBuffer As String, nSize As Long) As Long > > > > Function fOSUserName() As String > > ' Returns the network login name > > Dim lngLen As Long, lngX As Long > > Dim strUserName As String > > strUserName = String$(254, 0) > > lngLen = 255 > > lngX = apiGetUserName(strUserName, lngLen) > > If (lngX > 0) Then > > fOSUserName = Left$(strUserName, lngLen - 1) > > Else > > fOSUserName = vbNullString > > End If > > End Function > > > > From: AccessD On Behalf Of John > W. > > Clark > > Sent: Tuesday, March 12, 2019 9:36 AM > > To: Access Developers discussion and problem solving < > > accessd at databaseadvisors.com> > > Subject: Re: [AccessD] an ACCESS query > > > > [Attn: This is an external email.] > > > > I haven't been out here in quite a while, but I'm hoping someone can save > > me. I seem to have forgotten some things and I need to grab a user's > Active > > Directory login ID and put it in a record. > > > > I actually haven't programmed anything in quite a while. I've been > playing > > with VoIP phones and email lately and haven't needed to work with MS > Access > > in a very long time. I still lurk every now and then and read the posts, > > but I haven't needed to use it. > > > > I'm praying someone has some code I can use to do this quick. I was > trying > > to use a couple of things, like: > > > > > > Dim strUser as String > > strUser = ActiveDirectory.User() > > MsgBox "Welcome back, " & strUser > > > > but I get nothing...no errors, just nothing. I've tried variations and > > some other code I've found as well. > > > > Is the "ActiveDirectory" code above native or should I be invoking > > something to make it work? > > > > > > Notice: This electronic transmission is intended for the sole use of the > > individual or entity to which it is addressed and may contain > confidential, > > privileged or otherwise legally protected information. If you are not the > > intended recipient, or if you believe you are not the intended recipient, > > you are hereby notified that any use, disclosure, copying, distribution, > or > > the taking of any action in reliance on the contents of this information, > > is strictly prohibited. Niagara County is not responsible for the content > > of any external hyperlink referenced in this email or any email. IF YOU > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd< > > http://databaseadvisors.com/mailman/listinfo/accessd> > > Website: http://www.databaseadvisors.com > > > > > ________________________________ > > HealthInsight is a private, nonprofit, community-based organization > > dedicated to improving health and health care, with offices in four > western > > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > > Renal Disease Networks in the Western United States. The information and > > any materials included in this transmission may contain confidential > > information from HealthInsight. The information is intended for use by > the > > person named on this transmittal. If you are not the intended recipient, > be > > aware that any disclosure, copying, distribution, or use of the contents > of > > this transmission is prohibited. If you have received this message in > > error, please inform the sender and delete all copies. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From John.Clark at niagaracounty.com Tue Mar 12 12:17:32 2019 From: John.Clark at niagaracounty.com (John W. Clark) Date: Tue, 12 Mar 2019 17:17:32 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> , Message-ID: ...plus I just learned I've had an issue with my email (which I administer) and the AccessD mail. ________________________________ From: AccessD on behalf of Ryan W Sent: Tuesday, March 12, 2019 1:03 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query No prob. :) On Tue, Mar 12, 2019 at 12:02 PM John W. Clark wrote: > Wow, I was overthinking that one just a bit, eh?! Thanks, I think this > will suffice! > > ________________________________ > From: AccessD on behalf of Ryan W < > wrwehler at gmail.com> > Sent: Tuesday, March 12, 2019 12:40 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > What about just > > Environ("Username") ? > > > > On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh > wrote: > > > Something like this? > > > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > > "GetUserNameA" _ > > (ByVal lpBuffer As String, nSize As Long) As Long > > > > Function fOSUserName() As String > > ' Returns the network login name > > Dim lngLen As Long, lngX As Long > > Dim strUserName As String > > strUserName = String$(254, 0) > > lngLen = 255 > > lngX = apiGetUserName(strUserName, lngLen) > > If (lngX > 0) Then > > fOSUserName = Left$(strUserName, lngLen - 1) > > Else > > fOSUserName = vbNullString > > End If > > End Function > > > > From: AccessD On Behalf Of John > W. > > Clark > > Sent: Tuesday, March 12, 2019 9:36 AM > > To: Access Developers discussion and problem solving < > > accessd at databaseadvisors.com> > > Subject: Re: [AccessD] an ACCESS query > > > > [Attn: This is an external email.] > > > > I haven't been out here in quite a while, but I'm hoping someone can save > > me. I seem to have forgotten some things and I need to grab a user's > Active > > Directory login ID and put it in a record. > > > > I actually haven't programmed anything in quite a while. I've been > playing > > with VoIP phones and email lately and haven't needed to work with MS > Access > > in a very long time. I still lurk every now and then and read the posts, > > but I haven't needed to use it. > > > > I'm praying someone has some code I can use to do this quick. I was > trying > > to use a couple of things, like: > > > > > > Dim strUser as String > > strUser = ActiveDirectory.User() > > MsgBox "Welcome back, " & strUser > > > > but I get nothing...no errors, just nothing. I've tried variations and > > some other code I've found as well. > > > > Is the "ActiveDirectory" code above native or should I be invoking > > something to make it work? > > > > > > Notice: This electronic transmission is intended for the sole use of the > > individual or entity to which it is addressed and may contain > confidential, > > privileged or otherwise legally protected information. If you are not the > > intended recipient, or if you believe you are not the intended recipient, > > you are hereby notified that any use, disclosure, copying, distribution, > or > > the taking of any action in reliance on the contents of this information, > > is strictly prohibited. Niagara County is not responsible for the content > > of any external hyperlink referenced in this email or any email. IF YOU > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd< > > http://databaseadvisors.com/mailman/listinfo/accessd> > > Website: http://www.databaseadvisors.com > > > > > ________________________________ > > HealthInsight is a private, nonprofit, community-based organization > > dedicated to improving health and health care, with offices in four > western > > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > > Renal Disease Networks in the Western United States. The information and > > any materials included in this transmission may contain confidential > > information from HealthInsight. The information is intended for use by > the > > person named on this transmittal. If you are not the intended recipient, > be > > aware that any disclosure, copying, distribution, or use of the contents > of > > this transmission is prohibited. If you have received this message in > > error, please inform the sender and delete all copies. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. From John.Clark at niagaracounty.com Tue Mar 12 14:30:05 2019 From: John.Clark at niagaracounty.com (John W. Clark) Date: Tue, 12 Mar 2019 19:30:05 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> , Message-ID: If I can bug y'all with one more thing. How would you suggest I'd add this ID to a record each time a new one is opened or saved? If I remember correctly I'd normally do something like this OnOpen for the form, but here I want to do it when a new record is opened. I want the user to be unable to edit/delete this. For the latter I just locked it. ________________________________ From: AccessD on behalf of Ryan W Sent: Tuesday, March 12, 2019 1:03 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query No prob. :) On Tue, Mar 12, 2019 at 12:02 PM John W. Clark wrote: > Wow, I was overthinking that one just a bit, eh?! Thanks, I think this > will suffice! > > ________________________________ > From: AccessD on behalf of Ryan W < > wrwehler at gmail.com> > Sent: Tuesday, March 12, 2019 12:40 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > What about just > > Environ("Username") ? > > > > On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh > wrote: > > > Something like this? > > > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > > "GetUserNameA" _ > > (ByVal lpBuffer As String, nSize As Long) As Long > > > > Function fOSUserName() As String > > ' Returns the network login name > > Dim lngLen As Long, lngX As Long > > Dim strUserName As String > > strUserName = String$(254, 0) > > lngLen = 255 > > lngX = apiGetUserName(strUserName, lngLen) > > If (lngX > 0) Then > > fOSUserName = Left$(strUserName, lngLen - 1) > > Else > > fOSUserName = vbNullString > > End If > > End Function > > > > From: AccessD On Behalf Of John > W. > > Clark > > Sent: Tuesday, March 12, 2019 9:36 AM > > To: Access Developers discussion and problem solving < > > accessd at databaseadvisors.com> > > Subject: Re: [AccessD] an ACCESS query > > > > [Attn: This is an external email.] > > > > I haven't been out here in quite a while, but I'm hoping someone can save > > me. I seem to have forgotten some things and I need to grab a user's > Active > > Directory login ID and put it in a record. > > > > I actually haven't programmed anything in quite a while. I've been > playing > > with VoIP phones and email lately and haven't needed to work with MS > Access > > in a very long time. I still lurk every now and then and read the posts, > > but I haven't needed to use it. > > > > I'm praying someone has some code I can use to do this quick. I was > trying > > to use a couple of things, like: > > > > > > Dim strUser as String > > strUser = ActiveDirectory.User() > > MsgBox "Welcome back, " & strUser > > > > but I get nothing...no errors, just nothing. I've tried variations and > > some other code I've found as well. > > > > Is the "ActiveDirectory" code above native or should I be invoking > > something to make it work? > > > > > > Notice: This electronic transmission is intended for the sole use of the > > individual or entity to which it is addressed and may contain > confidential, > > privileged or otherwise legally protected information. If you are not the > > intended recipient, or if you believe you are not the intended recipient, > > you are hereby notified that any use, disclosure, copying, distribution, > or > > the taking of any action in reliance on the contents of this information, > > is strictly prohibited. Niagara County is not responsible for the content > > of any external hyperlink referenced in this email or any email. IF YOU > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd< > > http://databaseadvisors.com/mailman/listinfo/accessd> > > Website: http://www.databaseadvisors.com > > > > > ________________________________ > > HealthInsight is a private, nonprofit, community-based organization > > dedicated to improving health and health care, with offices in four > western > > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > > Renal Disease Networks in the Western United States. The information and > > any materials included in this transmission may contain confidential > > information from HealthInsight. The information is intended for use by > the > > person named on this transmittal. If you are not the intended recipient, > be > > aware that any disclosure, copying, distribution, or use of the contents > of > > this transmission is prohibited. If you have received this message in > > error, please inform the sender and delete all copies. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. From BWalsh at healthinsight.org Tue Mar 12 14:58:09 2019 From: BWalsh at healthinsight.org (Bob Walsh) Date: Tue, 12 Mar 2019 19:58:09 +0000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> , Message-ID: I'd put it on the forms before update event From: AccessD On Behalf Of John W. Clark Sent: Tuesday, March 12, 2019 12:30 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query [Attn: This is an external email.] If I can bug y'all with one more thing. How would you suggest I'd add this ID to a record each time a new one is opened or saved? If I remember correctly I'd normally do something like this OnOpen for the form, but here I want to do it when a new record is opened. I want the user to be unable to edit/delete this. For the latter I just locked it. ________________________________ From: AccessD > on behalf of Ryan W > Sent: Tuesday, March 12, 2019 1:03 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] an ACCESS query No prob. :) On Tue, Mar 12, 2019 at 12:02 PM John W. Clark > wrote: > Wow, I was overthinking that one just a bit, eh?! Thanks, I think this > will suffice! > > ________________________________ > From: AccessD > on behalf of Ryan W < > wrwehler at gmail.com> > Sent: Tuesday, March 12, 2019 12:40 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > What about just > > Environ("Username") ? > > > > On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh > > wrote: > > > Something like this? > > > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > > "GetUserNameA" _ > > (ByVal lpBuffer As String, nSize As Long) As Long > > > > Function fOSUserName() As String > > ' Returns the network login name > > Dim lngLen As Long, lngX As Long > > Dim strUserName As String > > strUserName = String$(254, 0) > > lngLen = 255 > > lngX = apiGetUserName(strUserName, lngLen) > > If (lngX > 0) Then > > fOSUserName = Left$(strUserName, lngLen - 1) > > Else > > fOSUserName = vbNullString > > End If > > End Function > > > > From: AccessD > On Behalf Of John > W. > > Clark > > Sent: Tuesday, March 12, 2019 9:36 AM > > To: Access Developers discussion and problem solving < > > accessd at databaseadvisors.com> > > Subject: Re: [AccessD] an ACCESS query > > > > [Attn: This is an external email.] > > > > I haven't been out here in quite a while, but I'm hoping someone can save > > me. I seem to have forgotten some things and I need to grab a user's > Active > > Directory login ID and put it in a record. > > > > I actually haven't programmed anything in quite a while. I've been > playing > > with VoIP phones and email lately and haven't needed to work with MS > Access > > in a very long time. I still lurk every now and then and read the posts, > > but I haven't needed to use it. > > > > I'm praying someone has some code I can use to do this quick. I was > trying > > to use a couple of things, like: > > > > > > Dim strUser as String > > strUser = ActiveDirectory.User() > > MsgBox "Welcome back, " & strUser > > > > but I get nothing...no errors, just nothing. I've tried variations and > > some other code I've found as well. > > > > Is the "ActiveDirectory" code above native or should I be invoking > > something to make it work? > > > > > > Notice: This electronic transmission is intended for the sole use of the > > individual or entity to which it is addressed and may contain > confidential, > > privileged or otherwise legally protected information. If you are not the > > intended recipient, or if you believe you are not the intended recipient, > > you are hereby notified that any use, disclosure, copying, distribution, > or > > the taking of any action in reliance on the contents of this information, > > is strictly prohibited. Niagara County is not responsible for the content > > of any external hyperlink referenced in this email or any email. IF YOU > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com> > > http://databaseadvisors.com/mailman/listinfo/accessd< > > http://databaseadvisors.com/mailman/listinfo/accessd> > > Website: http://www.databaseadvisors.com > > > > > > ________________________________ > > HealthInsight is a private, nonprofit, community-based organization > > dedicated to improving health and health care, with offices in four > western > > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > > Renal Disease Networks in the Western United States. The information and > > any materials included in this transmission may contain confidential > > information from HealthInsight. The information is intended for use by > the > > person named on this transmittal. If you are not the intended recipient, > be > > aware that any disclosure, copying, distribution, or use of the contents > of > > this transmission is prohibited. If you have received this message in > > error, please inform the sender and delete all copies. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ________________________________ HealthInsight is a private, nonprofit, community-based organization dedicated to improving health and health care, with offices in four western states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage Renal Disease Networks in the Western United States. The information and any materials included in this transmission may contain confidential information from HealthInsight. The information is intended for use by the person named on this transmittal. If you are not the intended recipient, be aware that any disclosure, copying, distribution, or use of the contents of this transmission is prohibited. If you have received this message in error, please inform the sender and delete all copies. From jwcolby at gmail.com Tue Mar 12 15:42:35 2019 From: jwcolby at gmail.com (John Colby) Date: Tue, 12 Mar 2019 16:42:35 -0400 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com> <2052199538.9341430.1551792686185@mail.yahoo.com> <41c17816b6a64d31aedf3acf51c84b52@ctc.ca.gov> <99ee8300f8ef4ecf8b99900d48ae686a@ctc.ca.gov> Message-ID: Normally you use an auto increment integer pk generated by the database. It is not something that the user sees or is even aware of. Now if you are discussing adding some Id as a foreign key, then the access subform just inserts is as part of it's link parent/child function. On Tue, Mar 12, 2019, 3:30 PM John W. Clark wrote: > If I can bug y'all with one more thing. How would you suggest I'd add this > ID to a record each time a new one is opened or saved? > > If I remember correctly I'd normally do something like this OnOpen for the > form, but here I want to do it when a new record is opened. I want the user > to be unable to edit/delete this. For the latter I just locked it. > > ________________________________ > From: AccessD on behalf of Ryan W < > wrwehler at gmail.com> > Sent: Tuesday, March 12, 2019 1:03 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > No prob. :) > > > On Tue, Mar 12, 2019 at 12:02 PM John W. Clark < > John.Clark at niagaracounty.com> > wrote: > > > Wow, I was overthinking that one just a bit, eh?! Thanks, I think this > > will suffice! > > > > ________________________________ > > From: AccessD on behalf of Ryan > W < > > wrwehler at gmail.com> > > Sent: Tuesday, March 12, 2019 12:40 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] an ACCESS query > > > > What about just > > > > Environ("Username") ? > > > > > > > > On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh > > wrote: > > > > > Something like this? > > > > > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > > > "GetUserNameA" _ > > > (ByVal lpBuffer As String, nSize As Long) As Long > > > > > > Function fOSUserName() As String > > > ' Returns the network login name > > > Dim lngLen As Long, lngX As Long > > > Dim strUserName As String > > > strUserName = String$(254, 0) > > > lngLen = 255 > > > lngX = apiGetUserName(strUserName, lngLen) > > > If (lngX > 0) Then > > > fOSUserName = Left$(strUserName, lngLen - 1) > > > Else > > > fOSUserName = vbNullString > > > End If > > > End Function > > > > > > From: AccessD On Behalf Of John > > W. > > > Clark > > > Sent: Tuesday, March 12, 2019 9:36 AM > > > To: Access Developers discussion and problem solving < > > > accessd at databaseadvisors.com> > > > Subject: Re: [AccessD] an ACCESS query > > > > > > [Attn: This is an external email.] > > > > > > I haven't been out here in quite a while, but I'm hoping someone can > save > > > me. I seem to have forgotten some things and I need to grab a user's > > Active > > > Directory login ID and put it in a record. > > > > > > I actually haven't programmed anything in quite a while. I've been > > playing > > > with VoIP phones and email lately and haven't needed to work with MS > > Access > > > in a very long time. I still lurk every now and then and read the > posts, > > > but I haven't needed to use it. > > > > > > I'm praying someone has some code I can use to do this quick. I was > > trying > > > to use a couple of things, like: > > > > > > > > > Dim strUser as String > > > strUser = ActiveDirectory.User() > > > MsgBox "Welcome back, " & strUser > > > > > > but I get nothing...no errors, just nothing. I've tried variations and > > > some other code I've found as well. > > > > > > Is the "ActiveDirectory" code above native or should I be invoking > > > something to make it work? > > > > > > > > > Notice: This electronic transmission is intended for the sole use of > the > > > individual or entity to which it is addressed and may contain > > confidential, > > > privileged or otherwise legally protected information. If you are not > the > > > intended recipient, or if you believe you are not the intended > recipient, > > > you are hereby notified that any use, disclosure, copying, > distribution, > > or > > > the taking of any action in reliance on the contents of this > information, > > > is strictly prohibited. Niagara County is not responsible for the > content > > > of any external hyperlink referenced in this email or any email. IF YOU > > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY > PAPER > > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > > -- > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd< > > > http://databaseadvisors.com/mailman/listinfo/accessd> > > > Website: http://www.databaseadvisors.com< > http://www.databaseadvisors.com > > > > > > > > > ________________________________ > > > HealthInsight is a private, nonprofit, community-based organization > > > dedicated to improving health and health care, with offices in four > > western > > > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > > > operations in Seattle, Wash., and Glendale, Calif., supporting > End-Stage > > > Renal Disease Networks in the Western United States. The information > and > > > any materials included in this transmission may contain confidential > > > information from HealthInsight. The information is intended for use by > > the > > > person named on this transmittal. If you are not the intended > recipient, > > be > > > aware that any disclosure, copying, distribution, or use of the > contents > > of > > > this transmission is prohibited. If you have received this message in > > > error, please inform the sender and delete all copies. > > > -- > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > Notice: This electronic transmission is intended for the sole use of the > > individual or entity to which it is addressed and may contain > confidential, > > privileged or otherwise legally protected information. If you are not the > > intended recipient, or if you believe you are not the intended recipient, > > you are hereby notified that any use, disclosure, copying, distribution, > or > > the taking of any action in reliance on the contents of this information, > > is strictly prohibited. Niagara County is not responsible for the content > > of any external hyperlink referenced in this email or any email. IF YOU > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > Notice: This electronic transmission is intended for the sole use of the > individual or entity to which it is addressed and may contain confidential, > privileged or otherwise legally protected information. If you are not the > intended recipient, or if you believe you are not the intended recipient, > you are hereby notified that any use, disclosure, copying, distribution, or > the taking of any action in reliance on the contents of this information, > is strictly prohibited. Niagara County is not responsible for the content > of any external hyperlink referenced in this email or any email. IF YOU > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stuart at lexacorp.com.pg Tue Mar 12 16:40:52 2019 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 13 Mar 2019 07:40:52 +1000 Subject: [AccessD] an ACCESS query In-Reply-To: References: <2052199538.9341430.1551792686185.ref@mail.yahoo.com>, , Message-ID: <5C882764.4004.39129D0@stuart.lexacorp.com.pg> If you want to stamp records with the creator's name, the way I do it is to include a "CreatedBy" field. I also use a "CreatedDateTime" field. Then in table design, just set the Default Value of those fields to "=apiGetUserName()" and "=Now()". If you use On_Save, Before/After_UPdate etc you will be recording the "LastEdit" information, not the "Create" information. It's oftn a good idea to record this as well, but you need to ensure that you include the appropriate code anywhere the record can be edited. :) -- Stuart On 12 Mar 2019 at 19:58, Bob Walsh wrote: > I'd put it on the forms before update event > > From: AccessD On Behalf Of John W. Clark > Sent: Tuesday, March 12, 2019 12:30 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > [Attn: This is an external email.] > > If I can bug y'all with one more thing. How would you suggest I'd add this ID to a record each time a new one is opened or saved? > > If I remember correctly I'd normally do something like this OnOpen for the form, but here I want to do it when a new record is opened. I want the user to be unable to edit/delete this. For the latter I just locked it. > > ________________________________ > From: AccessD > on behalf of Ryan W > > Sent: Tuesday, March 12, 2019 1:03 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] an ACCESS query > > No prob. :) > > > On Tue, Mar 12, 2019 at 12:02 PM John W. Clark > > wrote: > > > Wow, I was overthinking that one just a bit, eh?! Thanks, I think this > > will suffice! > > > > ________________________________ > > From: AccessD > on behalf of Ryan W < > > wrwehler at gmail.com> > > Sent: Tuesday, March 12, 2019 12:40 PM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] an ACCESS query > > > > What about just > > > > Environ("Username") ? > > > > > > > > On Tue, Mar 12, 2019 at 11:39 AM Bob Walsh > > > wrote: > > > > > Something like this? > > > > > > Declare PtrSafe Function apiGetUserName Lib "advapi32.dll" Alias > > > "GetUserNameA" _ > > > (ByVal lpBuffer As String, nSize As Long) As Long > > > > > > Function fOSUserName() As String > > > ' Returns the network login name > > > Dim lngLen As Long, lngX As Long > > > Dim strUserName As String > > > strUserName = String$(254, 0) > > > lngLen = 255 > > > lngX = apiGetUserName(strUserName, lngLen) > > > If (lngX > 0) Then > > > fOSUserName = Left$(strUserName, lngLen - 1) > > > Else > > > fOSUserName = vbNullString > > > End If > > > End Function > > > > > > From: AccessD > On Behalf Of John > > W. > > > Clark > > > Sent: Tuesday, March 12, 2019 9:36 AM > > > To: Access Developers discussion and problem solving < > > > accessd at databaseadvisors.com> > > > Subject: Re: [AccessD] an ACCESS query > > > > > > [Attn: This is an external email.] > > > > > > I haven't been out here in quite a while, but I'm hoping someone can save > > > me. I seem to have forgotten some things and I need to grab a user's > > Active > > > Directory login ID and put it in a record. > > > > > > I actually haven't programmed anything in quite a while. I've been > > playing > > > with VoIP phones and email lately and haven't needed to work with MS > > Access > > > in a very long time. I still lurk every now and then and read the posts, > > > but I haven't needed to use it. > > > > > > I'm praying someone has some code I can use to do this quick. I was > > trying > > > to use a couple of things, like: > > > > > > > > > Dim strUser as String > > > strUser = ActiveDirectory.User() > > > MsgBox "Welcome back, " & strUser > > > > > > but I get nothing...no errors, just nothing. I've tried variations and > > > some other code I've found as well. > > > > > > Is the "ActiveDirectory" code above native or should I be invoking > > > something to make it work? > > > > > > > > > Notice: This electronic transmission is intended for the sole use of the > > > individual or entity to which it is addressed and may contain > > confidential, > > > privileged or otherwise legally protected information. If you are not the > > > intended recipient, or if you believe you are not the intended recipient, > > > you are hereby notified that any use, disclosure, copying, distribution, > > or > > > the taking of any action in reliance on the contents of this information, > > > is strictly prohibited. Niagara County is not responsible for the content > > > of any external hyperlink referenced in this email or any email. IF YOU > > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > > -- > > > AccessD mailing list > > > AccessD at databaseadvisors.com> > > > http://databaseadvisors.com/mailman/listinfo/accessd< > > > http://databaseadvisors.com/mailman/listinfo/accessd> > > > Website: http://www.databaseadvisors.com > > > > > > > > > ________________________________ > > > HealthInsight is a private, nonprofit, community-based organization > > > dedicated to improving health and health care, with offices in four > > western > > > states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has > > > operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage > > > Renal Disease Networks in the Western United States. The information and > > > any materials included in this transmission may contain confidential > > > information from HealthInsight. The information is intended for use by > > the > > > person named on this transmittal. If you are not the intended recipient, > > be > > > aware that any disclosure, copying, distribution, or use of the contents > > of > > > this transmission is prohibited. If you have received this message in > > > error, please inform the sender and delete all copies. > > > -- > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > Notice: This electronic transmission is intended for the sole use of the > > individual or entity to which it is addressed and may contain confidential, > > privileged or otherwise legally protected information. If you are not the > > intended recipient, or if you believe you are not the intended recipient, > > you are hereby notified that any use, disclosure, copying, distribution, or > > the taking of any action in reliance on the contents of this information, > > is strictly prohibited. Niagara County is not responsible for the content > > of any external hyperlink referenced in this email or any email. IF YOU > > HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER > > IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER > > OR ELECTRONIC COPIES. Thank you for your cooperation. > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > Notice: This electronic transmission is intended for the sole use of the individual or entity to which it is addressed and may contain confidential, privileged or otherwise legally protected information. If you are not the intended recipient, or if you believe you are not the intended recipient, you are hereby notified that any use, disclosure, copying, distribution, or the taking of any action in reliance on the contents of this information, is strictly prohibited. Niagara County is not responsible for the content of any external hyperlink referenced in this email or any email. IF YOU HAVE RECEIVED THIS TRANSMISSION IN ERROR, PLEASE NOTIFY THE SENDER IMMEDIATELY BY EMAIL AND DELETE THE ORIGINAL MESSAGE ALONG WITH ANY PAPER OR ELECTRONIC COPIES. Thank you for your cooperation. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > ________________________________ > HealthInsight is a private, nonprofit, community-based organization dedicated to improving health and health care, with offices in four western states: Nevada, New Mexico, Oregon and Utah. HealthInsight also has operations in Seattle, Wash., and Glendale, Calif., supporting End-Stage Renal Disease Networks in the Western United States. The information and any materials included in this transmission may contain confidential information from HealthInsight. The information is intended for use by the person named on this transmittal. If you are not the intended recipient, be aware that any disclosure, copying, distribution, or use of the contents of this transmission is prohibited. If you have received this message in error, please inform the sender and delete all copies. > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com >