Hi,
Ich bastele zur zeit an einem Programm, das mit meine Filliste mit Covern aus Amazon anzeigt. Soweit bin ich bisher (ich weiß es sind teilweise unnötige Sachen dabei
![:(](https://www.vb-paradise.de/wcf/images/smilies/sad.png)
Spoiler anzeigen
Bekomme aber diese Fehlermeldung: Ausnahmefehler während einer WebClient-Anforderung.
Spoiler anzeigen
Mit einzelnen Titeln und ner Picturebox funktioniert es wunderbar.
Hat jemand den Grund dafür parat
?
Ich bastele zur zeit an einem Programm, das mit meine Filliste mit Covern aus Amazon anzeigt. Soweit bin ich bisher (ich weiß es sind teilweise unnötige Sachen dabei
![;)](https://www.vb-paradise.de/wcf/images/smilies/wink.png)
![:(](https://www.vb-paradise.de/wcf/images/smilies/sad.png)
VB.NET-Quellcode
- Option Strict On
- Imports System.Net
- Imports System.Text.RegularExpressions
- Public Class Form1
- Dim liste As New ImageList
- Private Function GetImage(ByVal look As String, ByVal numb As Integer) As Image
- Dim plist As New List(Of String) ' liste für links
- Dim weber As New WebClient 'downloader
- Dim sitetext As String 'quelltext
- sitetext = weber.DownloadString("http://www.amazon.de/s/ref=nb_sb_noss_1?__mk_de_DE=%C3%85M%C3%85Z%C3%95%C3%91&url=search-alias%3Daps&field-keywords=" + look) 'downloaden Seiteq.
- Dim matches As MatchCollection = Regex.Matches(sitetext, "<a href=""(.*?)""><img src=""(.*?)""") 'durchsuchen nach links
- For Each Match As Match In matches
- Dim test As String = sitetext.Substring(Match.Index, Match.Length)
- Dim ende As String = Regex.Replace(test, "<a href=""(.*?)""><img src=""(.*?)""", "$2")
- plist.Add(ende) 'Hinzufügen zur Liste
- Next
- If plist.Count <> 0 Then
- weber.DownloadFile(plist.Item(0).ToString, IO.Path.Combine(Application.StartupPath, numb.ToString + ".jpg")) 'runterladen
- Dim imager As Image 'zum zurückgeben
- imager = Image.FromFile(IO.Path.Combine(Application.StartupPath, numb.ToString + ".jpg"))
- Return imager
- End If
- End Function
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim counter As Integer = 0
- Dim lfd As New FolderBrowserDialog
- If lfd.ShowDialog = Windows.Forms.DialogResult.OK Then
- For Each file As String In IO.Directory.GetFiles(lfd.SelectedPath)
- liste.ImageSize = New Size(160, 160)
- If GetImage(IO.Path.GetFileNameWithoutExtension(file).Replace("_", " "), counter) IsNot Nothing Then
- liste.Images.Add(GetImage(IO.Path.GetFileNameWithoutExtension(file).Replace("_", " "), counter))
- ListView1.LargeImageList = liste
- ListView1.Items.Add(IO.Path.GetFileNameWithoutExtension(file).Replace("_", " "), 0)
- counter = counter + 1
- End If
- Next
- End If
- End Sub
- End Class
Bekomme aber diese Fehlermeldung: Ausnahmefehler während einer WebClient-Anforderung.
Brainfuck-Quellcode
- Informationen über das Aufrufen von JIT-Debuggen
- anstelle dieses Dialogfelds finden Sie am Ende dieser Meldung.
- ************** Ausnahmetext **************
- System.Net.WebException: Ausnahmefehler während einer WebClient-Anforderung. ---> System.IO.IOException: Der Prozess kann nicht auf die Datei "C:\Users\Fabian\Documents\Visual Studio 2008\Projects\Movie\Movie\bin\Debug\0.jpg" zugreifen, da sie von einem anderen Prozess verwendet wird.
- bei System.IO.__Error.WinIOError(Int32 errorCode, String maybeFullPath)
- bei System.IO.FileStream.Init(String path, FileMode mode, FileAccess access, Int32 rights, Boolean useRights, FileShare share, Int32 bufferSize, FileOptions options, SECURITY_ATTRIBUTES secAttrs, String msgPath, Boolean bFromProxy)
- bei System.IO.FileStream..ctor(String path, FileMode mode, FileAccess access, FileShare share, Int32 bufferSize, FileOptions options, String msgPath, Boolean bFromProxy)
- bei System.IO.FileStream..ctor(String path, FileMode mode, FileAccess access)
- bei System.Net.WebClient.DownloadFile(Uri address, String fileName)
- --- Ende der internen Ausnahmestapelüberwachung ---
- bei System.Net.WebClient.DownloadFile(Uri address, String fileName)
- bei Movie.Form1.GetImage(String look, Int32 numb) in C:\Users\Fabian\Documents\Visual Studio 2008\Projects\Movie\Movie\Form1.vb:Zeile 18.
- bei Movie.Form1.Form1_Load(Object sender, EventArgs e) in C:\Users\Fabian\Documents\Visual Studio 2008\Projects\Movie\Movie\Form1.vb:Zeile 32.
- bei System.EventHandler.Invoke(Object sender, EventArgs e)
- bei System.Windows.Forms.Form.OnLoad(EventArgs e)
- bei System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
- bei System.Windows.Forms.Control.CreateControl()
- bei System.Windows.Forms.Control.WmShowWindow(Message& m)
- bei System.Windows.Forms.Control.WndProc(Message& m)
- bei System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
- bei System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
- ************** Geladene Assemblys **************
- mscorlib
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5466 (Win7SP1GDR.050727-5400).
- CodeBase: file:///C:/Windows/Microsoft.NET/Framework64/v2.0.50727/mscorlib.dll.
- ----------------------------------------
- mscorlib.resources
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5466 (Win7SP1GDR.050727-5400).
- CodeBase: file:///C:/Windows/Microsoft.NET/Framework64/v2.0.50727/mscorlib.dll.
- ----------------------------------------
- Movie
- Assembly-Version: 1.0.0.0.
- Win32-Version: 1.0.0.0.
- CodeBase: file:///C:/Users/Fabian/Documents/Visual%20Studio%202008/Projects/Movie/Movie/bin/Debug/Movie.exe.
- ----------------------------------------
- Microsoft.VisualBasic
- Assembly-Version: 8.0.0.0.
- Win32-Version: 8.0.50727.5420 (Win7SP1.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/Microsoft.VisualBasic/8.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll.
- ----------------------------------------
- System
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5467 (Win7SP1GDR.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System/2.0.0.0__b77a5c561934e089/System.dll.
- ----------------------------------------
- System.Windows.Forms
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5468 (Win7SP1GDR.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.Windows.Forms/2.0.0.0__b77a5c561934e089/System.Windows.Forms.dll.
- ----------------------------------------
- System.Drawing
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5467 (Win7SP1GDR.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.Drawing/2.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll.
- ----------------------------------------
- System.Runtime.Remoting
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5420 (Win7SP1.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.Runtime.Remoting/2.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll.
- ----------------------------------------
- System.Xml
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5420 (Win7SP1.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.Xml/2.0.0.0__b77a5c561934e089/System.Xml.dll.
- ----------------------------------------
- System.Configuration
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5420 (Win7SP1.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.Configuration/2.0.0.0__b03f5f7f11d50a3a/System.Configuration.dll.
- ----------------------------------------
- System.resources
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5420 (Win7SP1.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.resources/2.0.0.0_de_b77a5c561934e089/System.resources.dll.
- ----------------------------------------
- System.Windows.Forms.resources
- Assembly-Version: 2.0.0.0.
- Win32-Version: 2.0.50727.5420 (Win7SP1.050727-5400).
- CodeBase: file:///C:/windows/assembly/GAC_MSIL/System.Windows.Forms.resources/2.0.0.0_de_b77a5c561934e089/System.Windows.Forms.resources.dll.
- ----------------------------------------
- ************** JIT-Debuggen **************
- Um das JIT-Debuggen (Just-In-Time) zu aktivieren, muss in der
- Konfigurationsdatei der Anwendung oder des Computers
- (machine.config) der jitDebugging-Wert im Abschnitt system.windows.forms festgelegt werden.
- Die Anwendung muss mit aktiviertem Debuggen kompiliert werden.
- Zum Beispiel:
- <configuration>
- <system.windows.forms jitDebugging="true" />
- </configuration>
- Wenn das JIT-Debuggen aktiviert ist, werden alle nicht behandelten
- Ausnahmen an den JIT-Debugger gesendet, der auf dem
- Computer registriert ist, und nicht in diesem Dialogfeld behandelt.
Mit einzelnen Titeln und ner Picturebox funktioniert es wunderbar.
Hat jemand den Grund dafür parat
![:)](https://www.vb-paradise.de/wcf/images/smilies/smile.png)
![8-)](https://www.vb-paradise.de/wcf/images/smilies/cool.png)
![8-)](https://www.vb-paradise.de/wcf/images/smilies/cool.png)