How do NetworkCredenti al and WebClient work?

[Tosco]

I read many examples with NetworkCredenti al and WebClient, but no one
with a real http address.
They all work in theory, but I wasn't able to use them in the real
world.
The following code should access an ebay page. There is no
redirection involved in TestPage. If you have an ebay account you can
try it in 1 minute.

What's wrong with my code?

Dim UserName As String = "stenci"
Dim Password As String = "vivalafica "
Dim TestPage As String = _
"http://my.ebay.com/ws/eBayISAPI.dll?M yeBay&MyeBay=" _
& UserName
Dim Cli As New Net.WebClient

Dim Txt1 = Cli.DownloadStr ing(TestPage)
IO.File.WriteAl lText("C:\1.txt ", Txt1)

Cli.Credentials = New Net.NetworkCred ential(UserName , _
Password)

Dim Txt2 = Cli.DownloadStr ing(TestPage)
IO.File.WriteAl lText("C:\2.txt ", Txt2)

MsgBox("Before setting credentials is not logged=" & _
InStr(Txt1, "Sign In: My eBay") & " is logged=" _
& InStr(Txt2, "Sign In: My eBay"))

MsgBox("After setting credentials is not logged=" & _
InStr(Txt1, "My Summary") & " is logged=" _
& InStr(Txt2, "My Summary"))

Thanks,
Stefano

[Herfried K. Wagner [MVP]]

"Tosco" <st***********@ gmail.comschrie b:

>I read many examples with NetworkCredenti al and WebClient, but no one
with a real http address.

eBay uses a different authentication approach similar to those used by
Google:

<URL:http://dotnet.mvps.org/dotnet/code/net/#CookieRequest>

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Tosco]

eBay uses a different authentication approach similar to those used by

Google:

<URL:http://dotnet.mvps.org/dotnet/code/net/#CookieRequest>

Thank you Herfried, but I don't understand the german part, I can only
look at the code examples, and it doesn't help.
I think the part that I need in that page is this:

Dim Client As New WebClient()
Client.Headers. Add("Content-Type", "applicatio n/x-www-form-
urlencoded")
Client.UploadDa ta( _
"https://www.google.com/adsense/login.do", _
"POST", _
Encoding.UTF8.G etBytes("userna me=<user name>&password= <password>")
_
)
Client.Headers. Clear()
Client.Headers. Add("Cookie", Client.Response Headers("Set-Cookie"))
Dim Data() As Byte = _
Client.Download Data("https://www.google.com/adsense/report/
overview")
Client.Dispose( )
MsgBox(Encoding .UTF8.GetString (Data))

I tried to use it for ebay (I actually need it in 2 different domains,
but I hope than after succeding with ebay once I will be able to use
it with the other urls) and it didn't work.
This is what I did:

Dim UserName As String = "username"
Dim Password As String = "password"
Dim Client As New Net.WebClient()
Client.Headers. Add("Content-Type", "applicatio n/x-www-form-
urlencoded")
Client.UploadDa ta( _
"https://signin.ebay.com/ws/eBayISAPI.dll", _
"POST", _
System.Text.Enc oding.UTF8.GetB ytes( _
"MfcISAPIComman d=SignInWelcome &siteid=0&co_pa rtnerId=2&" & _
"UsingSSL=1&ru= &pp=&pa1=&pa2=& pa3=&i1=-1&pageType=-1&userid="
_
& UserName & "&pass=" & Password))
Client.Headers. Clear()
Client.Headers. Add("Cookie", Client.Response Headers("Set-Cookie"))
Dim Data() As Byte = _
Client.Download Data("http://my.ebay.com/ws/eBayISAPI.dll?
MyeBay")
Client.Dispose( )
MsgBox(System.T ext.Encoding.UT F8.GetString(Da ta))

Stefano