دسترسی به داده های یک سطر در دیتاشیت

[saraytanha]

با سلام
من یه فرم دارم که به صورت دیتا شیت نمایش داده میشه و فیلد انتخاب رو توی هر سطرش اضافه کردم و میخام با انتخاب یک سطر اطلاعات اون سطر رو به جدول دیگه ارسال کنم
در واقع مشکل دسترسی به اطلاعات سطر انتخاب شده است
چطور می تونم با کد vb با انتخاب یک سطر به اطلاعات اون سطر دسترسی پیدا کنم

[mohammadsaleh]

سلام
باید در رویداد کلیک فیلدی مثل id یه چیزی شبیه کدهای زیر رو اضافه کنی
سمت چپ علامت = نام فیلدهای جدول شما و سمت راست نام کنترلهای روی فرم شماست

Dim db As Database
Set db = CurrentDb
Dim rst As Recordset
Dim sql As String
sql = "select * from telefone WHERE id=" & Me.Tid & ""
Set rst = db.OpenRecordset(sql, dbOpenDynaset)
With rst
.Add
!dat = Tarikh
!name = Me.Tname
!job = Me.Tsemat
!organe = Me.Torgan
.Update
.Close
End With

سایت عالی برای یادگیری:
https://www.w3schools.com

[saraytanha]

سلام
باید در رویداد کلیک فیلدی مثل id یه چیزی شبیه کدهای زیر رو اضافه کنی
سمت چپ علامت = نام فیلدهای جدول شما و سمت راست نام کنترلهای روی فرم شماست

Dim db As Database
Set db = CurrentDb
Dim rst As Recordset
Dim sql As String
sql = "select * from telefone WHERE id=" & Me.Tid & ""
Set rst = db.OpenRecordset(sql, dbOpenDynaset)
With rst
.Add
!dat = Tarikh
!name = Me.Tname
!job = Me.Tsemat
!organe = Me.Torgan
.Update
.Close
End With

سایت عالی برای یادگیری:
https://www.w3schools.com

فک می کنم درست متوجه منظورم نشدید
من حتی نمی دونم به ایدی انتخاب شده چطور دسترسی داشته باشم .. روال جستجو با یک ایدی مشخص رو می دونم .. نکته هم ندونستن ایدی انتخاب شده است

[نوشیروانی]

فک می کنم درست متوجه منظورم نشدید
من حتی نمی دونم به ایدی انتخاب شده چطور دسترسی داشته باشم .. روال جستجو با یک ایدی مشخص رو می دونم .. نکته هم ندونستن ایدی انتخاب شده است

سلام
اگه درست متوجه شده باشم شما می خواهید با کلیک روی هرسطر به فرم دیگری وصل شوید
من یه مثال ساده ساختم ببنید بکارتان میآد

[saraytanha]

سلام
اگه درست متوجه شده باشم شما می خواهید با کلیک روی هرسطر به فرم دیگری وصل شوید
من یه مثال ساده ساختم ببنید بکارتان میآد

ممنونم ازت دوست گرامی من با کد vb نوشتم و مشکلم با نمونه ماکرو قسمت شرط ات حل شد