Newsgroup: it.comp.lang.visual-basic
Titolo: avertire un utente che sta salvando sul un file esistente

ho creato un programma compatibile con diversi formato di testo nella quale
devo inserire una modalita di avvertimento che l'utente finale sta per
salvare su un file esistente e inserire un messaggio personalizato ( non di
Windows ) Ad esempio
il file Pinco.doc esiste gia sei sicuro di riscriverlo?.
o il seguente codice ( dove devo inserire questo tipo di modalita
grazie in anticipo per l'aiuto
PS: chiedo scusa se non avete capito questo messaggio
o provato con i codici
cdlOFNOverwritePrompt
if Dir$(nome_file_con_path) <> "" then ' il file gia esistente sei sicuro di
volerlo riscrivere?
ma alcune volte mi danno erore o non sucede nulla
vi ringrazio in antcipo per il vostro aiuto
i codice e segente
Private Sub mnuSaveAs_Click()
  On Error GoTo SaveCancelled
MDIForm1.CommonDialog1.Filter = "File edit document text(*.edt)|*edt| File
RTF (*.rtf)|*.rtf|File word (*.doc)|*.doc|Tutti i file (*.*)|*.* (" dipi di
formato disponibili")
  CommonDialog1.ShowSave
  If CommonDialog1.FileName = "" Then Exit Sub
  Open CommonDialog1.FileName For Output As #1
  Print #1, ChildForms(frm).text1.TextRTF ("come deve essere salvato il
file")
  Close #1
  If NeedSaved(frm) = True Then
    NeedSaved(frm) = False
    ChildForms(frm).Caption = Right$(ChildForms(frm).Caption,
Len(ChildForms(frm).Caption) - 1)
  End If
  ChildForms(frm).Caption = CommonDialog1.FileTitle
  file(frm) = CommonDialog1.FileTitle
  PFile(frm) = CommonDialog1.FileName
    On Error GoTo 0
SaveCancelled:
End Sub
i comenti sono segnalati con ("") per farvi capire la procedura
vi ringrazio in anticipo

 volerlo riscrivere?
Azz... ma e' lo stesso post di qualche giorno fa! Delinquente che fai
riposti e non leggi le risposte ?
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/

 riposti e non leggi le risposte ?
In effetti io non vedo risposte al post del 13.
Ciao

 In effetti io non vedo risposte al post del 13.
ok rettifico allora :p
Azz... ma e' lo stesso post di qualche giorno fa! Delinquente che fai
riposti ?
():-]

 riposti ?
Questo è legittimo: sta scritto nel manifesto che se dopo un paio di 
giorni nessuno risponde è possibile ripostare.
Ciao

 vi ringrazio in antcipo per il vostro aiuto
Togli il flag di controllo e cerca Dir(CD.FileTitle), e non CD.FileName.
Se <> "" allora il file esiste
Ciao


 giorni nessuno risponde è possibile ripostare.
in quale ? in quello depositato al GCN o al "nostro" ? Cmq non mi piace come
idea, io dopo 2gg aggiungerei un reply al mio 3ad ! ^_^;;
Un Gigio Arrampicatore di specchi !

 idea, io dopo 2gg aggiungerei un reply al mio 3ad ! ^_^;;
Fai come quelle trasmissioni dove si mandano le lettere da soli? :)
Il tuo post dopo 2 giorni stà su di 10 pagine... e chi lo legge più?
Ciao
--
Math Parser : 
http://www.neodatatype.net
Sito Comune : 
http://www.it-lang-vb.net

 Il tuo post dopo 2 giorni stà su di 10 pagine... e chi lo legge più?
Bhe io fin'ora ho visto solo il papero-sochista che aveva la visualizzazione
del Ng su "visualizza tutti" (oppure aveva solo qualche centinaia di post
arretrati , io so drastico :
0) Visualizza solo messaggi non letti
1) visualizzazione raggruppata e collassata
2) Sego i topic che non mi interessano
3) cancello i topic che ho letto in ufficio o casa
4) Espandi tutto
5) leggo il Ng ^_^
quindi se riposto il mio topic e' tra quella 50ina di non letti !
Se altri se lo perdono ... bhe sono fortunati cosi non mi si "sugano" ^_^
