ارسال به نتایج جستجو

[RoyaPM 538]

سلام بچه ها

 

من برا برنامم یه جستجو در متن و عنوان درست کردم و جستجو خوب کار میکنه ولی میخوام وقتی تو هرکدوم کلیک میشه بره تو ای دی همون عنوان و مطلبشو نشون بده

 

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

 

این کدمه

  ListView1.Clear
	If rdname.Checked = True Then
	cur1 = sql1.ExecQuery("SELECT * FROM tbl WHERE txt LIKE '%" & txtSearch.text & "%'")
	For i = 0 To cur1.RowCount-1
	cur1.Position = i 
	ListView1.AddTwoLines(cur1.GetString("txt") & " " & cur1.GetString("mataleb"),cur1.GetString("mataleb"))

[RoyaPM 538]

حلش کردم      کاش میشد به خودم تشکر بدم

 

مشکلم حل شد گفتم حداقل بذارمش که چطوری درستش کردم که تاپیک لخت نمونه ..

For n = 0 To cur1.RowCount-1
	Dim p As ListView
	p.Initialize("P")
	ListView1.Tag = n
	Next

بالایی تو اکتیویتی کریت گذاتم

 

اینم تو رویداد کلیک لیست ویو

		Dim p As ListView
	p = Sender
	scroll.ID2 = p.Tag
	StartActivity(scroll)