Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 154
Default WEBSITE ACCESS AND VBA !!!

Hello -

I have a userform that works beautifully.

(1)I need a macro / subroutine that I can use to access a website like,
say www.ZeeZZZ.com (just an exemple url) from the form.

(2)Also, if the website has a field for username & password, is there a
way to include this in the code so that it will automatically, open the
website and enter the username and password programatically?

Perhaps two separate macros for (1) and (2)?
Are the above possible at all?

Any help will be graetly apprecaited.

Thanks
Jay

*** Sent via Developersdex http://www.developersdex.com ***
  #2   Report Post  
Posted to microsoft.public.excel.programming
r r is offline
external usenet poster
 
Posts: 125
Default WEBSITE ACCESS AND VBA !!!

"jay dean" wrote:

Hello -

I have a userform that works beautifully.

(1)I need a macro / subroutine that I can use to access a website like,
say www.ZeeZZZ.com (just an exemple url) from the form.

(2)Also, if the website has a field for username & password, is there a
way to include this in the code so that it will automatically, open the
website and enter the username and password programatically?


This link contains some examples
http://excelvba.altervista.org/blog/...l-accesso.html

regards
r

Il mio ultimo lavoro ...
http://excelvba.altervista.org/blog/...ternative.html

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 154
Default WEBSITE ACCESS AND VBA !!!

Hi r -

The link you provided seems helpful. It appears this is your
website..Can you translate this into English?

Thanks
Jay


*** Sent via Developersdex http://www.developersdex.com ***
  #4   Report Post  
Posted to microsoft.public.excel.programming
r r is offline
external usenet poster
 
Posts: 125
Default WEBSITE ACCESS AND VBA !!!

http://translate.google.it/translate...n&sl=it&tl=en#

regards
r

Il mio ultimo lavoro ...
http://excelvba.altervista.org/blog/...ternative.html


"jay dean" wrote:

Hi r -

The link you provided seems helpful. It appears this is your
website..Can you translate this into English?

Thanks
Jay


*** Sent via Developersdex http://www.developersdex.com ***

  #5   Report Post  
Posted to microsoft.public.excel.programming
r r is offline
external usenet poster
 
Posts: 125
Default WEBSITE ACCESS AND VBA !!!

if you can post the link to your web page
I can try to adapt the code
regards
r

Il mio ultimo lavoro ...
http://excelvba.altervista.org/blog/...ternative.html


"jay dean" wrote:

Hi r -

The link you provided seems helpful. It appears this is your
website..Can you translate this into English?

Thanks
Jay


*** Sent via Developersdex http://www.developersdex.com ***



  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 154
Default WEBSITE ACCESS AND VBA !!!


I don't have a web page.. all I am trying to do is looking for a macro
and assign it to a form control that will open a web page like
"www.developersdex.com" in a standard web browser.

Also, if the site has a "username" and "password", can I include it in
the macro so that it automatically logs me in?

Jay


*** Sent via Developersdex http://www.developersdex.com ***
  #7   Report Post  
Posted to microsoft.public.excel.programming
r r is offline
external usenet poster
 
Posts: 125
Default WEBSITE ACCESS AND VBA !!!

Each web page is a different world ...
to your page (www.developersdex.com) for example:

Sub developersdex_log()
'senza riferimenti ad altre librerie
Dim myIE As Object
Set myIE = CreateObject("InternetExplorer.Application")
Const READYSTATE_COMPLETE As Long = 4
Const myURL As String =
"http://www.developersdex.com/login.asp?refer=editprofile"

myIE.navigate myURL
myIE.Visible = True

Do While myIE.Busy Or myIE.readyState < READYSTATE_COMPLETE
DoEvents
Loop
'scrivi la mail
myIE.document.all("Email").Value = "LogName" '<<
'scrivi la password
myIE.document.all("Password").Value = "YourPassword" '<<
'esegue l'accesso
myIE.document.all("Image1").Click

Do While myIE.Busy Or myIE.readyState < READYSTATE_COMPLETE
DoEvents
Loop

End Sub



Sub developersdex_log_with_references()
'riferimenti a:
'"Microsoft Internet Controls"
'"Microsoft HTML Object Library"

Dim myIE As New InternetExplorer
Dim myDoc As HTMLDocument
Const myURL As String =
"http://www.developersdex.com/login.asp?refer=editprofile"


myIE.navigate myURL
myIE.Visible = True

Do While myIE.Busy Or myIE.readyState < READYSTATE_COMPLETE
DoEvents
Loop

Set myDoc = myIE.document

With myDoc
'scrivi la mail
..all("Email").Value = "LogName" '<<
'scrivi la password
..all("Password").Value = "YourPassword" '<<
'esegue l'accesso
..all("image1").Click
End With

Do While myIE.Busy Or myIE.readyState < READYSTATE_COMPLETE
DoEvents
Loop

End Sub

regards
r

--

Il mio ultimo lavoro ...
http://excelvba.altervista.org/blog/...ternative.html


"jay dean" wrote:


I don't have a web page.. all I am trying to do is looking for a macro
and assign it to a form control that will open a web page like
"www.developersdex.com" in a standard web browser.

Also, if the site has a "username" and "password", can I include it in
the macro so that it automatically logs me in?

Jay


*** Sent via Developersdex http://www.developersdex.com ***

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
ADO access to excel workbook on website Dreiding Excel Programming 1 December 4th 08 04:50 AM
Our new website Ewho Excel Worksheet Functions 0 February 8th 08 11:18 PM
Our new website Ewho Charts and Charting in Excel 0 February 8th 08 11:17 PM
inporting data from website where website address frequently chang HP Excel Programming 3 June 24th 07 03:50 PM
access a website from excel 2003 spreadsheet Ricardo New Users to Excel 0 October 25th 06 11:31 PM


All times are GMT +1. The time now is 08:03 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"