[VB6] Operazioni con i file

[-=illidan=-]

Innanzitutto salve

allora comincio subito a spiegare...
io ho la path di una cartella e devo vedere quanti file ci sono nella cartella e come si chiama ognuno di quelli...come posso fare?

poi fatto quello dovrei rinominare tutto i file...facendoli diventare 0001, 0002, 0003 ecc ecc...come faccio???

Plz aiutatemi

[iguana13]

Usi Dir("C:\NomeCartella\*.*")

Per rinominare:
[CODE]
Name Vecchionome as nuovonome

[-=illidan=-]

ok ma come faccio a capire quanti file ci sono dentro e di conseguenza a rinominarli come dicevo io?

[Sypher]

Vedi se può esserti utile questo

[Mabi]

Così ?

Const Cartella = "C:\Documenti\"
Dim ContFile As Long
Dim FileName As String

FileName = Dir(Cartella)
Do Until FileName = ""
  Name Cartella & FileName As Cartella & Format(ContFile, "0000") & Right(FileName, 4)
  ContFile = ContFile + 1
  FileName = Dir
Loop

[iguana13]

Credo che dovrebbe funzionare.
Se nn va, allora prova con Cartella = "C:\Documenti\*"

[Mabi]

Originariamente inviato da iguana13
Credo che dovrebbe funzionare.

Lo credo anch'io