Visual Basic Forum for Visual Basic Programmers VB - Interactive Visual Basic Forum .NET Programming & Help

ourspt · Freshman Joined: 14 Dec 2004 Posts: 34

Hi,

How do i retrieve the domain password for a valid domain username from the Active Directory?

I need some thing like below, where i will pass the valid domain username and domain names to the function and thus the function should retrieve me the domain password.

strpassword = getPassword("iamJade","MyDomain")

Please help me in this regard.

Thanks and Regards
ourspt

ourspt · Freshman Joined: 14 Dec 2004 Posts: 34

Actually I am writing a small vb application with below code to connect to remote desktop machine without inputting the username and password, so that if I click on my application it should directly logon to my remote desktop server taking the current login information.

Dim TS_OBJECT As New ActiveDs.WinNTSystemInfo

Dim TS_USER As String
Dim TS_PASSWORD As String
Dim TS_DOMAIN As String
Dim TS_SERVER As String

TS_USER = TS_OBJECT.UserName

TS_PASSWORD = “mypassword”

TS_DOMAIN = TS_OBJECT.DomainName

TS_SERVER = "MyRemoteServerName"

Set TS_OBJECT = Nothing

MsRdpClient.Server = TS_SERVER
MsRdpClient.UserName = TS_USER
MsRdpClient.AdvancedSettings2.ClearTextPassword = TS_PASSWORD
MsRdpClient.Domain = TS_DOMAIN

MsRdpClient.SecuredSettings.StartProgram = "C:\Windows\notepad.exe"
MsRdpClient.SecuredSettings.WorkDir = "C:\Windows"

MsRdpClient.FullScreen = False
MsRdpClient.DesktopWidth = 1024
MsRdpClient.DesktopHeight = 768

MsRdpClient.Width = Form1.Width
MsRdpClient.Height = Form1.Height

MsRdpClient.AdvancedSettings2.RedirectDrives = False
MsRdpClient.AdvancedSettings2.RedirectPrinters = True
MsRdpClient.AdvancedSettings2.RedirectPorts = False
MsRdpClient.AdvancedSettings2.RedirectSmartCards = False

Form1.Caption = "Microsoft Remote Desktop Client Connection....."

MsRdpClient.Connect

Now in the line
TS_PASSWORD = “mypassword” , I need to get the password for the current logged in user automatically, so that I can execute the above source code then i will be placed directly to my remote server.

As of now, I need to enter the password once again in the remote desktop session, but username and domain will be populated automatically by using the ActiveDS object.

I hope you understood my requirement.

Thanks and Regards
ourspt