Visualizzazione dei risultati da 1 a 5 su 5
  1. #1
    Utente di HTML.it
    Registrato dal
    Oct 2002
    Messaggi
    234

    VB) Comando taglia per i file

    Io uso il comando Name per spostare file, c'è un modo di far sovrascrivere un file già esistente??? perchè quando un file è già esistente mi dà errore.

  2. #2
    in 2 modi:

    1)gestendo l'errore provocato

    2)controllando prima se il file esiste già!!

    il mio esempio si riferisce alla prima soluzione
    codice:
    Private Sub Command2_Click()
        On Error GoTo cancella_file
        Name "c:\documenti\prova.txt" As "c:\documenti\prova\prova.txt"
    cancella_file:
        GoTo file_trovato
        Kill "c:\documenti\prova\prova.txt"
        Name "c:\documenti\prova.txt" As "c:\documenti\prova\prova.txt"
    file_trovato:
    End Sub
    ...Terrible warlords, good warlords, and an english song

  3. #3
    ops ho scritto male!!!

    RICOPIA QUESTO SOTTO
    codice:
    Private Sub Command2_Click()
        On Error GoTo cancella_file
        Name "c:\documenti\prova.txt" As "c:\documenti\prova\prova.txt"
        GoTo file_trovato
    cancella_file:
        Kill "c:\documenti\prova\prova.txt"
        Name "c:\documenti\prova.txt" As "c:\documenti\prova\prova.txt"
    file_trovato:
    End Sub
    ...Terrible warlords, good warlords, and an english song

  4. #4
    Utente di HTML.it
    Registrato dal
    Oct 2002
    Messaggi
    234
    ascolta il codice per evitare l'errore non funziona, cmq prova a correggermi questo:

    Dim nomefile As String
    Dim filebmp As String
    Dim filenameSenzafsh As String
    Dim lenfilename As Integer
    Dim traccia As String

    NOMEDIR = File1.Path
    filenameSenzafsh = File1.List(File1.ListIndex)
    lenfilename = InStr(1, filenameSenzafsh, ".fsh")
    filenameSenzafsh = Left(filenameSenzafsh, lenfilename - 1)
    'filebmp = File1.Path & filenameSenzafsh & "\" & filenameSenzafsh & ".bmp"
    filebmp = File1.Path & "\" & filenameSenzafsh & "\" & "0000" & ".bmp"
    NOMEDIR = File1.Path & "\" & filenameSenzafsh

    Kill filebmp / " 0000.bmp"

    Vedi l'ultimo comando Kill? quello non funziona perchè scrivo male correggi?

  5. #5
    Più io continuo ad aiutarti (a passarti il codice)
    Più tu continui a non capire!!!

    Se continuiamo così, non imparerai mai a programmare in VB

    controlla bene il codice!!!

    Kill filebmp / " 0000.bmp"

    Kill filebmp & "\0000.bmp" '<--questo è esatto!!!

    P.S. devi notare che per concatenare 2 stringhe

    ......e filebmp e "0000.bmp" lo sono!!!

    devi utilizzare il carattere speciale &

    Studia VB, e non pensare solo ad assemblare

    qualcosa che non riesci a leggere, altrimenti scusa

    ma che soddisfazione trai da un programma (graficamente anche carino)

    ma che ti stiamo scrivendo "a pezzi" noi del forum!!!

    P.S. è un consiglio che ti do da amico
    ...Terrible warlords, good warlords, and an english song

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.