السلام عليكم ورحمة الله وبركاته:
أنا أقوم بعمل موقع لللأسهم بواسطة الasp.net & vb.net
المشكلة إني لما أبغى البرنامج يطلعلي أسهم الشخص أبغاه يقسمها قسمين وراح ارمزلها ب 1و2
فعملت فيلتير ,وحطيت dropdownlistفيها ثلاث إختيارات
إما يطلعلي أسهم 1
أو أسهم 2
أو كلاهما ويضع شريط يوضح كل قسم
والحمد لله ضبط معي هذا الشئ ولكن المشكلة لما أختار إني ابغ يطلعي كلا النوعين
يطلع بس لو ابي أعمل تعديلات عليها مثل ديليت أو إديت ما يرضى يعملي ويطلع إرور أو يعملها غلط
مع العلم أن الإختيارات الأخرى في الدروب داون ما فيها اي مشاكل في التعديلات
وهذا الكود
Dim
count
As
Integer
= 1
If
e.Item.ItemType = ListItemType.Footer
Then
Dim
dgItem
As
DataGridItem
Dim
dgCell
As
TableCell
dgItem =
New
DataGridItem(count, count, ListItemType.Header)
dgCell =
New
TableCell()
dgCell.ColumnSpan = 14
dgCell.BackColor = Drawing.Color.DeepPink
dgItem.Cells.Add(dgCell)
dgCell.Text =
"Owned"
DataGrid1.Controls(0).Controls.AddAt(count, dgItem)
End
If
Dim
myConnection
As
MySqlConnection =
New
MySqlConnection(
"server=localhost; user id=root; password=root; database=mydatabase; pooling=false;"
)
Dim
myCommand
As
MySqlCommand =
New
MySqlCommand(
"SELECT count(*) FROM sub_stock where sub_id=(?id)and number_of_share<>0;"
, myConnection)
myConnection.Open()
myCommand.Parameters.Add(
"?id"
, MySqlDbType.VarChar).Value = Session(
"id"
)
count = count +
CType
(myCommand.ExecuteScalar,
Integer
) + 1
If
e.Item.ItemType = ListItemType.Footer
Then
Dim
dgItem
As
DataGridItem
Dim
dgCell
As
TableCell
dgItem =
New
DataGridItem(count, count, ListItemType.Header)
dgCell =
New
TableCell()
dgCell.ColumnSpan = 14
dgCell.BackColor = Drawing.Color.DeepSkyBlue
dgItem.Cells.Add(dgCell)
dgCell.Text =
"watch"
DataGrid1.Controls(0).Controls.AddAt(count, dgItem)
End
If
هل الكود في خطأ؟؟؟...
أرجو المساعدة وشكرا....