پر نمودن خودکار فیلدهای خالی در یک table با عبارت مثلا empty

[mina.azarm]

سلام
من یک برنامه نوشته ام که به بانک اکسس متصل می شود.
من یک تیبل دارم که در ان 20 فیلد وجود دارد و کلا 500 رکورد دارم.
حالا بعضی از فیلد ها خالی است. یعنی چیزی در آنها نوشته نشده است.

من می خواستم با زدن یک دکمه همه فیلدهای خالی هر ردیف پر شود (البته نه فقط یک فیلد خاص. بلکه هر فیلد که خالی است) و در آنها عبارت مثلا empty نوشته شود.

مرسی

[mafazel]

یکی از راههای نه ابتدایی و نه پیشرفته این است که شما یک ADOQuery بگذارید (و آنرا به ADOConnection وصل کنید) و توی دکمه ی مورد نظر با استفاده از کوئری Update هر بار یک فیلد را برای تمام رکورد ها با کلمه Empty پر کنید.
مثل عبارت زیر


ADOQuery1.SQL.Text := 'Update Table1 set Name="Empty" where (Name="")';
ADOQuery1.ExecSQL;
ADOQuery1.SQL.Text := 'Update Table1 set Family="Empty" where (Family="")';
ADOQuery1.ExecSQL;
ADOQuery1.SQL.Text := 'Update Table1 set Age=0 where (IsNull(Age))';
ADOQuery1.ExecSQL;

دقت کنید که فیلد AutoIncrement را دست نزنید و فیلدهای عددی را هم با کلمه Empty مقدار ندهید.
در آخر هم تیبل! را رفرش! کنید

[hadisalahi2]

با سلام
در صورتی که هنگام تعریف جداول در اکسس مقداری رو در خاصیت Defualt Value یک فیلد قرارد بدهید ، اکسس به صورت اتوماتیک در اون فیلد مقدار پیش فرض رو قرار میدهد.

[bmanfy]

با سلام
علاوه بر گفته های دوستان یک روش دیگه هم هست .
درون رویداد GetText مربوط به فیلدت مقدار Text اون رو متناسب با چیزی که میخوای تکمیل کن.
مثلا :


if sender.asString = '' then
Sender.text := 'empty';

البته اگه دقیق یادم باشه میشه گفت بهمین شکل میشده کدش .
موفق باشی