/*
 * Exemple d'utilisation de la libriairie 'libsqlite' pour Scol
 * 
 * Cet exemple a été réalisé avec la version 0.1a1
 * Auteur : Stéphane Bisaro, aka Iri <iri@irizone.net>
 * Juillet 2010
 * Licence : aucune licence particulière, ce code source peut être modifié,
 * distribué, étudié et exécuté librement, sans restriction.
 * Notez cependant qu'il peut contenir des dysfonctionnements ou du code erroné.
 * Il est fourni tel quel sans garantie d'aucune sorte. Prenez toute précuation
 * d'usage.
 * La librairie 'lisqlite' est, elle, placée sous licence Scol.
 *
 * Ce code source montre les principes de bases de l'utilisation de 'libsqlite'.
 * Le but n'est pas une optimisation tant du code Scol que des requêtes SQL.
 * Cet exemple crée s'il y a lieu un fichier base de données sur le disque dur
 * pour y tester diverses commandes SQL via une interface graphique.
 *
 * Si vous avez des questions à propos de ce code, privilégiez les forums du 
 * Scolring : http://www.scolring.org
 */
 
proto main_sqlite = fun [] I;;

fun main()=
	_showconsole;
	if (_test_exist "_sqliteOpenFile") then
	(
		_load "tutorials/sqlite/test_1.pkg";
		main_sqlite
	)
	else
	(
		_DLGMessageBox _channel nil "Erreur : librairie manquante !"
			"La librairie 'libsqlite3' est manquante ou n'a pas été définie\ndans le fichier usm.ini. Veuillez consulter le Scolring : www.scolring.org" 0;
		0
	);;