PDA

View Full Version : سوال: پاک کردن تمام اطلاعات درون جدول بانک



sinavb
پنج شنبه 11 فروردین 1390, 16:06 عصر
سلام دوستان من چطور می تونم تمام اطلاعات درون جدول بانکم رو پاک کنم ؟
با این کد می شه اون رکوردی که انتخاب شده رو پاک کرد Adodc1.Recordset.Delete adAffectCurrent
ولی من می خوام وقتی روی دکمه کلیک کردم تمام اطلاعات داخل جدول مربوطه پاک بشه
یه سوال دیگر با چه کدی مقدار های یک فیلد را جمع کنم ؟
خواهشا راهنمایی بفرمایید :خجالت::قلب:

ali190
پنج شنبه 11 فروردین 1390, 18:10 عصر
سلام
If Adodc1.Recordset.State = 1 Then Adodc1.Recordset.Close

Adodc1.Recordset.Open "delete * FROM Table1"

Adodc1.Refresh
یاعلی

sinavb
پنج شنبه 11 فروردین 1390, 19:16 عصر
ممنونم دوست عزیز از راهنماییتون

toytown
جمعه 12 فروردین 1390, 00:55 صبح
دوست عزیز برای جمع یک فیلد در تو ویبی یک پروژه استاندارد اگزه باز کن و توش یک کامند و یک تکست باکس و یک adodc بذار بعد کدهای زیر رو توی کامند بذار



Dim sum


Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\bank.mdb;"

Adodc1.RecordSource = " select sum (fild1) as s from (Table1)"
Adodc1.Refresh
sum = Adodc1.Recordset.Fields("s")


Text1.Text = sum





اگر دیتا بیسی که کنار برنامه گذاشتی اسمش bank.mdb باشه و فیلدی به نام fild1 داشته باشه مجموع مقادیر اون فیلد تو text1 نشون داده میشه