PDA

View Full Version : انتخاب رکورد متناظر لیس باکس در فرم اصلی در حالتی که لیس باکس درون فرم اصلی نیست



abdoreza57
جمعه 18 اسفند 1391, 14:13 عصر
سلام


من برای جستجوی اطلاعات افراد یک فرم طراحی کرده ام که نتیجه را تو لیستی بهم میده حالا اگه بخوام این مورد انتخاب شده را تو فرم اصلی ویرایش کنم چه کدی لازم هست ؟

البته در حالتی که لیست تو همون فرم باشه مشکلی نداره ولی به دلایلی نمیشد اینکار را بکنم بنابر این فرم جستجو مجزا از فرم اصلی شده و میخوام نتیجه کار را با انتخاب رکورد تو فرم اصلی هم Go to Record بشه ...

خدا نگهدار

alirezabahrami
جمعه 18 اسفند 1391, 15:47 عصر
سلام


من برای جستجوی اطلاعات افراد یک فرم طراحی کرده ام که نتیجه را تو لیستی بهم میده حالا اگه بخوام این مورد انتخاب شده را تو فرم اصلی ویرایش کنم چه کدی لازم هست ؟

البته در حالتی که لیست تو همون فرم باشه مشکلی نداره ولی به دلایلی نمیشد اینکار را بکنم بنابر این فرم جستجو مجزا از فرم اصلی شده و میخوام نتیجه کار را با انتخاب رکورد تو فرم اصلی هم Go to Record بشه ...

خدا نگهدار
سلام
در رویداد List0_BeforeUpdate کد زیر را وارد کن و نتیجه را ببین !



Dim rs As Object
Set rs = Forms![Nemo].Recordset.Clone
rs.FindFirst "[num] = " & Str(Nz(Me![List0], 0))
If Not rs.EOF Then Forms![Nemo].Bookmark = rs.Bookmark

موفق باشید