VPN Automation

Recommended Posts

mistrfree 0

mistrfree 0

Not sure how to exactly post this code, but here goes. This is just a script that I made to make it easier for a few of the people at the office to get into our VPN server. They seem to have problems, so I automated it for them. This is in the end an exe file with an installer. It actually gives them the ability to connect to our server, access their drives, connect to our main database server, check their email, pretty easily. The addresses are zeroed out for security. Maybe someone can use it and modify it to their taste.

Global $about_label = GUICtrlCreateLabel("This section will map your office drives to your home computer. Selecting your username will begin the process. Your newly mapped drives will open in a new window/s. If your user directory is located in the Public Share directory, select your user's directory folder to access your documents. The process works in the same fashion for user's private share directories. Private shares are ONLY accessible by the authorized user.",15,30,$gui_width - 30,240)

MsgBox(0, "UN-AUTHORIZED USER", "Your license file is corrupt or missing. Please contact Waldrop Heating and Air Conditioning Inc. for licensing help or authorization to use this software. http://www.waldrophvac.com")

Share this post

Link to post

Share on other sites

mistrfree 0

mistrfree 0

I'm really, really hoping they are not real life access details you have posted in a public forum.

The rasphone.pbk is a dummy file. Its used to store phonebook entries, but I want it blank in this instance which will prompt for a new entry. You cannot use a pbk across different systems, they have specific hardware information inside, which will not match up. Depending whether a user has or has not made a connection b4. This allows the user to create a connnedction to the server, and its used and placed for the users system, either XP or 2000.

This is a small version to give some ideas on how to proceeed with it. My final is a bit more complex and user friendly.