مشکل با دیتابیس

[cloner01001 38]

دوستان یه دیتابیس دارم با 2300 تا آیتم ، ولی وقتی دیتابیس رو تولیس ویو رو لود میکنم ارور میده ، وقتی تعداد آیتم ها رو به 999 تغییر میدم کار میکنه ولی از 1000 به بالا ارور میده باید چیکار کنم؟

 

با این کد درست کار میکنه ولی وقتی 999 به 2300 یا هر عددی بالای 1000 تبدیل میشه مشکل پیش میاد

Dim cur As Cursor
	cur = SQL1.ExecQuery("SELECT * FROM mataleb")
	For i = 0 To 999
	    cur.Position = i

		ListView1.AddSingleLine2(cur.GetString("titr"), cur.GetInt("id"))

		
		ListView1.TwoLinesLayout.Label.TextSize = 10
	
	Next
	
	cur.Close

[shahab.es 5,429]

سلام

ارورتون چیه؟

نباید مشکلی باشه...

[محمدرضا شاهپیری 5,579]

نمایش این حجم از اطلاعات به صورت همزمان اونم توی لیست ویوی معمولی کار معقولی نیست و قطعا کرش میکنه

یا از آریا لیست ویو استفاده کنید که خیلی بهینه تر از لیست ویوی پیش فرض هست یا هم از مولتی پنل دیتاها رو به صورت لیمیت مثلا 50 تا 50 تا از دیتابیس بخون و نمایش بده اینجوری دیگه محدودیتی نداری

[احسان کرمی 220]

 

دوستان یه دیتابیس دارم با 2300 تا آیتم ، ولی وقتی دیتابیس رو تولیس ویو رو لود میکنم ارور میده ، وقتی تعداد آیتم ها رو به 999 تغییر میدم کار میکنه ولی از 1000 به بالا ارور میده باید چیکار کنم؟

 

با این کد درست کار میکنه ولی وقتی 999 به 2300 یا هر عددی بالای 1000 تبدیل میشه مشکل پیش میاد

Dim cur As Cursor
	cur = SQL1.ExecQuery("SELECT * FROM mataleb")
	For i = 0 To 999
	    cur.Position = i

		ListView1.AddSingleLine2(cur.GetString("titr"), cur.GetInt("id"))

		
		ListView1.TwoLinesLayout.Label.TextSize = 10
	
	Next
	
	cur.Close

به نظرم پوزیشن کور رو i-1 قرار بدین یعنی اینجوری

cur.position=i-1

اینجوری کنین ببینین میشه؟

[razavioo 310]

می تونید یک cursor دیگه برای هزارتای بعدی ایجاد کنید ببینید چی میشه؟