*فورم* : اضافة سجل من فورم بدون مصدر بيانات

لاضافة حقل جديد فى الجدول و تعيين القيم الموجودة فى الفورم اليه

ينم ذلك بضغط الزر بعد كتابة البيانات

فاذا لم تضغط زر الاضافة و أغلقت الفورم ، لم يتم تسجيل أي من البيانات

و لهذا ميزة امكانية التحقق من أي شرط تريده قبل التسجيل و الا فلا يتم التسجيل

مثال علي اضافة السجل عن طريق SQL

http://www14.brinkster.com/mtarafa/forms/U.../UnboundSQL.zip

DoCmd.RunSQL "INSERT INTO Table1 ( Name, Salary, Birthday ) select [Forms]![UnboundForm]![Name] as exp1, [Forms]![UnboundForm]![Salary] as exp2, [Forms]![UnboundForm]![Birthday] as exp3;"

مثال علي اضافة السجل عن طريق DAO

تأكد من و جود مرجع DAO 3.6

و ازالة مرجع Activex 2.1

اذا كان موجودا لتعارضهما

http://www14.brinkster.com/mtarafa/forms/U.../UnboundDAO.zip

Dim mydb As database, mytable As Recordset
Set mydb = CurrentDb
Set mytable = mydb.openrecordset("table1", db_opentable)

mytable.AddNew
      mytable!Name = [Forms]![UnboundForm]![Name]
      mytable!Salary = [Forms]![UnboundForm]![Salary]
      mytable!Birthday = [Forms]![UnboundForm]![Birthday]
mytable.Update

mytable.Close
Set mydb = Nothing