Connection Strings

Public Shared Function RetSqLiteCn() As SQLiteConnection

Dim path_to_db As String = AppDomain.CurrentDomain.BaseDirectory & "xxx.sqlite"

Dim sqlite_connection As New SQLiteConnection("Data Source=" & path_to_db & ";Version=3;New=True;Compress=True;")

Return sqlite_connection

End Function

************************************************************************

'ASP.Net

Add this in Web.Config

|connectionStrings|

|add name ="xxxb" connectionString ="Data Source=.\SQLEXPRESS;Integrated Security=True;User Instance=True;AttachDBFilename=|DataDirectory|xxx" providerName="System.Data.SqlClient"|

|connectionStrings|

SqlConnection sqlCn = new SqlConnection(ConfigurationManager.ConnectionStrings["xxx"].ToString());

return sqlCn;

************************************************************************

'Windows

Public Shared Function RetSqlModeCn(ByVal strDbName As String, ByVal blnIntgSec As Boolean) As SqlConnection

Dim sqlCnB As New SqlConnectionStringBuilder

sqlCnB.DataSource = SystemInformation.ComputerName & "\SQLEXPRESS"

sqlCnB.InitialCatalog = strDbName

sqlCnB.IntegratedSecurity = blnIntgSec

sqlCnB.UserID = "sa"

sqlCnB.Password = "xxxx"

sqlCnB.UserInstance = False

Dim sqlCn As New SqlConnection(sqlCnB.ConnectionString)

Return sqlCn

End Function