[princelovelorn]

السلام عليكم ورحمة الله وبركاته

هذة المشاركة للإفادة

أولا الحمد لله  تم حل المشكلة

أنشئت قاعديتن بنفس الجدوال ونفس الحقول 
كل واحدة ببرنامج مختلف 
الأول SQLite Maestro
والثاني  DB Browser (SQLite)

المشكلة كان من محرر قواعد الأول
اضافة بيانات  وصور  جيد جدا ولكن التعديل فيه مشكلة
ولا أعلم ما السبب في ذلك

السبب الثاني والأهم كان نوع الحقل  Blob   وليس Clob

وحتى بعد تغيير نوع الحقل استمرت المشكة في قاعدة البرنامج الاول

وتم حلها في قاعدة البرنامج الثاني والحمد لله

أكواد الاضافة والعرض للصورة هي المذكورة في الموضوع


ثانيا يتبقى موضوع كلمة المرور للقاعدة 
بحثت كثيرا ووجدت بعض الاكواد ولكنها لا تعمل لدي ( وأكيد السبب قلة خبرتي )

أكثر الأكواد الشائعة التالي

كود :

Dim databaseName = "testdbsqlepw"
   Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click

       ''create db
       SQLiteConnection.CreateFile(databaseName)
       ''sett conn details
       Dim sqlConn As SQLiteConnection = New SQLiteConnection()
       sqlConn.ConnectionString = "DataSource=c:\aaaa\" & databaseName & ";Version=3;New=False;Compress=True;"


       ''open and change password
       sqlConn.Open()
       sqlConn.ChangePassword("hello")
       sqlConn.Close()

   End Sub

   Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
       ''next time you open db use this code:
       Dim sqlConn As SQLiteConnection = New SQLiteConnection()

       If sqlConn.State = 1 Then sqlConn.Close()
       Try
           sqlConn = New SQLiteConnection("DataSource=c:\aaaa\testdbsqlepw;Version=3;New=False;Compress=True;Password=hello;")
           sqlConn.Open()
           MsgBox("تم الأتصال بقاعدة البيانات", MsgBoxStyle.Information, "رسالة تأكيد")
       Catch ex As Exception
           MsgBox("فشل في عملية الأتصال بقاعدة البيانات", MsgBoxStyle.Exclamation, "ERROR")
           cons.Close()
           End
       End Try


   End Sub

والنتيجة انه لا استطيع تشغيل القاعدة والاتصال بها

فما هي الطريقة الصحيحة بارك الله فيكم