Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it
    Registrato dal
    Feb 2003
    Messaggi
    104

    [vb 6] Salvare in word senza chiedere conferma se il file esiste

    E' possibile salvare un documento word con nome, e se il documento esiste sostituirlo in automatico senza far comparire il messaggio "il file bla.doc esiste già ecc ecc"??

  2. #2
    Basta eliminare il file che abbia lo stesso nome e salvare quello che hai appena creato.
    Per eliminare il file, devi assicurati che esiste. Questo controllo lo fasi attraverso il seguene comando

    Set fso=CreateObject("Scripting.FileSystemObject")
    if fso.FileExists(path e nome file)=true then
    kill(path e nome file
    Salvi il file
    else
    Salvi il file
    end if

    Spero di esserti stato chiaro.Ciao

  3. #3
    Utente di HTML.it L'avatar di gibra
    Registrato dal
    Apr 2008
    residenza
    Italy
    Messaggi
    4,244
    Basta guardare sulla guida VBA di Word

    Il metodo Save prevede 2 parametri, ti riporto la sintassi:

    espressione.Save(NoPrompt, OriginalFormat)


    NoPrompt Facoltativo, Valore Variant,
    -True per salvare automaticamente tutti i documenti.
    -False per richiedere all'utente di salvare i documenti modificati dopo l'ultimo salvataggio.

    OriginalFormat Facoltativo, Valore Variant
    Specifica la modalità di salvataggio dei documenti. Può essere una delle costanti WdOriginalFormat.


  4. #4
    Utente di HTML.it
    Registrato dal
    Feb 2003
    Messaggi
    104
    grazie delle risposte
    Il metodo della cencellazione lo avevo pensato, tuttavia ho visto che con PROGRESS (e non so se dipende dal linguaggio o da fortuite casualità) , lanciando i comandi dal mio programma non mi spunta il "popup" di conferma sostituzione file.

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.