>thank you for reply
>i use this code as add button
>

>	
>cAlias = Thisform.DataEnvironment.InitialSelectedAlias
>	Select (cAlias)
>*GO bottom
>*APPEND BLANK
>Thisform.Refresh() 
>thisform.command4.Caption ="Save"
>thisform.SetAll("Enabled", .T., "TextBox")
>thisform.SetAll("Value", "", "TextBox")
>
>this.enabled = .f. 
>thisform.text1.SetFocus() 
>
>

>
>where i can add this code to previous message
>

>IF MESSAGEBOX("Are you Sure") = 6 && or whatever the return code is, check the help
>   APPEND BLANK
>ENDIF

>
>
>

I guess you want it like this:

cAlias = Thisform.DataEnvironment.InitialSelectedAlias
Select (cAlias)

IF MESSAGEBOX("Are you Sure") = 6 && or whatever the return code is, check the help
   APPEND BLANK
   Thisform.Refresh() 
   thisform.command4.Caption ="Save"
   thisform.SetAll("Enabled", .T., "TextBox")
   thisform.SetAll("Value", "", "TextBox")

   this.enabled = .f. 
   thisform.text1.SetFocus() 
ENDIF

But why didn't you post this code first?