如果使用VC++使用事务来写SQLite3数据库,首先要先能写库,这篇文章分为两部分,第一部分是怎么来写SQLite3数据库,第二部分怎么使用事务来写库。
第一部分写SQLite3数据库
SQLite官方下载只给了我们一个SQLite3.Dll跟一个SQLite3.def文件,并没有提供用于VC++6使用的Lib文件,因此大家可能要麻烦一点,有两种选择,一种使用Dll动态加载来使用里面的函数,但是这很麻烦,而且如果在程序执行的时候,理论上是有些慢的(因为它每次都要LoadLibrary跟GetProcAddress),如果把所有的函数在程序加载的时候,然后执行的时候就很快了,我推荐大家使用这种方式,但是没有LIB文件怎么办?那咱们就自己做呗~~ ^_^ (我会介绍大部分流行编程语言跟SQLite的接口方法)
<1> VC++ : 启动一个命令行,别说你不会,进入VC的安装目录,我的目录是D:/Microsoft Visual Studio/VC98/Bin 在这个目录下面有一个LIB.exe文件,对,使用它咱们就能制作出咱们需要的SQLite3.lib文件,将咱们在SQLite官方下载的SQLite3.def文件放到相同目录,或者绝对路径也可以, 然后在命令行输入如下命令。
D:/Microsoft Visual Studio/VC98/Bin>LIB /MACHINE:IX86 /DEF:sqlite.def
这样我们就得到了一个SQLite3.lib文件,赶快放到工程链接里面。Project->Settings 在Link选项卡找到Object/library modules : 在最后填入SQLite3.lib 。如果原来就有链接,请使用空格分隔。
将sqlite3.h sqlite3.lib sqlite3.dll文件复制到我们的工程目录,在我们需要写库的CPP文件顶部,填入:#include “sqlite3.h” 然后咱们就可以调用sqlite3.dll里面的所有函数了,比每次都要定义函数原型方便吧?^_^
//Open Sqlite3 database
void OpenSqlite()
{
sqlite3 *sdb;
char buffer[MAX_PATH];
::GetCurrentDirectory(MAX_PATH,buffer);
strcat(buffer,"//sqlite.db");
if(SQLITE_OK!=sqlite3_open(buffer,&sdb))
{
::MessageBox(NULL,sqlite3_errmsg(sdb),NULL,MB_OK | MB_ICONERROR);
sqlite3_close(sdb);
exit(1);
return;
}
db=sdb;
}
//Execute SQL statement
void execSQL(char* sql)
{
char* zErrMsg = 0;
if(SQLITE_OK!=sqlite3_exec(db,sql,0,0,&zErrMsg))
{
::MessageBox(NULL,sqlite3_errmsg(db),NULL,MB_OK | MB_ICONERROR);
sqlite3_close(db);
return;
}
}
程序N简单,不多赘述。之后,我们每次调用这两个函数即可写库了。
<2> Borland C++ Builder 6使用Lib文件跟VC++6完全不同,大家千万别拿来乱用,咱们也可以使用它系统本身提供的一个命令行工具生成一个SQLite3.lib文件,具体的方法如下:
在BCB (Borland C++ Builder 6) 的安装目录找到implib.exe,复制出来或者在它本目录都无所谓,但是必须将SQLite3.dll复制到相同目录下,然后启动一个命令行,(我把他放到了D:/下面)
D:/>implib.exe sqlite3.dll sqlite3.lib
这样就生成了我们需要的专用于BCB的sqlite3.lib文件,怎么使用在这里省略,大家自己研究吧。^_^
<3> DELPHI 7 没有办法使用lib文件,这就有点麻烦,但是咱们也没有必要一个一个Query,那样太痛苦了。我当时就好痛苦。5555555~~~,咱们可以借助第三方的包装类,有一些是收费的,但是也有一些免费的,具体的信息大家请查看下面的地址 http://www.sqlite.org/cvstrac/wiki?p=SqliteWrappers
我这里使用的是sqlitesimpledelphi 这是一个完全免费的包装类,大家可以到它的官方网站下载,http://www.itwriting.com/sqlitesimple.php
下来以后是一个压缩包里面是一个demo。咱们需要里面的两个文件。SQLite3.pas 跟 SQLiteTable3.pas ,把他们复制到工程目录下面,然后在需要操作库的单元文件里面 uses SQLiteTable3 ,然后大家请查看官方的事例代码:
procedure TForm1.btnTestClick(Sender: TObject);
var
slDBpath: string;
sldb: TSQLiteDatabase;
sltb: TSQLIteTable;
sSQL: String;
Notes: String;
begin
slDBPath := ExtractFilepath(application.exename)
+ 'test.db';
sldb := TSQLiteDatabase.Create(slDBPath);
try
if sldb.TableExists('testTable') then begin
sSQL := 'DROP TABLE testtable';
sldb.execsql(sSQL);
end;
sSQL := 'CREATE TABLE testtable ([ID] INTEGER PRIMARY KEY,[OtherID] INTEGER NULL,';
sSQL := sSQL + '[Name] VARCHAR (255),[Number] FLOAT, [notes] BLOB, [picture] BLOB COLLATE NOCASE);';
sldb.execsql(sSQL);
sldb.execsql('CREATE INDEX TestTableName ON [testtable]([Name]);');
//begin a transaction
sldb.BeginTransaction;
sSQL := 'INSERT INTO testtable(Name,OtherID,Number,Notes) VALUES ("Some Name",4,587.6594,"Here are some notes");';
//do the insert
sldb.ExecSQL(sSQL);
sSQL := 'INSERT INTO testtable(Name,OtherID,Number,Notes) VALUES ("Another Name",12,4758.3265,"More notes");';
//do the insert
sldb.ExecSQL(sSQL);
//end the transaction
sldb.Commit;
//query the data
sltb := slDb.GetTable('SELECT * FROM testtable');
try
if sltb.Count > 0 then
begin
//display first row
ebName.Text := sltb.FieldAsString(sltb.FieldIndex['Name']);
ebID.Text := inttostr(sltb.FieldAsInteger(sltb.FieldIndex['ID']));
ebNumber.Text := floattostr( sltb.FieldAsDouble(sltb.FieldIndex['Number']));
Notes := sltb.FieldAsBlobText(sltb.FieldIndex['Notes']);
memNotes.Text := notes;
end;
finally
sltb.Free;
end;
finally
sldb.Free;
end;
end;
这样操作起来是不是很简单,^_^
<4> PHP调用SQLite3 ,这个不用我多废话,请参看我写的《通过Apache + PHP5 + PDO 连接 SQLite3 数据库》一文。
<5>Visual Basic , 因为我没有仔细研究,我无发言权,请参看SQLite官方的资料
http://www.sqlite.org/cvstrac/wiki?p=SqliteWrappers
COM Wrappers / Visual Basic DLLs部分
<6>JAVA 请参看http://www.sqlite.com.cn/POParticle/3/80.Html 帖子,讲述的比较详细。
第二部分 使用事务写库
事务的具体理论概念我不想多说了,如果不明白的请大家到GOOGLE搜索关键字“数据库事务”,能找到N多文章资料。我们使用VC++来做事例。还有使用到上面的两个函数
void WriteSqlite()
{
try
{
OpenSqlite();
execSQL("begin transaction;"); //开始一个事务,记录操作
char strSQL[MAX_PATH];
sprintf(strSQL,"INSERT INTO Table_Name (nAction1, nAction2, nAction3) VALUES(%d,%d,%d)", szVar1,szVar2, szVar3,);
execSQL(strSQL);
execSQL("commit transaction;"); //执行提交之前数据库自动保存用户对数据库操作序列。
return;
}
catch(...)
{
execSQL("rollback transaction;");
}
//Add custom code
}
本文至此而完,上述代码均在 Windows2000 Pro + VC++6 英文企业版本 + Delphi7 英文企业版 编译通过