Cara enkripsi database SQLite dengan VB.Net

Sumber : http://puncakdunia.wordpress.com/2012/05/25/cara-enkripsi-database-sqlite-dengan-vb-net/#more-126

SQLite merupakan data yang simple,baik dalam pembuatan dan pemakaiannya,namun tahukah anda bahwa ternyata database SQLite masih dapat dibuka dengan editor seperti notepad, dengan demikian orang yang tak memiliki hak pun dapat melihat data – data yang tersimpan didalam SQLite

ini adalah database SQLite yang belum terenkripsi

supaya data tersebut tidak dapat dibaca maka kita harus mengenkripsinya database tersebut.

Nah saya akan share cara mengenkripsi database SQLite,membuka database yang terenkipsi dan mengembalikan database yang sudah terenkripsi dengan menggunakan Visual Basic 2008 (VB.net) dan pastikan juga sudah menginstall ADO.NET khusus database SQLite

Pembuatan Database SQLite dengan VB.NET 2005

Tutorial ini mencoba menunjukkan bagaimana koneksi dengan SQLite dengan VB.NET 2005.
Kita membutuhkan sebuah DLL yang bernama System.Data.SQLite (http://sqlite.phxsoftware.com/) yang bersifat freeware…

01	Imports System.Data.SQLite

02	Imports System.IO

03

04	Private Sub btn_createdb_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_createdb.Click

05

06	'Save Dialog Box

07	Dim f As New SaveFileDialog

08	f.Filter = "SQLite 3 (*.db3)|*.db3|All Files|"

09	f.ShowDialog()

10	'Create Database

11	Dim SQLconnect As New SQLite.SQLiteConnection()

12	'Database Doesn't Exist so Created at Path

13	SQLconnect.ConnectionString = "Data Source=" & f.FileName & ";"

14	SQLconnect.Open()

15	SQLconnect.Close()

16

17

End Sub

18

19	Private Sub btn_tables_create_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles btn_tables_create.Click

20

21	Dim SQLconnect As New SQLite.SQLiteConnection()

22	Dim SQLcommand As SQLiteCommand

23	SQLconnect.ConnectionString = "Data Source=" & txt_dbpath.Text & ";"

24	SQLconnect.Open()

25	SQLcommand = SQLconnect.CreateCommand

26	'SQL query to Create Table

27	SQLcommand.CommandText = "CREATE TABLE " & txt_tables_name.Text & "(id INTEGER PRIMARY KEY AUTOINCREMENT, title TEXT, description TEXT, image BLOB);"

28	SQLcommand.ExecuteNonQuery()

29	SQLcommand.Dispose()

30	SQLconnect.Close()

31

End Sub

Selamat mencoba!

Sumber : http://actual-training.com/2008/05/06/pembuatan-database-sqlite-dengan-vbnet-2005/
Lihat Juga Tulisan : http://faisalmuzaddiq.wordpress.com/2012/02/17/koneksi-vb-net-sqlite/