+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 16

Creare file di testo

  1. #1
    Eurofolle non  in linea Scolaretto
    salve ancora, rieccomi!
    vorrei avere informazioni sulla creazione di un file txt con visual basic.
    Ho provato con fso ( leggendo su tutti i libri che ho), ma il codice che ho mi crea il file, ma quando vado a salvare il file (anche manualmente, quindi il problema non nella programmazione del salvataggio!) non me lo permette (mi da errore 75!).... ho controllato gli attributi del file, ed archivio.

    mi potete spiegare l'errore, o eventuali altre soluzioni?

    Dim fso 
    Dim fFile 
    dim stringa$
    
    Private Sub Command1_Click()
    
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set fFile = fso.CreateTextFile("C:\prova.txt", True)
    
    stringa$ = "riga di prova"
    
    Open "C:\prova.txt" For Binary As #1
    Put #1, , stringa$
    Close #1
    
    end sub
    

  2. #2
    L'avatar di Ste
    Ste
    Ste non  in linea Scolaretto
    Prova con questo

    Dim temp As String
    
    temp = "Ciao!"
    
    Open "C:\FileDiProva.txt" For Output As #1
    Print #1, temp
    Close #1
    
    ℹ️ Leggi di pi su Ste ...

  3. #3
    Non usare FSO *e* la Open ...

    O usi un metodo, o usi l'altro ...

    Per un normale file di testo, fai come ti ha detto Ste.
    ℹ️ Leggi di pi su AntonioG ...

  4. #4
    L'avatar di  rocky
     rocky non  in linea Scolaretto
    Quote Originariamente inviato da Eurofolle
    salve ancora, rieccomi!
    vorrei avere informazioni sulla creazione di un file txt con visual basic.
    Ho provato con fso ( leggendo su tutti i libri che ho), ma il codice che ho mi crea il file, ma quando vado a salvare il file (anche manualmente, quindi il problema non nella programmazione del salvataggio!) non me lo permette (mi da errore 75!).... ho controllato gli attributi del file, ed archivio.

    mi potete spiegare l'errore, o eventuali altre soluzioni?
    Non meglio aggiungere anche FileLibero = FreeFile ?

    Dim temp As String
    temp = "Ciao!"
    
    FF = FreeFile
        Open "C:\Prova.txt" For Output As #FF
           Print #FF, temp
        Close #FF
    
    Se non si sicuri che un numero di File risulti libero.

    ℹ️ Leggi di pi su rocky ...

  5. #5
    Eurofolle non  in linea Scolaretto

    Funziona, ma vorrei sapere perch applicato al mio programmino crea un file con una riga vuota in fondo...
    prima della modifica funzionava tutto bene, ma dovevo creare il file txt a mano...

  6. #6
    L'avatar di Louis
    Louis non  in linea Scribacchino
    Ciao, prova con Write e con l'uso di una variabile che pu tornarti utile anche dopo :
    Dim sProva1 As String
    Private Sub Command2_Click()
       
        Dim FileName As String
        Dim FileNum As Integer
        
    ' Acquisisce il testo da un Text1.Text:
        sProva1 = Text1.Text
        
    ' Percorso e Nome del File:
        FileName = App.Path & "\TuoNomeFile.txt"
        FileNum = FreeFile()
        
        Open FileName For Output As #FileNum
             Write #FileNum, sProva1;
        Close #FileNum
    End Sub
    
    Ultima modifica di Louis; 01-06-2006 13:26 
    ℹ️ Leggi di pi su Louis ...

  7. #7
    Quote Originariamente inviato da Eurofolle

    Funziona, ma vorrei sapere perch applicato al mio programmino crea un file con una riga vuota in fondo...
    prima della modifica funzionava tutto bene, ma dovevo creare il file txt a mano...
    Non possiamo saperlo se non vediamo il tuo codice ...
    ℹ️ Leggi di pi su AntonioG ...

  8. #8
    Eurofolle non  in linea Scolaretto
    Questo il codice che funzionava, ma non creava il file...

    dim file$
    dim file1$
    dim r$
    dim righe$
    dim s$
    
    private sub cmdCancella_Click(Index As Integer)
    
    file$="c:\prova.txt"
    file1$="c:\prova1.txt"
    
    R$ = text1.text
    
    Open FILE$ For Binary As #1
      Righe$ = Space(LOF(1))
      Get #1, , Righe$
    Close #1
    
    S$ = Replace(Righe$, r$, "")
    
    Open file1$ For Binary As #2
       Put #2, ,s$
    Close #2
    
    Kill "C:\prova.txt"
    Name "C:\prova1.txt" As "C:\prova.txt"
    Kill "c:\prova1.txt"
    
    end sub
    
    cos funzionava, ma dovevo creare a mano il file prova1.txt

    Modificato come suggeritomi da Ste, mi crea una riga vuota nel file che mi da fastidio... ed in pi non mi cancella il file prova1.txt...
    suggerimenti?

  9. #9
    Scusa ... torniamo un attimo indietro ...

    Dato che non l'hai mai fatto, ci indichi quale e' lo scopo del tuo programma?

    Perche' se non dici cosa vuoi ottenere alla fine, e' impossibile dari una mano ...

    Ti renderai conto che dire "vorrei avere informazioni sulla creazione di un file txt con visual" non e' affatto indicativo ...
    ℹ️ Leggi di pi su AntonioG ...

  10. #10
    Eurofolle non  in linea Scolaretto
    Sono nuova del visual basic, anche se so programmare in basic....solo che sono diversi purtroppo!!
    Per imparare mi sto creando un piccolo database, non troppo complicato ( ), come rubrica personale... tramite questa parte di programma elimino una stringa dal file originale... siccome quando la toglievo direttamente dal file mi lasciava l'ultima stringa del file, alla fine avevo molte copie dell'ultima riga.
    Alla riapertura della listbox che uso per la visualizzazione dei dati, la listbox veniva riaperta con molte copie dell'ultima riga, ho girato, forse in modo non molto ortodosso, intorno al problema creandomi un file temporaneo in cui metto i dati senza la stringa che devo togliere, e risalvo tutto nel file originale... ora pi chiaro o serve qualche altro approfondimento?

+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo

Potrebbero interessarti anche ...

  1. Risposte: 1
    Ultimo Post: 04-03-2013, 12:03
  2. Risposte: 1
    Ultimo Post: 15-03-2012, 14:16
  3. Creare un Excel da un file di testo
    Da ile987 nel forum Python
    Risposte: 0
    Ultimo Post: 17-07-2007, 07:36
  4. Salvare testo-creare tipi di file
    Da marco86 nel forum Visual Basic 6
    Risposte: 11
    Ultimo Post: 12-11-2005, 22:31
  5. Creare file di testo per stringhe dati
    Da Mokor nel forum Visual Basic 6
    Risposte: 4
    Ultimo Post: 01-10-2003, 16:35