Forums PureBasic - Français
https://www.purebasic.fr/french/
crée ton menu sur la fenetre principale puis cache le menu avec la commande HideMenu(#menu,0); 0 = il sera caché .Je veux savoir, comment je peux faire pour afficher le menu de la fenêtre principal qu'après avoir rentrer mon mot de passe?
jbernard13 a écrit :crée ton menu sur la fenetre principale puis cache le menu avec la commande HideMenu(#menu,0); 0 = il sera caché .Je veux savoir, comment je peux faire pour afficher le menu de la fenêtre principal qu'après avoir rentrer mon mot de passe?
pour réafficher ton menu une fois le mot passe rentrer tu mets la commande HideMenu(#menu,1); 1 = il sera visible .
C'est l'inverse... 1 = caché 2 = pas cachéCode : Tout sélectionner
UsePostgreSQLDatabase()
; Le serveur doit tourner sur la machine locale.
;
If OpenDatabase(0, "host=localhost port=5432", "Vincent", "0000")
Debug "Connected to PostgreSQL"
Else
Debug "Connection failed: "+DatabaseError()
EndIfMerci de bien vouloir m'aider...Connection failed: FATAL: la base de donn
Code : Tout sélectionner
doublons.i= 0
UsePostgreSQLDatabase()
; Le serveur doit tourner sur la machine locale.
If OpenDatabase(1, "host=localhost port=5432 dbname=ERP", "Vincent", "0000") ;Ouverture de la base de données
DatabaseQuery(1, "SELECT * FROM Utilisateur") ;Je prends toutes les données de la colonne utilisateur
While NextDatabaseRow(1) ; Enumération des enregistrements
If GetDatabaseString(1, 0) = "Vincent" ; Test pour ne pas faire de doublons
Debug GetDatabaseString(1, 0) ; Affichage du contenu du premier champ
doublons=1
EndIf
Wend
If doublons=0
DatabaseUpdate(1, "INSERT INTO Utilisateur (Utilisateur, MDP) VALUES ('Vincent', 'Vince')")
Else
MessageRequester("Attention", "Doublon dans la BDD donc l'insertion ne c'est pas faites")
EndIf
FinishDatabaseQuery(1)
CloseDatabase(1)
Else
Debug "Connection failed: "+DatabaseError()
EndIf