ورود

View Full Version : دستور Adodc1.Recordset.Update



ali reza mansoori 2
سه شنبه 25 اسفند 1388, 12:26 عصر
وقتی با بانک اطلاعاتی اکسس که جدول های اون با هم در ارتباط هستن از دستور Adodc1.Recordset.Update استفاده می کنم با اخطار مواجه می شم
می تونید برای استفاده از این دستور منو راهنمایی کنید

look20
سه شنبه 25 اسفند 1388, 13:03 عصر
وقتی با بانک اطلاعاتی اکسس که جدول های اون با هم در ارتباط هستن از دستور Adodc1.Recordset.Update استفاده می کنم با اخطار مواجه می شم
می تونید برای استفاده از این دستور منو راهنمایی کنید
با سلام لطفا فایلتون رو بزارید تا مشخص بشه مشکلتون کجاست

هوشیاری
سه شنبه 25 اسفند 1388, 14:02 عصر
با سلام
شما ارتباط رو دستی انجام دایدین یا با کد
فکر کنم چون ارتباط درست برقرار نشده این مشکل پیش میاد

ali reza mansoori 2
سه شنبه 25 اسفند 1388, 17:30 عصر
با سلام لطفا فایلتون رو بزارید تا مشخص بشه مشکلتون کجاست
مشکل از فایل نیست
فایل من یک بانک اطلاعاتی اکسس است که جدول های اونو وقتی با هم مرتبط می کنم با مشکل مواجه می شم

look20
سه شنبه 25 اسفند 1388, 17:54 عصر
مشکل از فایل نیست
فایل من یک بانک اطلاعاتی اکسس است که جدول های اونو وقتی با هم مرتبط می کنم با مشکل مواجه می شم
من که گفتم فایلرو بزارید تا دوستان این کار رو براتون انجام بدن چون معلوم نیست مشکل کجاست

اوبالیت به بو
شنبه 29 اسفند 1388, 05:23 صبح
وقتی با بانک اطلاعاتی اکسس که جدول های اون با هم در ارتباط هستن از دستور Adodc1.Recordset.Update استفاده می کنم با اخطار مواجه می شم
می تونید برای استفاده از این دستور منو راهنمایی کنید
تویه کار با ADODC متد Update در 2 حالت استفاده میشه:
1- درج رکورد
2- ویرایش رکورد

اگر بخواید یه رکورد رو درج کنید:


ADODC1.RecordSet.AddNew
Adodc1.RecordSet.Field["FieldName"] = Value
Adodc1.RecordSet.Field["FieldName"] = Value
Adodc1.Recordset.Update

بعد یه کد SelectAll می نویسین:


Adodc1.RecordSource = "Select ....."
Adodc1k.Refresh

برای ویرایش کردن ابتدا باید جستجو کنید تا Cursor برنامه روی اون رکورد قرار بگیره. وقتی کرسر اونجا قرار گرفت همون دستورات بالا رو می نویسید فقط خط Adodc1.RecordSet.AddNew رو حذف می کنی، سیستم خودش عمل ویرایش رو انجام می ده:


Adodc1.RecordSource = " Select * From Table Where ID='" & Input Value & "'"
Adodc.RecordSet.Field["Field"] = Value
Adodc.RecordSet.Field["Field"] = Value
Adodc1.RecordSet.Update


دوباره همون متد Select All رو صدا می زنید.