Visualizzazione dei risultati da 1 a 5 su 5
  1. #1

    file batch ... un consiglio

    Ciao a tutti,

    io dovrei creare un file .bat che:

    editi cancellando i primi 10 caratteri un file di testo.

    ho provato a cercare nel web come fare ma non ho trovato risposta;

    io inizierei con un

    edit file.txt

    e poi? posso far sì che venga "premuto 10 volte il tasto canc" e venga salvato il file?

    grazie per il tempo dedicatomi
    RiKkArDo on IRCnet

  2. #2
    Il regolamento (e lo Zio Sam) dicono niente post tecnici in "Off Topic".
    Devi postare queste richieste in "software".


    (hai ucciso un muflone)
    Un bacio può cambiarti la vita. Non sempre in meglio.
    Bloggami tutto

  3. #3
    Moderatore di Windows e software L'avatar di darkkik
    Registrato dal
    Dec 2003
    residenza
    Pavia - Milano - Lodi.
    Messaggi
    11,476
    Originariamente inviato da Zero G
    Il regolamento (e lo Zio Sam) dicono niente post tecnici in "Off Topic".
    Devi postare queste richieste in "software".


    (hai ucciso un muflone)
    Ehmm...zero...è su software
    I can see much clearer now, I'm blind.
    Io fui già quel che voi siete, Quel ch'io son voi anco sarete.
    Remember that death is not the end, but only a transition
    All that we learn this time is carried beyond this life.

  4. #4
    ma non siamo già in software?
    RiKkArDo on IRCnet

  5. #5
    Utente di HTML.it L'avatar di fabio309
    Registrato dal
    Oct 2002
    Messaggi
    1,918
    per tornare al problema originale, farlo con un file batch non ne sono capace, con un file script devi fare una cosa tipo (l'ho copiata dall'help di access) adattandolo alle tue esigenze
    codice:
    Const ForReading = 1, ForWriting = 2, ForAppending = 3
    Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
    Dim fs, fs2, f, ts, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    fs.CreateTextFile "test1.txt"
    Set f = fs.GetFile("test1.txt")
    Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault)
    Set fs2 = CreateObject("Scripting.FileSystemObject")
    Set a = fs2.OpenTextFile("c:\test.txt", ForReading, False)
    for i=1 to 10
        retstring = a.ReadLine
    next i
    Do While a.AtEndOfStream <> True
        ts.Write 
    Loop
    a.Close
    ts.close
    fs.movefile("c:\text.txt", "c:\text1.txt")
    salvarlo come .vbs ed eseguirlo con un doppio click

    p.s. l'ho copiato incollato e modificato in 2 minuti occhio agli errori

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.