tto_baran
چهارشنبه 13 خرداد 1388, 20:34 عصر
سلام دوستان گرامي . من براي پر كردن چهار عدد كمبو باكس موجود در يك فرم از فيلدهاي يك جدول از كد زير استفاده كرده ام
متاسفانه ركورد هاي فاقد مقدار را نيز در كمبو باكس قرار ميدهد كه با عث ميشود بعضي از سطر هاي كمبو باكس بدون مقدار باشد خواهش ميكنم راهنمايي فرماييد بتوانم از درج شدن سطر هاي بدون مقدار جلوگيري كنم
ol_cm = New OleDbCommand("select * from nam", ol_cn)
ol_da = New OleDbDataAdapter(ol_cm)
ds = New DataSet
ol_da.Fill(ds, "nam")
dr = ol_cm.ExecuteReader
If dr.HasRows Then
While dr.Read
Combo2.Items.Add(dr("namj"))
Combo1.Items.Add(dr("nams"))
Combo3.Items.Add(dr("mozdj"))
Combo4.Items.Add(dr("mozds"))
End While
متاسفانه ركورد هاي فاقد مقدار را نيز در كمبو باكس قرار ميدهد كه با عث ميشود بعضي از سطر هاي كمبو باكس بدون مقدار باشد خواهش ميكنم راهنمايي فرماييد بتوانم از درج شدن سطر هاي بدون مقدار جلوگيري كنم
ol_cm = New OleDbCommand("select * from nam", ol_cn)
ol_da = New OleDbDataAdapter(ol_cm)
ds = New DataSet
ol_da.Fill(ds, "nam")
dr = ol_cm.ExecuteReader
If dr.HasRows Then
While dr.Read
Combo2.Items.Add(dr("namj"))
Combo1.Items.Add(dr("nams"))
Combo3.Items.Add(dr("mozdj"))
Combo4.Items.Add(dr("mozds"))
End While