Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 15
  1. #1

    rinomina aggiungendo numero

    ho in una cartella /squadre i file di testo contenenti i giocatori schierati. i file txt si chiamano nome_squadra.txt.
    Siccome ogni domenica questo file viene aggiornato con i nuovi giocatori schierati, chiedo:
    e' possibile rinominare i file, lo eseguirei il lunedi successivo alla giornata disputata, in modo da aggiungerci un "1" dopo il nome squadra in modo da identificare il nome squadra ed associarlo alla giornata?
    quindi : "a.c. skunk.txt" diventerebbe "a.c. skunk1.txt", e cosi per gli altri file.

    grazie.....
    -Nextart.it Graphic Solutions

  2. #2
    Utente bannato
    Registrato dal
    Nov 2002
    Messaggi
    661
    codice:
    for i = 1 to N°cicli
    nomeSquadra="pippo.txt"
    estensione=rigth(nomeSquadra,4)
    NuovoNome=replace(nomeSquadra,estensione,"")& i & estensione
    next

    NuovoNome=replace(nomeSquadra,estensione,"")& i & estensione
    perche' questo non sta tutto su una righa??

  3. #3
    code:-----------------------------------------------------------------
    for i = 1 to N°cicli
    nomeSquadra="pippo.txt"
    estensione=right(nomeSquadra,4)
    NuovoNome=replace(nomeSquadra,estensione
    ,"")& i & estensione
    next
    --------------------------------------------------------------------------------

    ok,grazie ma:
    n° cicli lo sostiutisco con 16 perche' so' che sono 16 i file delle squadre.
    x i nomi delle squadre, facendo come dici tu dovrei scrivermeli tutti e 16.!!??
    io vorrei che me li rinominasse indipendetemente dal nome squadra.
    Nella cartella sono presenti solo quei 16 file.
    quindi penso sia da realizzare un cosa del tipo:
    per ogni file presente nella cartella .txt aggiungi 1 prima di .txt
    E' possibile?
    estensione=right(nomeSquadra,4): significa ?
    -Nextart.it Graphic Solutions

  4. #4
    Utente bannato
    Registrato dal
    Nov 2002
    Messaggi
    661
    codice:
    nomeSquadra="pippo.txt" 'potrebbe essere anche nomeSquadra=tuaVarNome
    'indica il nome completo del file (qualsiasi esso sia)
    for i = 1 to N°cicli 
    'qui prelevo l'estensione (estensione=.txt) 
    estensione=right(nomeSquadra,4)
    'qui cancello l'estensione ed aggiungo il numero progressivo (i)
    'e rimetto l'estensione 
    NuovoNome=replace(nomeSquadra,estensione,"")& i & estensione 
    next
    risultato al 1° ciclo ---> pippo1.txt
    risultato al 2° ciclo ---> pippo2.txt
    risultato al 3° ciclo ---> pippo3.txt
    risultato al 4° ciclo ---> pippo4.txt
    risultato al 5° ciclo ---> pippo5.txt
    risultato al 6° ciclo ---> pippo6.txt
    risultato al 7° ciclo ---> pippo7.txt
    risultato al 8° ciclo ---> pippo8.txt
    risultato al 9° ciclo ---> pippo9.txt
    risultato al 10° ciclo ---> pippo10.txt ecc.

    ovviamente funziona su tutti i file con estensione .txt

  5. #5
    ok, forse sono io un po' gnucco.
    siccome i file txt si chiamano tutti e sedici in maniera diversa, come faccio a farglielo fare in automatico.?
    es:
    ac_trezzano.txt
    ac_skunk.txt
    ac_roma.txt
    solobari.txt

    ecc. diventerà

    ac_trezzano1.txt
    ac_skunk1.txt
    ac_roma1.txt
    solobari1.txt

    forse sono io che mi spiego male..... :master:
    al posto di
    codice:
    nomeSquadra="pippo.txt" 'potrebbe essere anche nomeSquadra=tuaVarNome
    non si puo' dire:
    a tutti i file con estensione .txt aggiungi 1 prima di ".txt"?

    grazie ancora....
    -Nextart.it Graphic Solutions

  6. #6
    Utente bannato
    Registrato dal
    Nov 2002
    Messaggi
    661
    nomeSquadra="pippo.txt" è un nome dato di fantasia

    la variabile nomeSquadra deve essere riempita con i nomi dei file recuperati ad esempio con FSO (FileSystemObject) posizionati in una variabile (nomeSquadra) una volta ottenuto l'elenco dei file presenti in quella cartella e inseriti in variabili lo recuperi e lo rinomini secondo il codice che ti ho dato.

    ricapitolando :

    1) recuperi i nomi dei file con fso
    2) cambi i nomi dei file (non importa se non si chiamamo nello stesso modo, l'importante è che abbiano estensione .txt)
    3) rinomini i file con Fso


    posta il cod che usi per recuperare i nomi

  7. #7
    nomeSquadra="pippo.txt" è un nome dato di fantasia
    lo so.... :maLOL:

    la variabile nomeSquadra deve essere riempita con i nomi dei file recuperati
    io non li devo recuperare e quindi non ho nessun codice da postare.

    i passaggi li ho capiti, ma ti chiedo: non e' possibile fare come dico io senza dover recuperare i nomi dei files?

    -Nextart.it Graphic Solutions

  8. #8
    Utente bannato
    Registrato dal
    Nov 2002
    Messaggi
    661
    se non recuperi i nomi dei file non puoi nemmeno rinominarli perche non conosci i loro nomi, e se li conosci in anticipo comunque per cambiarli il nome li devi recuperare...


    ma ora mi sorge un dubbio :

    intendi rinominarli sul server, giusto (voglio dire fisicamente non sul db)?

  9. #9
    si, si sul server.
    innanzitutto, grazie per la pazienza.....
    boh, si vede che non si puo' fare cio' che dico io.

    sapevo per esempio che puoi visualizzare il nomi dei file contenuti in una cartella. giusto?
    con la stessa "filosofia" non esiste un comando che dica:

    prendi tutti i file che ci sono nella cartella e inserisci il numero 1
    prima di .txt?

    forse e' eresia......

    va beh? proviamoci.

    come recupero' i nomi dei file?
    idea:
    conoscendoli a priori potrei inserirli in un array e poi rinominarli?
    sono nelle tue mani....
    sono tutto orecchi.....
    grazie....
    -Nextart.it Graphic Solutions

  10. #10
    Utente bannato
    Registrato dal
    Nov 2002
    Messaggi
    661
    codice:
    'tratto da codice di OcchioCrepato*******************
    Path="TuaCrtella"
    set fso=Server.CreateObject ("Scripting.FileSystemObject")
    myRoot=Server.MapPath(Path)
    set MyFolder=fso.GetFolder(myRoot)
    set MyFile=MyFolder.Files
    indice=0
    for each elemfile in MyFile
    	NomeFile=elemfile.Name
    	redim preserve ArrayFile(indice)
    	ArrayFile(indice)=NomeFile
    	indice=indice+1
    next
    '***********************************************************
    
    for i = 0 to ubound(ArrayFile)
    estensione=right(ArrayFile(i),4)
    'tutto su una righa da qui*************************************
    fso.MoveFile (Path & "\" &ArrayFile(I), Path&"\"&replace(ArrayFile(I),estensione
    ,"")& i & estensione
    ,true)
    'fino a qui************************************************** 
    next
    prova cosi'

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.