<Script Language=vbscript>
Sub btnsubmit1_Onclick()
'แสดงการยืนยันการทำงานของปุ่ม Submit
IngRC = MsgBox("คำยืนยันการทำงาน" & vbCRLF, vbOKCANCEL, "ยืนยันการทำงานด้วย")
if IngRC = vbOK then
call form1.submit
end if
end sub
</Script>
เวลาคลิกปุ่ม Submit จะปรากฎ Message Box ขึ้นมาให้ ถ้าตอบ OK โปรแกรมไปทำงานโปรแกรมตัวต่อไปได้ ถ้าตอบ Cancel ก็ทำงานเหมือนกับตอบ OK
ผมต้องการ ถ้าตอบ Cancel ให้โปรแกรมอยู่ที่หน้าเดิม ผมลองทำทุกอย่างแล้วมันก็ยังไม่ได้
Tag : - - - -
Date :
13 ก.ย. 2549 15:12:48
By :
สรวิศ
View :
1794
Reply :
1
No. 1
Guest
OK ได้แล้วครับ มีเพื่อนๆ แนะนำมาให้แล้วทาง e-mail
ขอขอบคุณมากครับ
สรวิศ