| Precedente :: Successivo |
| Autore |
Messaggio |
DragonNinja
Frequentatore del Forum
Registrato: Jul 05, 2005
Messaggi: 412
|
 Inviato: Mer Ago 30, 2006 1:31 am Oggetto: [RISOLTO][VB6] Dividere nome file da percorso |
 |
|
Ciao a tutti.. sto provando a dividere il nome del file dal suo percorso ma non ci riesco.. su una guida ho trovato alcune proprietà degli oggetti file e folder che potrebbero essermi d'aiuto... ma non riesco a capire la loro sintassi...
ho trovato la loro dichiarazione che dovrebbe essere la seguente:
| Codice: | Dim fso As New Scripting.FileSystemObject
Dim dr As Scripting.Drive, fld As Scripting.Folder |
Ma non funziona.. mi da errore... qualcuno può spiegarmi gentilmentecome funzionano questi 2 oggetti o un metodo alternativo per dividere il nome del file dal suo percorso?
Non so se può esservi d'aiuto per trovare un'altra soluzione al problema, comunque, percorso + nome file sono memorizzati in una label...
Grazie per l'aiuto |
|
| Torna in cima |
|
 |
DragonNinja
Frequentatore del Forum
Registrato: Jul 05, 2005
Messaggi: 412
|
| Inviato: Mer Ago 30, 2006 3:14 am Oggetto: |
|
|
ho risolto così:
| Codice: | Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.GetFile(Label1.Caption) |
e fino a qui ci siamo.. ora dovrei avere solo il nome del file senza estensione e percorso... senza percorso basta fare:
| Codice: | | Label2.Caption = file.Name |
e fino a qui ci siamo... per eliminare anche l'estensione ho provato così:
| Codice: | | Label2.Caption = file.Name - "." - fso.GetExtensionName(Label1.Caption) |
oppure
| Codice: | | Label2.Caption = file.Name - Right$(file.Name,4) |
ma nn va nessuno dei 2... |
|
| Torna in cima |
|
|
DragonNinja
Frequentatore del Forum
Registrato: Jul 05, 2005
Messaggi: 412
|
| Inviato: Mer Ago 30, 2006 3:27 am Oggetto: |
|
|
risolto:
| Codice: | Label2.Caption = Left$(file.Name, Len(file.Name) - 4)
|
|
|
| Torna in cima |
|
|
Incantatore
Moderatore di RaulKen.It
Registrato: Oct 07, 2004
Messaggi: 1924
Località: Roma
|
| Inviato: Mer Ago 30, 2006 5:40 am Oggetto: |
|
|
| bene può essere utile!! |
|
| Torna in cima |
|
|
|
venerdì 25-mag-12 15:26
Complessivo: 102998
Persone Online:
Visitatori: 
Iscritti: 164
Totale: 164
FAQ
Cerca
Gruppi utenti
Profilo
Messaggi Privati
Login
