PDA

View Full Version : اخرین قیمت



bdf2121
شنبه 04 شهریور 1391, 15:35 عصر
یه تیبل دارم که مشخصات کتاب توشه از جمله
شابک(کلید)
نام
نویسنده و غیره
یه تیبل هم دارم
که قیمتها رو توش میزارم
شامل
کد قیمت(کلید)
شابک(کلید خارجی)
قیمت
تاریخ
میخوام یه کوئری بنویسم که اخرین قیمت(اخرین تاریخ)رو بهم بده و در یک دیتا گرید نشون بده
ممنون میشم برام بنویسید

bdf2121
شنبه 04 شهریور 1391, 17:31 عصر
یکی کمک کنه خیلی واجبه

mohammadriano
شنبه 04 شهریور 1391, 19:15 عصر
سلام
نیازی به کوئری نیست

dataname.recordset.movelast
label1.caption= dataname.recordset.fields("price").value
dataname.refresh

mohammadriano
شنبه 04 شهریور 1391, 19:29 عصر
این هم با کوئری

dim i as long
Dataname.Recordset.MoveLast
i = Dataname.Recordset.fields("ID").value
dataname.refresh


Dataname.RecordSource = "select price From TableName where ID = '" + i + "'"
Dataname.Refresh