Www Kittell Net Category Code Basic4android

David Kit Kittell tell  Applicati  Appl ication on Development / Integration Integration

MENU

Category:: Basic4Android Category  While this category category technically technically falls falls under VB it does does have it’s own specific aspects that sets it apart.

Create Directory If It Doesn't

Exist Source Code 01 02 03 04 05 06 07 08 09 10 11

If File.ExternalWritable Then If File.IsDirectory(File.DirRoo File.MakeDir(File.DirRootEx sDBLocation = File.DirRootE End  If Else If File.IsDirectory(File.DirInt File.MakeDir(File.DirIntern sDBLocation = File.DirInter End  If End  If

September 27, 2013 / Basic4Android, Code

Create / Delete SQLite Database Indexes

Source Code 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16

'Create Index Sub CreateIndex(SQL  As SQL, TableName  As String Dim  query, uni  As String uni = "" If Unique=True Then uni = "UNIQUE" query = "CREATE " & uni & " INDEX IF NOT EXI Log("CreateIndex: " & query) SQL.ExecNonQuery(query) End  Sub 'Delete Index Sub DropIndex(SQL  As SQL, IndexName  As String ) Dim  query  As String query = "DROP INDEX IF EXISTS " & IndexName Log("DropIndex: " & query) SQL.ExecNonQuery(query) End  Sub

Source: Billy047 @ http://www.basic4ppc.com/android/forum/threads/dbutilsandroid-databases-are-now-simple.8475/page-2 September 27, 2013 / Basic4Android, Code, SQL, SQLite

Create SQLite Database With  Auto Increment Source Code 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22

Sub CreateTable(SQL  As SQL, TableName  As String Dim  sb  As StringBuilder sb.Initialize sb.Append("(") For i = 0 To FieldsAndTypes.Size - 1 Dim  field, ftype  As String field = FieldsAndTypes.GetKeyAt(i) ftype = FieldsAndTypes.GetValueAt(i) If i > 0 Then sb.Append(", ") sb.Append( "[").Append(field).Append("] ") 'If field = PrimaryKey Then sb.Append(" P If field = PrimaryKey Then sb.Append(" PRIMARY KEY") If  Auto = True Then sb.Append( " AUTOIN End  If  Next sb.Append(")") Dim  query  As String query = "CREATE TABLE IF NOT EXISTS [" & Tab Log("CreateTable: " & query) SQL.ExecNonQuery(query) End  Sub

Source: Billy047 @ http://www.basic4ppc.com/android/forum/threads/dbutilsandroid-databases-are-now-simple.8475/page-2 September 27, 2013 / Basic4Android, Code, SQL, SQLite

Search …

CATEGORIES

Code (486)  Azure (10) Basic4Android (3) C++ (1) ColdFusion (1) CSharp (84) C# ASPX (17) C# Ektron (10) C# Project (4)  Windows Phone (1) CSS (1) DNN (2) DNS (1) Ektron (44) GitLab (1) HTML (2) HTML5 (1)  Java (1)

 JavaScript (14)  JavaServer Pages JSP (1)  jQuery (4)  JSON (2) LDAP (3) Log Parser Studio (3) Microsoft Office (10)  Access (2) Excel (8) Network  (1) OpenSSL (1) PHP (34) PowerShell (78) Chocolatey (4) SQL (164) MSSQL (125) MSSQL – Audit (17) MSSQL – Azure (1) MSSQL – DNN (2) MSSQL – Ektron (38)

Ektron User Management (7) MSSQL – Ektron 8.0.2 (26) MSSQL – Ektron 8.7 (14) MSSQL – Functions (6) MySQL (19)  WordPress SQL (8) Oracle (5)  Amisys (2) SQLite (13)  Android SQLite (9) UNIX (47) CentOS (21) Fedora (19) Mac OSX (31) Redhat (21) Ubuntu (13) UNIX Shell Scripts (68)  Android (3) CSVKit (2) Mac OS X Shell (28)

Raspberry Pi (3) TeamCity (1) TeamCity Mac (1)  VB (10)  ASP (8)  VB.NET (38)  VB.NET ASPX (2)  Windows (24)  Windows Batch (12)  Windows Reg (3)  Windows VBS (5)  WordPress (16) XML (2) Random (Blog) (5) Cleaning (3) Music (1) Soccer (1) Tech Support (4) Online Tools (1) Uncategorized (1)

Services Code Tech Support Random (Blog)

David Kittell / Proudly powered by WordPress