Új hozzászólás Aktív témák

• #1519 fluxion őstag martonx #1518

  Új Válasz 2011-11-22 22:53:29 #1519

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  fluxion

  őstag

  válasz martonx #1518 üzenetére

  Köszönöm a segítséget, ez nagyon korrekt válasz volt.
  Ezt a verziót választottam:
  Dim mettől As Integer = TextBox4.Text
  Dim meddig As Integer = TextBox2.Text
  Dim i As Integer
  Dim a As String
  For i = mettől To meddig
  a = i
  
  Dim link As String = WebBrowser1.Document.GetElementById("save").GetAttribute("href")
  TextBox1.Text = ("https://familysearch.org" + link)
  
  Dim sourceURL = TextBox1.Text
  Dim filedir = ("C:\" + a + ".jpg")
  WebBrowser1.Document.GetElementById("next").InvokeMember("click")
  My.Computer.Network.DownloadFile(sourceURL, filedir)
  
  Next

  De nem várja meg, hogy letöltsön a kép, és már megy is tovább a for ciklus.

Új hozzászólás Aktív témák