_{السلام عليكم ورحمة الله}

_{مشروع تسجيل جدولة سداد للعمال والعاملين ومعرفة المسددين والغير مسددين مع امكانية طباعة تقارير}

_{لغة البرمجة}

_vbnet4

_{قواعد البيانات}

_{sqlcompact 4}

_تقارير

_{Crystal report 24}

_{جملة الاتصال}

_{My.Settings.scon = Tec.Text.Trim
My.Settings.Save()
If Sqlconn.State = ConnectionState.Open Then
Sqlconn.Close()
End If
Try
Sqlconn.Open()
Me.Text = "Index الرئيسية" & " " & "Database is connecting"
MsgBox("تم الاتصال بنجاح", MsgBoxStyle.Exclamation, "تنبيه")
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "خطأ اتصال قاعدة البيانات")
End Try}