tu as un pc au moins 3x plus puissant que le mien !!
mais j'ai 4 giga de RAM.
ok pour les positions, je m'occupe de ça.
mais j'ai 4 giga de RAM.
ok pour les positions, je m'occupe de ça.
Code:
greffons sql
/*
Exemple pour se connecter sur à la base de données intégrée à l'Atelier Linotte
*/
globale
sql_create <
- "CREATE TABLE famille (nom VARCHAR(100), prenom VARCHAR(100))"
sql_insert <
- "INSERT INTO famille (nom, prenom) VALUES (?, ?)"
sql_select <
- "SELECT nom, prenom FROM famille"
pilote <
- "org.
hsqldb.
jdbcDriver"
url <
- "jdbc:
hsqldb:
file:
c:
/temp/baseAtelier"
utilisateur <
- "sa"
motdepasse <
- ""
principale :
connecteur :
:
sql
nom & prénom :
:
texte
début
efface tableau
essaie lis
// Connexion à la base de données :
évoque connecteur.
open(pilote,url,utilisateur,motdepasse)
// *****************************
// Création de la table FAMILLE :
essaie évoque connecteur.
execute(sql_create,{})
sinon affiche "La table 'FAMILLE' existe déjà.
"
// *****************************
// Insertion de nouvelles valeurs
questionne nom sur "Votre nom ?"
questionne prénom sur "Votre prénom ?"
évoque connecteur.
execute(sql_insert, {nom, prénom})
// *****************************
// Vérification du contenu de la table
évoque connecteur.
select(sql_select)
affiche "Elements présents dans la table FAMILLE :
"
tant que connecteur.
hasnext(), lis
retour :
:
casier de texte
retour vaut connecteur.
next()
affiche "Prénom :
" + retour{1}+ ", nom :
" + retour{0}
ferme
// *****************************
ferme
sinon lis
// Gestion des erreurs
"Numéro de l'erreur :
" + numéro_erreur !
"Message de l'erreur :
" + message_erreur !
ferme
// Il faut toujours fermer une connexion à une base de données
évoque connecteur.
execute("SHUTDOWN", {})
évoque connecteur.
close()