Login to Rediffmail

How do you launch IE from VB 6.0?  One of the way to do so would be as follows:

Private Sub RediffLogin()
Dim navURL, uName, uPass As String
Dim ie As Object

‘Change following couple of lines with you ID & Password
    uName = “user_id”
    uPass = “user_password”

‘This sets the url of the page, in this case
‘rediff login page
    navURL = “http://mail.rediff.com/cgi-bin/login.cgi

‘Create internetexplorer and provide url
    Set ie = CreateObject(“InternetExplorer.Application”)
    ie.navigate navURL

‘set visibility as true
    ie.Visible = True

‘wait until IE is done loading page.
    While ie.Busy
      DoEvents
    Wend

‘Enter userid and password in respective textboxes
    ie.document.all(“login”).Value = uName
    ie.document.all(“passwd”).Value = uPass
   
‘click checkbox for secure login
    ie.document.all(“seclogin”).Click ‘clicks the checkbox

‘click go button
    ie.document.all(“proceed”).Click    ‘Clicks the GO button on the page

‘wait until IE is done loading page.
    While ie.Busy
      DoEvents  ‘wait until IE is done loading page.
    Wend
End Sub

 

 

Advertisements

Leave a Reply

Please log in using one of these methods to post your comment:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: