Saving a Text File

[dmyhand]

Actually use this code instead:

Private Sub Command1_Click()
cd1.ShowSave
On Error Resume Next
Open cd1.FileName For Output As #1
 Print #1, Text1.Text
Close #1
End Sub

So if cancel is pushed, then there isn't an error.

THANK YOU! This worked great. Is there a way I can set a default file format for the app to save to, since my wife is not technically-minded enough to remember? Also, for the "Open," and "Print" commands, Do I need an separate Common Dialog for each one? Thanks, again, Dennis