Re: [sqlite] Creating a Database from RealBasic code

2008-04-22 Thread Thomas E. Wright 
Thanks Denis. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Denis Crowther
Sent: Tuesday, April 22, 2008 10:54 AM
To: General Discussion of SQLite Database
Subject: Re: [sqlite] Creating a Database from RealBasic code

Hi Thomas,

No need to shell out, you create from within the realbasic application.

I'll pluck some example code and email it to you.

Regards
Denis

On 04/23/2008 12:44 AM, Thomas E. Wright wrote:

> This should be simple but does anyone know how to create a new database
from
> within realbasic code?  I try to shell out using the shell command but
it's
> not liking that too much and there seems to be no create database function
> for sqlite.
> 
>   Dim s As Shell
>   s= New Shell
>   f = GetFolderItem("")
>   appPath=f.AbsolutePath
>   'appPath=app.ExecutableFile.Parent.AbsolutePath
>   msgbox appPath
>   
>   #if TargetWin32
> 
> s.execute "sqlite3.exe testdatabase.db"
> 's.execute "dir "
>   #endif
>   
>   If s.errorCode = 0 then
> msgbox "done."
>   else
> MsgBox "Error code: " + Str(s.errorCode) + chr(13) + s.result
>   end if
> 
> 
> I get:
> 
> Error code -2 "Shell time out."
> 
> 
> ___
> sqlite-users mailing list
> sqlite-users@sqlite.org
> http://sqlite.org:8080/cgi-bin/mailman/listinfo/sqlite-users
> 
___
sqlite-users mailing list
sqlite-users@sqlite.org
http://sqlite.org:8080/cgi-bin/mailman/listinfo/sqlite-users

___
sqlite-users mailing list
sqlite-users@sqlite.org
http://sqlite.org:8080/cgi-bin/mailman/listinfo/sqlite-users

[sqlite] Creating a Database from RealBasic code

2008-04-22 Thread Thomas E. Wright 
This should be simple but does anyone know how to create a new database from
within realbasic code?  I try to shell out using the shell command but it's
not liking that too much and there seems to be no create database function
for sqlite.

  Dim s As Shell
  s= New Shell
  f = GetFolderItem("")
  appPath=f.AbsolutePath
  'appPath=app.ExecutableFile.Parent.AbsolutePath
  msgbox appPath
  
  #if TargetWin32

s.execute "sqlite3.exe testdatabase.db"
's.execute "dir "
  #endif
  
  If s.errorCode = 0 then
msgbox "done."
  else
MsgBox "Error code: " + Str(s.errorCode) + chr(13) + s.result
  end if


I get:

Error code -2 "Shell time out."


___
sqlite-users mailing list
sqlite-users@sqlite.org
http://sqlite.org:8080/cgi-bin/mailman/listinfo/sqlite-users