Database Connection / Login help needed

kscase · April 6th, 2007, 09:46 AM

Any help you can provide will be greatly appreciated.
I am attempting to get my database connection/login working.
I am using SQL 2K5 with VB 2K5.

Currently, I'm doing all the development on my local machine, while waiting for the main Windows 2K3 server to be built, so I can put the SQL server there. So, things will change in a week or so, but I need to get it working locally first.

I will be using mixed mode authentication.

Anyway,
what I am having problems figuring out is how to parse My.User so that I only pick up the information after the '\' (the user name) - I don't want the domain name (or machine name)! (For the moment, all the user accounts on the server have the same password - not good, but the current "system/network" administrator does things easy, not necessarily secure, so I am following suit.)

At some point, I hope to use integrated authentication after the domain is totally set up, but that is in the future.

Can any one help point me in the right direction?

BrianWren · April 6th, 2007, 12:46 PM

You can use InStrRev("....", "\") to find the last backslash's position, then grab all after that.

Code:

    Dim i      As Integer
    Dim MyUser As String

    i = InStrRev(My.User, "\")
    MyUser = Mid$(My.User, i)

kscase · April 6th, 2007, 01:15 PM

Brian,
Thanks for the response.
I added the code and got this error message.
'Microsoft.VisualBasic.ApplicationServices.User' cannot be converted to 'String'.

Did I miss something?

Karen

BrianWren · April 6th, 2007, 04:10 PM

Sorry...

Code:

    Dim i      As Integer
    Dim MyUser As String

    i = InStrRev(My.User.ToString(), "\")
    MyUser = Mid$(My.User.ToString(), i)

kscase · April 9th, 2007, 10:26 AM

Thanks, that fixed it!

Karen