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

• #1538 fluxion őstag martonx #1537

  Új Válasz 2011-11-24 20:35:00 #1538

  Ú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 #1537 üzenetére

  Nézegettem, de nekem semmi nem derül ki belőle

• #1536 fluxion őstag martonx #1535

  Új Válasz 2011-11-24 18:23:46 #1536

  Ú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 #1535 üzenetére

  A watin alapból 5 hibával indul és mikor elindul akkor hiányoznak a gombok ikonjai és egy oldalt sem tölt be. Próbáltam több verziót is, de ugyan az :S
  Gondolom ez a progi olyasmi mint az enyém, csak nem oldalfüggő. Jól gondolom? Más hasonló progit nem ismersz?

• #1533 fluxion őstag martonx #1524

  Új Válasz 2011-11-24 17:04:05 #1533

  Ú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 #1524 üzenetére

  Erre nem gondoltam, de sajnos így is ugyan azt a hibát dobja:
  http://img259.imageshack.us/img259/1186/hibag.png

• #1523 fluxion őstag martonx #1522

  Új Válasz 2011-11-23 20:52:10 #1523

  Ú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 #1522 üzenetére

  Lényeg, hogy működik.
  Köszönöm a segítséget, sokat jelentett

  Lenne még egy kérdésem.
  A program rendesen működik, ha olyan tartalmat töltök le amihez nem kell bejelentkezni az oldalra. Ha olyan mappát nyitok meg amihez be kell jelentkezni, akkor ugye azt csak a bejelentkezés után tehetem meg. Ezzel nincs is semmi gond, teljesen ugyan olyan felületű oldalra visz, még a gombok inputjai sem változnak, viszont időtúllépéssel dob egy hibát.
  Ha csak a webbrowser ablakba töltöm le akkor simán letölti, de ha ráengedném a "ciklust" akkor dobja a hibát. Valami ötlet erre?

• #1521 fluxion őstag martonx #1520

  Új Válasz 2011-11-22 23:26:11 #1521

  Ú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 #1520 üzenetére

  Fura de nekem ez jön le a program viselkedéséből.
  Most ilyen:
  WebBrowser1.Document.GetElementById("next").InvokeMember("click")
  Delay(5)
  My.Computer.Network.DownloadFile(sourceURL, filedir)

  Így láthatólag probléma nélkül fut

• #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.

• #1517 fluxion őstag martonx #1516

  Új Válasz 2011-11-22 21:23:03 #1517

  Ú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 #1516 üzenetére

  Ezt a szinkron-aszinkron dolgot nem teljesen értem.
  Erről az oldalról töltenék le: https://familysearch.org/pal:/MM9.3.1/TH-1951-20648-29594-35?cc=1452460&wc=12890478

  És itt a teljes forráskód:
  Imports System.Net
  Public Class Form1
  Private WithEvents download As WebClient
  
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  Dim download As New WebClient
  download = New WebClient
  
  
  Dim i As Integer
  Dim a As String
  'For i = 1 To 3
  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")
  ProgressBar1.Value = 0
  ProgressBar1.Maximum = 100
  Try
  download.DownloadFileAsync(New Uri(sourceURL), (filedir))
  Catch ex As Exception
  MsgBox("Failed" + ErrorToString(), MsgBoxStyle.Critical)
  End Try
  WebBrowser1.Document.GetElementById("next").InvokeMember("click")
  ' Next
  End Sub
  
  Private Sub download_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles download.DownloadProgressChanged
  ProgressBar1.Value = e.ProgressPercentage
  End Sub
  End Class

  Ez még változni fog itt-ott annyiban, hogy lehessen mappát választani és lehessen megadni más url-t is, de most csak az a lényeg hogy működjön

• #1515 fluxion őstag fluxion #1514

  Új Válasz 2011-11-22 19:42:37 #1515

  Ú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 fluxion #1514 üzenetére

  Jah azt még jelezném, hogy ez nem akar működni:
  Private Sub download_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles download.DownloadProgressChanged
  ProgressBar1.Value = e.ProgressPercentage
  End Sub
  Ezen kívül más megoldás lehetséges?

• #1514 fluxion őstag

  Új Válasz 2011-11-22 18:08:49 #1514

  Ú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

  Sziasztok!

  Egy olyan programot készítek ami egy weboldalról tölt le egy képet, majd ugrik a következőre és letölti azt is és így tovább
  Így néz ki a kódrész ami a fájlt letölti:
  Try
  download.DownloadFileAsync(New Uri(sourceURL), (filedir))
  Catch ex As Exception
  MsgBox("Failed" + ErrorToString(), MsgBoxStyle.Critical)
  End Try

  Azt szeretném megcsinálni, hogy csak akkor ugorjon át a következő képre, ha már letöltötte az aktuálisat. Mivel vizsgáljam ezt?

  Válaszotokat előre is köszönöm.

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