Originariamente inviato da totti240282
Private Sub Command1_Click()
CommonDialog1.ShowOpen
If CommonDialog1.filename <> vbNullString Then
MsgBox CommonDialog1.filename
Else
MsgBox "Operazione annullata", vbOKOnly + vbCritical, "Annullato!"
End If
End Sub


allora facendo cosi praticamente se la commondialog1.filename contiene qualcosa allora visualizza il suo contenuto se no apri un box di errore giusto??????il problema allora rimane solo quello di riazzerare nel caso di errore la commondialog1 ma come si fa ????????


grazie a tutti ciao
basta aggiungere file="" nell'else!!!!
codice:
Private Sub Command1_Click() 
     CommonDialog1.ShowOpen 
     If CommonDialog1.filename <> vbNullString Then 
         MsgBox CommonDialog1.filename 
     Else 
         File=""
         MsgBox "Operazione annullata", vbOKOnly + vbCritical, "Annullato!" 
     End If 
End Sub
P.S. La prox volta posta direttamente nel Forum di VB!!! Molte persone non lo guardano neanche, quindi gli aiuti diventano davvero pochi!!!