[مبرمج أوتار]

عليكم السلام ورحمة الله وبركاته
انا استخدم الكود في اصدار 2010 مدري يشتغل في الاصدار سادس ام لا

كود :

' كود تاكد من البيانات السابقه
        Dim cmlo As New OleDbCommand("select count(Startdata) from TrainingUnit where Startdata='" & Startdata.MyText & "'", conn)
        If conn.State = ConnectionState.Closed Then
            conn.Open()
        End If
        If cmlo.ExecuteScalar > 0 Then
            MsgBox("تاريخ موجود مسبقا", MsgBoxStyle.Critical, "تنبيه")
            Exit Sub
        End If