درود فراوان
کسی میدونه خط آخر رو باید چطوری نوشت
[VB] DS.Reset()
con = New OleDbConnection(strcon)
con.Open()
strOledb = "select Count(TagType) from ConstructCivil where tagType = 'Catch Basin' "
DA = New OleDbDataAdapter(strOledb, con)
DA.Fill(DS, "ConstructCivil")
con.Close()
TextBox1.Text = "" ' error darim/VB]