Warning message when updating info in DAP

[Techniproshop]

I'd like to add a warning message to my DAP (SAVE/DISCARD) and ask the user if he wants to save the changes he made or discard. There is already an automatic message, can I custom it?

Thanks.

 

[ProgramError]

on the before update event use..
try
dim result as boolean
result = msgbox "Do you wish to Save changes?",vbyesno
if result = vbyes then
'save the changes
else
' discard the changes ie undo
endif

hope this helps

Ian Mayor (UK)
Program Error
Programming is 1% coding, 50% error checking and 49% sweat as your application bombs out in front of the client.

 

[fneily]

The following has just what you need:
Examples of Using Data Access Page Events to Add Custom Functionality

http://msdn2.microsoft.com/en-us/library/aa139978(office.10).aspx

 

[Techniproshop]

I don't want to warn the user for each field he will change. I just want to confirm before the record is saved or the user go to another record. So where do I put the code for the entire record, i.e. not just for a control? under MSODSC in the script? There is no beforeupdate options there.

 

[fneily]

The beforeupdate event of the MSODSC property was added in the XP web components. Do have version 2000? Then it will not be available.

 

[Techniproshop]

Isn't there other options with 2000?

 

[fneily]

Create a command button on your DAP WITHOUT using the Wizard. If the Wizard appears, CLOSE IT IMMEDIATELY. Then on the onclick event, you can put something like the following; NOTE: If they decide not to save the record, blank out the updated fields, ESPECIALLY the primary key.

<SCRIPT language=vbscript event=onclick for=SaveConfirm>
<!--
Dim answer
answer = MsgBox ("Are you sure you want to Save the record?", vbYesNo, "Save Record?")
If answer = vbYes Then
MSODSC.DataPages(0).Save
Else
EmployeeID.value = ""
End If
-->
</SCRIPT>