سلام ، فکر کنید یه دیتا گرید داریم که چند تا ستون داره
حالا یکی از این ستون ها که توی اون شماره تلفنه رو چطوری میشه به یه لیست باکس انتقال داد ؟
Printable View
سلام ، فکر کنید یه دیتا گرید داریم که چند تا ستون داره
حالا یکی از این ستون ها که توی اون شماره تلفنه رو چطوری میشه به یه لیست باکس انتقال داد ؟
کسی تا حلال اینکارو انجام نداده ؟ کسی نمبتونه کمک کنه ؟
سلام
دو راه داری:
1- استفاده از DBList
2- با یه حلقه:
For i=0 to data1.recordset.recordsource
list1.additem data1.recordset.fields(2)
next
با این کد اطلاعات فیلد سوم به لیست باکس اضافه میشن.
نقل قول:
نوشته شده توسط محسن 15
آقا این روش شما که کار نمیکنه !!!!!!!!!!!!!!
بذارید واضح تر توضیح بدم ، من یه دیتا گرید دارم که به دیتا بیسم وصله
حالا یه قسمت سرچ براش گذاشتم ، ما میایم مثلا اسم علی رو سرچ میکنیم ، دیتا گرید تمام اسم هایی که علی هستش رو نشون میده و توی یه ستون دیگه شماره های تماسشون رو میاره
حالا من میخوام تمام این شماره ها رو وارد یه لیست باکس کنم !!!
ببخشید یه اشتباه کوچولو داشتم، چون سریع نوشتم، بفرما:
For i=0 to data1.recordset.recordCount-1
list1.additem data1.recordset.fields(2)
next
خب این کد هم همین کار رو میکنه، شما میای جستجو رو با recordsource محدود میکنی، بعد با این کد میای اطلاعات یه فیلد خاص رو توی لیست باکس اضافه میکنی. اگه از DbList استفاده کنی نازی به کدنویسی نداری.
آقا منظورت از data1 همون DataGrid هست دیگه ؟نقل قول:
نوشته شده توسط محسن 15
شما اصلا منظور منو متوجه نشدید !!! من از data grid و Adodc استفاده میکنم
نخیرنقل قول:
آقا منظورت از data1 همون DataGrid هست دیگه ؟
خب عزیز من فرقی نداره که کافیه Data1 رو به Adodc1 تغییر بدی. من برای مثال از کنترل دیتا استفاده کردم.
شما اصلا برای دیتاگرید نیاز نیست کدی بنویسید. با این کد مستقیما با کنترل دیتا کار میکنی.
بله درسته اما کد یه مشکلی داره اونم اینه که فقط میاد یه فیلدو وارد لیست باکس میکنه !!!!
عکس ضمیمه کردم ، همه شماره ها مثله هم هستن
ضمیمه 94745
بله مشکل از من بود، چون کد رو عجله ای مینویسم.
شما باید خودتون بدونید دیگه:لبخندساده: بعد از خوندن هر رکورد باید رکورد رو به بعدی منتقل کنیم. یعنی بعد از اضافه کردن به لیست کد زیر رو بنویس، قبل از Next
Adodc1.Recordset.MoveNext
سلام دوستان کسی میدونه چطوری در یک دیتا گرید یک لیست بیاوریم ینی ستون اول دیتا گرید ویو وقتی اینتر کردم لیست باز شه
دوست عزیز
p=text1.text
For i=0 to data1.recordset.recordCount-1
text1.text=i
list1.additem p
next i
از این روش استفاده کن اول فیلد رو وارد تکست می کنه بعد به لیست اضافه می کنه