Gå til innhold

Oppsett av WebClient (VB.Net)


Anbefalte innlegg

Videoannonse
Annonse

Jeg får ikke dette til..

Jeg følger MSDN etter punkt og prikk, men når jeg tester det skjer det ingen ting.

 

Men det står at "user-agent" skal endres, og det er det eneste jeg ikke har gjort noe med. Noen som vet noe?

Lenke til kommentar
Jeg får ikke dette til..

Jeg følger MSDN etter punkt og prikk, men når jeg tester det skjer det ingen ting.

 

Men det står at "user-agent" skal endres, og det er det eneste jeg ikke har gjort noe med. Noen som vet noe?

 

 

Post koden du har skrevet da ...

Lenke til kommentar

Imports System
Imports System.Net
Imports System.IO
Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
End Class
Public Class webclnt

Public Shared Sub Main(ByVal args() As String)
	If args Is Nothing OrElse args.Length = 0 Then
		MsgBox("Oppdateringer klare")
		Throw New ApplicationException("www.eksempel.net/updates/searcherversion.txt")
	End If
	Dim client As New WebClient()

	' Add a user agent header in case the 
	' requested URI contains a query.
	client.Headers.Add("user-agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .NET CLR 1.0.3705;)")

	Dim data As Stream = client.OpenRead(args(0))
	Dim reader As New StreamReader(data)
	Dim s As String = reader.ReadToEnd()
	Console.WriteLine(s)
	data.Close()
	reader.Close()
End Sub 'Main
End Class 'webclnt

Det er vel riktig? Det står i alle fall ikke noe annet det men det er noe med DownloadString som jeg nettopp oppdaget =/ Trenger jeg den?

 

Edit: På ftp-servern har jeg lagt searcherversion.txt det det står:

 

1,2

http://www.eksempel.net/updates/searcherclient120%2.exe

 

Slik som noe sa tidligere i denne tråden?

Riktig?

Endret av Pilarwiki
Lenke til kommentar

Ok; string minstring

betyr at vi lager en ny variabel som heter "minstring" og datatypen er string, altså unicode tekst skal lagres i den.

 

DownloadString henter data fra websiden, og lagrer det som en unicode string, og legger det i minstring

 

Verre er det ikke ;)

 

edit: Hvis du ikke vet hva unicode er, så betyr det at hver bokstav tar 2 byte, altså kan det være 65537 forskjellige tegn(ikke helt riktig, det kan være mange flere, men det skal jeg ikke gå nærmere inn på) i hver bokstav i teksten.

Endret av GeirGrusom
Lenke til kommentar

Dim instance As WebClient
Dim address As String
Dim returnValue As String

returnValue = instance.DownloadString(address)

Dette er DownloadString ifølge MSDN. Det er riktig retning jeg beveger meg, right?

 

Men så var det det WebClient objektet da.. Det får jeg ikke til. Jeg forlanger ingenting, men kanskje noen vil gi meg en nøyaktig løsning, en kode, også kan jeg lære av alt jeg gjorde feil når jeg ser koden? :whistle:

 

Det under fungerer ikke..:

 

System.Net.WebClient

string minstring = WebClient.DownloadString() 'Linken til nedlastingssiden etter DownloadString?

 

Og jeg må vel deklarere minstring med Dim :)

 

(Beklager at jeg skrev før jeg prøvde).

Endret av Pilarwiki
Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
×
×
  • Opprett ny...