Get active wireless network name in MS Access VBA

Any suggestions for code to get active wireless network name in MS Access?

BTW: I tried:
https://www.experts-exchange.com/questions/28350821/Getting-Wireless-Connection-Name-Through-VBA.html
the code didn't work.
LVL 39
thenelsonAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Sagar KhatalstudentCommented:
set access permission
0
thenelsonAuthor Commented:
>set access permission
I don't understand
0
PatHartmanCommented:
I'm not sure why that answer was accepted in the thread you linked to.  The code doesn't compile.  The GetWirlessName function is missing.  I tried fixing the spelling error but that didn't fix the issue.
0
Determine the Perfect Price for Your IT Services

Do you wonder if your IT business is truly profitable or if you should raise your prices? Learn how to calculate your overhead burden with our free interactive tool and use it to determine the right price for your IT services. Download your free eBook now!

thenelsonAuthor Commented:
I found the answer at:
https://stackoverflow.com/questions/36297043/access-vba-obtain-wireless-network-name-connected
The first listing of code on that page starting with:
Option Explicit

Private Const DOT11_SSID_MAX_LENGTH As Long = 32

The function:
GetConectedSSID
returns the name of the active wireless connection.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
PatHartmanCommented:
I forgot to warn you that running Access on a wireless network is dangerous.  Access cannot gracefully recover from network interruptions and they happen frequently on a wireless network.  If they happen at a "bad" time, your BE will be corrupted.
0
thenelsonAuthor Commented:
Thanks for the warning but Access is not running on a wireless network. We have two computers running Access each running locally which run a home grown replication routine several times daily to keep the data in sync.  I wanted to know the name of the wireless network to allow activation of routines I only want to run at our office location, not at home.
0
PatHartmanCommented:
I didn't test the code so I don't know if it returns all available networks or just the network you are connected to.  If it is just the network you are connected to, then you are running on a wireless network and linking to a Jet/ACE BE over wireless is extremely dangerous.
0
thenelsonAuthor Commented:
Nope, as I said, i am not linking to a BE over the network. There are separate BEs local on each computer and I created a replication routine outside of Access that runs several times a day to keep the two BEs in sync. The routine I created is designed to handle network dropouts and I tested it extensively. It has operated flawlessly for about 15 years even if I turn off the computers in the middle of the run.
0
PatHartmanCommented:
That's fine.  Since you were asking about wireless networks and Access in the same question, I was just trying to clarify for future readers that running an Access app on a wireless network is dangerous.
0
thenelsonAuthor Commented:
I found the answer on anther service.
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Access

From novice to tech pro — start learning today.