Programmer avec le langage Linotte

Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Programmer avec le langage Linotte

Besoin d'un conseil sur la programmation en Linotte ?


Petite réalisation

avatar
Cagou-77
Junior Member


Messages : 32
Date d'inscription : 2010-12-17

Petite réalisation Empty Petite réalisation

Message par Cagou-77 Tue 22 Dec - 20:20

Code:
Globale
   nomTable   est un casier de texte valant "Tiers"
   Colonnes est un casier de texte valant "Nom", "Prénom", "Adresse", "CodePostal", "Ville"
   Valeur  est un casier de texte valant "Chirac", "Jacques", "10,rue de la Montée", "75000", "Paris"
   Table est un casier de casier valant {"Tiers"}, Colonnes, Valeur
  
SQL_Construction :
  sql_Term est un texte valant "Insert Into "
  parentOuv est un texte valant " ( "
  parentFer est un texte valant " ) "
  virgule   est un texte valant ", "
  chaine    est un texte
  taille    est un nombre
  nb        est un nombre valant 0
   début
     efface tableau
     mesure table{1} dans taille
     chaine = sql_Term+Table{0,0}+parentOuv
     tant que nb < taille, lis
        chaine = chaine+table{1,nb}
        nb = nb+1
        si nb = taille, chaine = chaine+parentFer
        sinon chaine = chaine+virgule
     ferme
     Chaine = Chaine+"VALUES"
     chaine = chaine+parentOuv
     nb = 0
     tant que nb < taille, lis
        chaine = chaine+table{2,nb}
        nb = nb+1
        si nb = taille, chaine = chaine+parentFer
        sinon chaine = chaine+virgule
     ferme
affiche chaine

    La date/heure actuelle est Tue 30 Nov - 7:35