1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| NumConnexion est un entier
Res_sql est un booléen
NumConnexion = SQLConnecte(gsSAI_nom_du_serveur,gsSAI_user,gsSAI_password,gsSAI_database,"MySQL")
SI NumConnexion=0 ALORS
SQLInfoGene()
Erreur("La connexion à la source de données" + gsSAI_nom_de_table + ...
"a échoué."+RC+...
"Code erreur : " + SQL.Erreur +RC+...
SQL.MesErreur)
FIN
content_titre,content_contenu,gsSAI_nom_de_table sont les variables
leschamps est une chaîne="'"+content_titre+"','"+"'"+content_contenu+"',
SI statut = "NEW" ALORS
SQLExec("INSERT INTO gsSAI_nom_de_table VALUES(leschamps)")
info("bonne mise à jour") |
Partager