نحوه دسترسی به مقدار یک فیلد خاص در access

[atefe_piriaee]

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

[amp_1356]

سلام
اگر شما آخرین رکورد جدول رو می خواید، از طریق یه کوئری به راحتی می تونید به اون دسترسی داشته باشید. خیلی ساده است

[atefe_piriaee]

مقدار یک فیلدخاص رو از آخرین رکورد می خوام. ببینید مثلا من یه جدول دارم با فیلد های a و b

می خوام آخرین مقدار فیلد a رو بریزم توی یه متغیر و یه سری محاسبات روش انجام بدم و نتیجه محاسبه رو تو فیلد a در رکورد جدید ثبت کنم.
اگرم راه حلش خیلی ساده باشه من متاسفانه بلد نیستم. لطفا راهنمایی کنید .

[amp_1356]

خوب الان فرق کرد. من فکر کردم شما فقط می خواید آخرین رکورد رو ببینید.
اگر نمونه بگذارید شاید بتونم یه کاری انجام بدم.

[atefe_piriaee]

الان یه دیتا بیس اینجا گذاشتم. یه جدول داره و یه فرم . توی فرم مقدار فیلد a از کاربر گرفته می شه و بعد با زدن دکمه add record آخرین مقدار فیلد a باید توی یه متغیر ریخته شه و با مقداری که الان کاربر توی فرم وارد کرده جمع بشه و نتیجه توی جدول ذخیره شه(در رکورد جدید)
امیدوارم توضیحاتم کامل بوده باشه
http://www.uplooder.net/cgi-bin/dl.cgi?key=cc01ed56be8d94f49875a4eb47af7207

[AbbasSediqi]

از تابع max استفاده کن برای id به آخرین رکورد دسترسی پیدا میکنی
MAX(ID)

[2faan2]

از تابع Dlast استفاده کنید .

[atefe_piriaee]

ممنون از همه دوستان . با راهنمایی هاتون و یکم تحقیقات دیگه مشکلم حل شد .
اول یه کوئری ساختم که آخرین رکورد جدول رو برمیگردوند
SELECT Last(a) AS Expr1
FROM Table1;



بعدشم از اون کوئری توی برنامم استفاده کردم
Private Sub Command5_Click()
Dim db As Database
Dim rec As Recordset
Dim fld As Field
Dim i As Integer


Set db = DBEngine.Workspaces(0).Databases(0)
Set rec = db.OpenRecordset("q1")
Set fld = rec.Fields("expr1")


i = Int(fld.Value)
i = i + Int(Forms!f1!a)
Forms!f1!a = i


End Sub

[m.reza.k]

سلام
منم همچین کدی لازممه
خواهشا میشه یک نمونه بزارید