Links zahlen kopieren und +1

MarkusxX25 · 20. Dezember 2010, 19:29

LINK/ordner/1.jpg
LINK/ordner/2.jpg
LINK/ordner/3.jpg
LINK/ordner/4.jpg

also das sind ca 400 jpg datein alle habe ich mit der endung +1 also das heißt ich habe so viele datein und will nen downloader machen .

also das dan automatisch 5.jpg gemacht wird usw weitergeführt wird .

V.I.R.U.S · 20. Dezember 2010, 19:41

also das ich das richtig verstehe:
du willst automatische downloadlinks erstellen um entsprechende JPEG dateien runterzuladen?

MarkusxX25 · 20. Dezember 2010, 19:46

ja nur das sind ca 400 links und ich möchte nich alles einzeln immer hinschreiben

V.I.R.U.S · 20. Dezember 2010, 20:02

VB.NET-Quellcode

dim x as integer
dim OldLink as string = "Dein Link vor der Zahl"
dim newLink as string
dim Typ as string = ".jpg" 'Weis nicht genau ob "Typ" ein Error macht. wenn ja nimm n anderen Variablennamen
do
x = x+1
newLink = OldLink & x & Typ
'... Hier musst du den Link verarbeiten
loop until x = 400 '400 Strings mit entsprechendem Link werden erstellt

MarkusxX25 · 20. Dezember 2010, 20:14

Ok cool habs verstanden habe das nun so gemacht das es mit deimen code der link geladen wird und dan wird per mydownload die sachen automatisch geladen funzt endlich

Trudi · 20. Dezember 2010, 20:38

So geht es übersichtlicher

VB.NET-Quellcode

For i = 0 To [AnzahlBilder]
Dim link As String = "http://www.LINK/ordner/" & i & ".jpg"
'//
'//Link hier verarbeiten
'//
Next

xtts02 · 20. Dezember 2010, 20:57

Du kannst auch mithilfe der IO.File-Klasse alle Dateien eines Ordner ermitteln und anhand dieser Dateiliste eine Link-Liste erstellen
Beispiel:

VB.NET-Quellcode

Dim ordnerUrl As String = "http://www.meine-url.net/ordner/"
Dim localOrdner As String = "c:\bilder\website"
Dim linkList As New List(Of String)
For Each datei As IO.FileInfo In (New IO.DirectoryInfo(localOrdner).GetFiles("*.jpg", IO.SearchOption.AllDirectories))
linkList.Add("<a href=""" & ordnerUrl & datei.Name & """>" & datei.Name.Replace(datei.Extension, "") & "</a>")
Next
' Prüfen
For Each link As String In linkList
Debug.WriteLine(link)
Next

Mangafreak1995 · 21. Dezember 2010, 04:01

@xtts02: das geht meines Wissens nur bei lokalen Ordnern. Zu deiner Idee bräuchte man einen FTP-Zugang um die Bilder alle aufzulisten.

xtts02 · 21. Dezember 2010, 09:42

Das ist richtig. Das Beispiel ist natürlich nur dafür geeignet, wenn man die Dateien lokal auf dem Rechner hat und nur eine html-Seite generieren will. Nach der Generierung der html-Seite kann man den Ordner komplett mit der Ordnerstruktur hochladen.
Für andere Zwecke ist das Beispiel nicht geeignet.

Mangafreak1995 · 21. Dezember 2010, 20:13

Im Bezug auf :

xtts02 schrieb:

Das ist richtig. Das Beispiel ist natürlich nur dafür geeignet, wenn man die Dateien lokal auf dem Rechner hat und nur eine html-Seite generieren will.

solltest du für den Ordnerpfad auch ein lokales Beispiel geben und keine URL

VB.NET-Quellcode

Dim ordnerUrl As String = "http://www.meine-url.net/ordner/"

ansonsten würde ich mal warten was der TE antwortet.

xtts02 · 21. Dezember 2010, 21:16

Mangafreak1995 schrieb:

dann solltest du für den Ordnerpfad auch ein lokales Beispiel geben und keine URL

VB.NET-Quellcode

Dim localOrdner As String = "c:\bilder\website"

Tja, keine Ahnung, wie Du bei diesem Pfad auf URL kommst.

MarkusxX25 · 22. Dezember 2010, 17:11

mh nein nein es sind 900 bilder sind nur avatare

sind nummeriert von 1 - 900

die sollen automatisch alle gedownloadet werden.

Mangafreak1995 · 22. Dezember 2010, 17:14

@MarkusxX25 : kommst du mit den geposteten Codes und Vorgängen voran ?

MarkusxX25 · 22. Dezember 2010, 17:23

ja ein wenig schon nur jetzt muss ich versuchen das diese bilder automatisch heruntergeladen werden im ordner der .exe
Es muss ja von 1 - 900 gedownloadet werden ich werde dan noch ein wenig ändern.

gugi-zone.net · 22. Dezember 2010, 17:28

VB.NET-Quellcode

Dim Client as new net.webclient
For i = 0 To 900
Dim link As String = "http://www.deineseite/ordner/" & i & ".jpg"
Client.DownloadFileAsync(new uri(link), Application.Startuppath & i & ".jpg")
Next

nicht getestet!

MarkusxX25 · 22. Dezember 2010, 17:34

gugi

Eine Ausnahme (erste Chance) des Typs "System.NotSupportedException" ist in System.dll aufgetreten.

was hat dies zu bedeuten ?

Mangafreak1995 · 22. Dezember 2010, 17:38

poste doch mal deinen Code. Versuche mal DownloadFile() ohne Async. Dann bleibt das Programm da zwar hängen aber dann hast du die 900

MarkusxX25 · 22. Dezember 2010, 18:06

nun gehts dauert zwar aber es funktioniert einwandfrei vielen dank ich werd den mal erweitern

MarkusxX25 · 22. Dezember 2010, 19:53

VB.NET-Quellcode

Dim Client as new net.webclient
For i = 0 To 900
Dim link As String = "http://www.deineseite/ordner/" & i & ".jpg"
Client.DownloadFile(new uri(link), Application.Startuppath & i & ".jpg")
Next

Dies hat geklappt fals es jemand interesiert
die bilder werden gespeichert aber diese bilder heißen dan Debug1 Debug2.jpg usw also ordner das passt so habe es Photo genannt passt schon

Mfg

FROHE WEIHNACHTEN EUCH ALLEN

Mangafreak1995 · 22. Dezember 2010, 20:00

IO.Path.Combine(Application.Startuppath, String.Format("Bild{0,3}.jpg", i)) wäre wohl nicht schlecht gewesen in diesem Fall ;)

Links zahlen kopieren und +1

Links zahlen kopieren und +1

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

xtts02 schrieb:

VB.NET-Quellcode

Mangafreak1995 schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

4 Benutzer haben hier geschrieben