ykm145
پنج شنبه 27 بهمن 1384, 22:25 عصر
دستورات که با رکوردست برای ایجاد رکورد جدید -حرکت بین رکورد -ایجاد فانکشن نوشتم یا جواب نمیده یا خطای غیر نحوی میده
dim db as database
dim as rs recordset
set db = currentdb
set rs =db.openrecordset("table1
if rs .eof=true then یا if rs.eof then
rs.addnew
else
rs.movenext
endif
حتی بدون شرط if وفقط با rs.addnew نیز این مشکل پابرجاست daoنیز اول databaseو.. اضافه میکنم جواب نمیده
درضمن جدول از نوع قابل ویرایش و حذف واضافه رکورد می باشد وافیس 2003 میباشد
ممنکه بیگید این اشکال ازکجا ناشی میشه ویا اگر مربوط به reference کدام یک را باید اضافه کنم یا تیک مارک ان را بردارم
باتشکر
dim db as database
dim as rs recordset
set db = currentdb
set rs =db.openrecordset("table1
if rs .eof=true then یا if rs.eof then
rs.addnew
else
rs.movenext
endif
حتی بدون شرط if وفقط با rs.addnew نیز این مشکل پابرجاست daoنیز اول databaseو.. اضافه میکنم جواب نمیده
درضمن جدول از نوع قابل ویرایش و حذف واضافه رکورد می باشد وافیس 2003 میباشد
ممنکه بیگید این اشکال ازکجا ناشی میشه ویا اگر مربوط به reference کدام یک را باید اضافه کنم یا تیک مارک ان را بردارم
باتشکر