Delphi: Login à une base de données MS SQL Server
Description
Exemple d'une application qui permet de se connecter à une base de données Microsoft SQL Server (moi j'utilise MS SQL Server 2005 Express Edition) avec une authentification SQL Server
-Veillez utilisez le script de création de la base de données db_stagiaires et de l'utilisateur "stgadmin" (mot de passe= stgadmin) fournit avec le projet,
-------------------------------------------------
-Dans l'unité Ulogin: on doit saisir le nom du serveur SQL Server comme valeur de la propriété "Data Source" de la ligne suivante:
dm.ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;'
+'Persist Security Info=False;'
+'Initial Catalog=db_stagiaires;' //Nom de base de données
+'Data Source=NomDeVotreServeurSQLServer';
Exemple: NomOrdinateurSQLEXPRESS Si c'est la version Express Edition. Lors de l'installation de SQL Server 2005 express par defaut le nom de l'instance est SQLEXPRESS, mais il y a aussi la possibilité de changer le nom de l'instance.
-------------------------------------------------
Tutoriel de création de cette application:
-Partie 1: https://www.youtube.com/watch?v=m1u6ZrNQI00
-partie 2: https://www.youtube.com/watch?v=SNvm2rSU7BU&t=1207s
-Nouveau Complet (Partie1 + partie 2): https://www.youtube.com/watch?v=qWEBF8TQTJs
Tutoriel pour se connecter avec cette application au serveur SQL Server à distance sur un réseau local:
à regarder en qualité vidéo HD 1080p:
Lien de la vidéo: https://youtu.be/awRM1CzDuTQ
-----------------------------------------------
Tutoriel pour ajouter de nouvelles formes à cette application:
https://www.youtube.com/watch?v=sbzFB8JNaO4
lorsque on ajoute de nouvelle forme à cette application par exemple "form2" la ligne suivante se générera automatiquement dans le fichier de projet "Project1.dpr":
"Application.CreateForm(TForm2, Form2);"
on doit déplacer cette ligne "Application.CreateForm(TForm2, Form2);" au dessous de la ligne "Application.CreateForm(TFprincipal, Fprincipal);" afin que la formes "form2" se créer après que le connexion soit établie avec succès à la base de données MS SQL Server et aussi après que la forme "Fprincipal" sois créée en premier.
comme cela:
if f.ShowModal=mrok then
begin
try
Application.CreateForm(TFprincipal, Fprincipal);
Application.CreateForm(TForm2, Form2);
Application.Run;
finally
f.Free;
end;
end;
-----------------------------------------------
-Veillez utilisez le script de création de la base de données db_stagiaires et de l'utilisateur "stgadmin" (mot de passe= stgadmin) fournit avec le projet,
-------------------------------------------------
-Dans l'unité Ulogin: on doit saisir le nom du serveur SQL Server comme valeur de la propriété "Data Source" de la ligne suivante:
dm.ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;'
+'Persist Security Info=False;'
+'Initial Catalog=db_stagiaires;' //Nom de base de données
+'Data Source=NomDeVotreServeurSQLServer';
Exemple: NomOrdinateurSQLEXPRESS Si c'est la version Express Edition. Lors de l'installation de SQL Server 2005 express par defaut le nom de l'instance est SQLEXPRESS, mais il y a aussi la possibilité de changer le nom de l'instance.
-------------------------------------------------
Tutoriel de création de cette application:
-Partie 1: https://www.youtube.com/watch?v=m1u6ZrNQI00
-partie 2: https://www.youtube.com/watch?v=SNvm2rSU7BU&t=1207s
-Nouveau Complet (Partie1 + partie 2): https://www.youtube.com/watch?v=qWEBF8TQTJs
Tutoriel pour se connecter avec cette application au serveur SQL Server à distance sur un réseau local:
à regarder en qualité vidéo HD 1080p:
Lien de la vidéo: https://youtu.be/awRM1CzDuTQ
-----------------------------------------------
Tutoriel pour ajouter de nouvelles formes à cette application:
https://www.youtube.com/watch?v=sbzFB8JNaO4
lorsque on ajoute de nouvelle forme à cette application par exemple "form2" la ligne suivante se générera automatiquement dans le fichier de projet "Project1.dpr":
"Application.CreateForm(TForm2, Form2);"
on doit déplacer cette ligne "Application.CreateForm(TForm2, Form2);" au dessous de la ligne "Application.CreateForm(TFprincipal, Fprincipal);" afin que la formes "form2" se créer après que le connexion soit établie avec succès à la base de données MS SQL Server et aussi après que la forme "Fprincipal" sois créée en premier.
comme cela:
if f.ShowModal=mrok then
begin
try
Application.CreateForm(TFprincipal, Fprincipal);
Application.CreateForm(TForm2, Form2);
Application.Run;
finally
f.Free;
end;
end;
-----------------------------------------------
Codes Sources
A voir également
- Delphi: Login à une base de données MS SQL Server
- Delphi format - Conseils pratiques -Delphi
- Delphi thread - Conseils pratiques -Delphi
- Shellexecute delphi ✓ - Forum Delphi / Pascal
- Delphi pos ✓ - Forum Delphi / Pascal
- Delphi peche ✓ - Forum Delphi / Pascal
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.