Procedure stockée (insert) avec sql serveur ou msde

Soyez le premier à donner votre avis sur cette source.

Vue 16 692 fois - Téléchargée 2 852 fois

Télécharger le projet
Commenter

Description

Procedure stockée =>insert (avril 2004)
------------------------------------------

J'ai realisé ce p'tit programme qui montre
l'utilisation d'une procedure stockée pour inserer des nouveaux clients sous
sql serveur ou msde.

J'ai fait un document de quelques pages en .doc expliquant ce qu'est une procedure stockée,
les avantages, etc....
et la marche a suivre pour executer ce p'tit exemple.

Le document word se trouve ds le dossier tutorial...

Source / Exemple : 


procedure TForm1.SpbEnvoitClick(Sender: TObject);
begin
 //test si champs  est remplis
 if (eNom.text = '')then
 begin
 showmessage('Erreur..veuillez remplir les champs svp');
 Windows.Beep(100,500); //beep
 eNom.SetFocus; //place le focus
 end
 else
      with ADOstoredprocInsere do
        begin
          parameters.ParamByName('@nouvNom').Value:=ENom.text;
          parameters.ParamByName('@nouvPrenom').Value:=EPrenom.text;
          parameters.ParamByName('@nouvAdresse').Value:=EAdresse.text;
          parameters.ParamByName('@nouvVille').Value:=EVille.text;
          parameters.ParamByName('@nouvTelephone').Value:=ETele.text;
           //ecxecution procedure
          execproc;
          //rafraichit  la base
        ADOtable1.close; //fermeture de la table
        ADOtable1.open;  //rafraichissement
        showmessage('Insertion de votre nouveau client reussie...');
        panelajout.Visible := false;
        bpanelvisible.Enabled := true;
        //mise a blanc des edit
        eNom.Text:= '';
        ePrenom.Text:='';
        eAdresse.Text:='';
        eVille.Text:='';
        etele.Text:='';
      end;

end;

Conclusion :


Enjoy

http://membres.lycos.fr/annmysql
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Signaler
sourceomenad
Messages postés
2
Date d'inscription
samedi 20 décembre 2008
Statut
Membre
Dernière intervention
21 janvier 2013
 -
bonjour ; bon exemple merci, stp comment utiliser un seul TADOStoredProc pour 2 ou plus de procédures stockée sql !! ou bien on est obligé de créer un TADOStoredProc pour chaq procedure !!
Signaler
cs_patuR
Messages postés
2
Date d'inscription
jeudi 9 juillet 2009
Statut
Membre
Dernière intervention
15 juillet 2009
 -
merci
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_jimmy69)