Ergebnis 1 bis 9 von 9

Baum-Darstellung

  1. #8
    Bad Times Virus Avatar von LeadOr
    Registriert seit
    27.07.2008
    Beiträge
    566

    Standard

    Code:
        Dim fileinfo As New DirectoryInfo("C:\bilder\")
                        Dim files As Array = fileinfo.GetFiles("*.jpg")
    da haste alle datein aus dem ordner in einem array und kannst diese besser durchlaufen lassen

    vlt so (ungetestet^^)



    Code:
    For i as integer = 0 to files.getupperbound(0)
      My.Computer.Network.UploadFile("C:\bilder\", "ftp://ftp.meinftp.de" & "/" & files(i), "meinftplogin", "meinftppw")
    next
    du kannst aber auch einfach nur jpgs in die listbox laden

    Code:
    For i as integer = 0 to files.getupperbound(0)
       ListBox1.items.add("C:\bilder\" & files(i))
     next
    was ich dir empfehlen würde wäre:

    1. winrar in dein programm einbinden
    2. alle datein in einen ordner kopieren
    3. den ordner raren
    4. hochladen

    so hab ih mir meinem firefox stealer gebastelt ;D
    Geändert von LeadOr (20.08.2009 um 23:58 Uhr)

Stichworte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •