listviewitem

[abbasamoo]

سلام
من یک فایل اکسس دارم که مقداری اطلاعات داخل آن است نصف این داده ها داخل یک listviewitem نمایش داده می شود .من می خوام وقتی روی هر سطردرlistviewitem اولی کلیک شد بقیه اطلاعات در یک listviewitem دوم دیگری که قبلا طراحی شده است نشان داده شود . من نمی دونم چه جوری ای کار رو انجام بدم. در ضمن کلید اصلی من یه عبارت استرینگ است.
ممنون می شم اگه کمک کنید.
:خجالت:

[msh_gold]

با سلام ميتوني تو رويداد clickاين كد ها رو بنويسي
Private Sub ListView1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListView1.DoubleClick
Dim a As Integer
a = ListView1.Items.Count
For i As Integer = 0 To a
If ListView1.Items(i).Selected = True Then
كد هاي مورد نظر

End If
Next
End Sub
البته چيزي كه من از سوالتون فهميدم اينه كه شما اول بايد يه دستور selectبا شرط برابري با آتم هاي listview1به بانك بزنيد و حاصل اونو در listview2 بريزيد.باز هم اگه مشكلي بود بگو تا من كدشو برات بزارم
______________________________
كاش مي شد اول زندگي يه Tryزد آخرش هم يه End Try

[abbasamoo]

شاید من سوالمو بد مطرح کردم
ببینید من یک table دارم که از تعدادی ستون تشکیل شده است و اطلاعات هر سطر مربوط به یک نفر است.
من دو عدد listview دارم
listview 1 در هنگام لود شده صفحه نصف ستون ها ی همه افراد را نشان می دهد تا اینجا من این کار راانجام دادم.
ولی می خواهم وقتی در listview 1 بر روی هر سطری که کلیک کردم بقیه ستون ها را مربوط به همان شخص را در listview 2 نشان دهد.که نتوانستم.
در ضمن من دو دستور select دارم که اولی نصف ستون های همه افراد را انتخاب می کندو در listview 1به کار بردم و دستور select دوم رابرای listview 2 نوشتم که ستونهایی که در دستور اولی وجود نداشت را با شرط کلید اصلی که یک عبارتstring است انتخاب می کند
به نظرمن مشگل عمده من 1-نحوه تشخیص کلید اصلی فرد انتخاب 2-و ارسال این کلید به دستور select دوم و3-نحوه نمایش بقیه ستونهااست
اگه بتونید کمکم کنید واقعا ممنون می شم

[abbasamoo]

یعنی کسی نیست به من کمک کنه!!!!!!!!!!

[amirsajjadi]

الان مشکل شما دستورات SQL هست یا ListView ؟

[abbasamoo]

1-مشگل من در listview است
2-این هم کدی که در دران به خطا برخوردم


Private Sub lvwperson_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lvwperson.Click
Dim objlistviewitem2 As ListViewItem
Try
objcommand = New OleDbCommand("usp_selectinformation2", objconnection)
objcommand.CommandType = Data.CommandType.StoredProcedure
objcommand.Parameters.Add("numberid", OleDbType.Char, 16).Value = lvwperson.SelectedItems.Item(0).Tag
openconnection()
objdatareader = objcommand.ExecuteReader
If objdatareader.HasRows Then
lvwmark.Items.Clear()
objdatareader.Read()
objlistviewitem2 = New ListViewItem
objlistviewitem2.Text = objdatareader.Item("1001")
objlistviewitem2.Tag = objdatareader.Item("numberid")
objlistviewitem2.SubItems.Add(objdatareader.Item("1002"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1003"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1004"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1005"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1006"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1007"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1008"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1009"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1010"))
objlistviewitem2.SubItems.Add(objdatareader.Item("1011"))
lvwmark.Items.Add(objlistviewitem2)
End If
objdatareader.Close()
closeconnection()
Catch oledbExceptionErr As OleDbException
MessageBox.Show(oledbExceptionErr.Message)
End Try
End Sub

واین هم نوع خطا
System.IndexOutOfRangeException was unhandled
در ضمن اعداد 1001ت1011 نام ستون های جدول است وNumberid کلید اصلی من است
با تشکر جوابتان

[abbasamoo]

یعنی کسی نمی تونه کمک کنه!!!!!!!!!