Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 2 sur 3
Aller à la page: <  1, 2, 3  >
[C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41
Auteur Message
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Revue du message précédent :

Xenoxis a écrit:
Ah ok, mais du coup ça serait quand même possible de faire une version de AgrafV2 avec le for (version sans, bien évidemment, la retransmissions des caractères en "direct") ?


Non, le for posera problème (les lignes sont des équivalents des espaces donc comment savoir si ce n'est pas autre chose qu'une ligne)

Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message Lien mort agrafv2 
bonsoir,

Le lien pour agrafv2 est mort.
J'aimerais bien tester cette commande, quelqu'un peu m'envoyer ou remettre un lien valide?
Avec un ptit tuto ça serai cool ^^

merci




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message Re: Lien mort agrafv2 
marro a écrit:
bonsoir,

Le lien pour agrafv2 est mort.
J'aimerais bien tester cette commande, quelqu'un peu m'envoyer ou remettre un lien valide?
Merci d'avoir signalé que le (les) liens étaient morts.
En voila un (hébergé par framasoft <3) : https://framadrop.org/r/tQS2_I_9oi#PG1WwjZqd6c2suyTuQQaw0Zb84jlLfdZ83dYV6b2…
Ce lien est pour la version WinForm (formellement Windows).

marro a écrit:
Avec un ptit tuto ça serai cool ^^
Il n'y a pas encore de tuto mais il y a la page de Agraf (premier du nom).
AgrafV2 à repris le 1er en y ajoutant certaines fonctionnalités (comme le radio button, la checkbox, etc.)
Donc il est majoritairement compatible avec l'éditeur d'interface de Agraf par DarkBatcher (sauf checkbox et radio car j'ai trouvé que leur implémentation était trop limitée).




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Merci pour le lien.
Mais: Erreur : le fichier existait mais à été supprimé

Ça ne marche toujours, pas.

Dommage j'y est cru Very Happy

Tu aurais pas un bat d'exemple import export de donnée, la possibilité de grisé une partie si on a pas clique sur un bouton radio ou une checkbox.
En faite j’essaie de faire une interface qui ressemble à: Propriétés de connexion au réseau local TCP/IPv4.

Enfin si j'arrive à avoir agrafv2 c'est déjà bien.

Merci de ton aide.




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
marro a écrit:
Merci pour le lien.
Mais: Erreur : le fichier existait mais à été supprimé

Ça ne marche toujours, pas.

Dommage j'y est cru Very Happy

Tu aurais pas un bat d'exemple import export de donnée, la possibilité de grisé une partie si on a pas clique sur un bouton radio ou une checkbox.
En faite j’essaie de faire une interface qui ressemble à: Propriétés de connexion au réseau local TCP/IPv4.

Enfin si j'arrive à avoir agrafv2 c'est déjà bien.

Merci de ton aide.
Étrange, pourtant je n'ai pas utilisé le lien "supprimer".
https://1drv.ms/f/s!Ao64nlgUfTexg_EisYQ5ROZIyxi5cw
ça devrait être mieux si j'utilise l'hébergeur de Microsoft (OneDrive).

Un petit exemple pour afficher toutes les variables "set" :
Code:
@echo off
setlocal enabledelayedexpansion
echo test variables
del temp.agraf 2>NUL
set maxY=0
for /f "tokens=*" %%A in ('set') do (
   set /a maxY+=20
)
set /a maxY+=20
echo %maxY%
(echo ::#Gui_0
echo ::Window "Variables" 1000 %maxY%)>>temp.agraf

set Y=0
for /f "tokens=*" %%A in ('set') do (
   echo ::Text "%%A" 0 !Y! 1000 15
   set /a Y+=15
)>>temp.agraf
set /a maxY-=75
echo ::Button "quit" "Quitter" 900 %maxY% 75 25>>temp.agraf
echo ::#EndGui>>temp.agraf
AgrafV2 temp.agraf #Gui_0

Sinon, on peut changer Agraf en AgrafV2 sur les exemples de DarkBatcher par exemple :
Code:
@ECHO OFF
ECHO Ceci est test de AGraf !
CALL :ShowGui_ "%~0" #GuiNom
REM On affiche la fenêtre et on récupère les données
ECHO bonjour %name% !
REM on peux accèder au contenu via le nom du controle
PAUSE
exit
:: ceci est un commentaire sans importance
::#GuiNom
::Window "Bonjour ! Ceci est un exemple utilisant AGraf" 500 165
::Text "Quel est on nom ?" 10 10 480 25
::Edit "name" "" 10 50 450 25
::Button "valid" "Valider" 375 90 100 30
::#EndGui
 
:ShowGui_
FOR /F "tokens=1,* delims=:" %%A IN ('AgrafV2 "%~1" %2') DO SET %%A=%%B
Goto:Eof

Code:
@ECHO OFF
ECHO Ceci est test de AGraf !
CALL :ShowGui_ "%~0" #GuiNom
CALL :ShowGui_ "%~0" #GuiAge
ECHO tu t'apelles %name% et tu as %age%
PAUSE
exit

:: ceci est un commentaire sans importance
::#GuiNom
::Window "Bonjour ! Ceci est un exemple utilisant AGraf" 500 165
::Text "Quel est on nom ?" 10 10 480 25
::Edit "name" "" 10 50 450 25
::Button "valid" "Valider" 375 90 100 30
::#EndGui
::#GuiAge
::Window "Bonjour %name% ! Ceci est un exemple utilisant AGraf" 500 165
::Text "Alors %name% quel est ton Age?" 10 10 480 25
::Edit "Age" "" 10 50 450 25
::Button "valid" "Valider" 375 90 100 30
::#EndGui
GOTO:EOF
 
:ShowGui_
FOR /F "tokens=1,* delims=:" %%A IN ('AGRAFV2 "%~1" %2') DO SET %%A=%%B
Goto:Eof
Code:
@Echo off
CALL :ShowGui_ "%~0" #Menu
IF "%open%"=="1" ECHO vous avez choisi Ouvrir !
IF "%save%"=="1" ECHO vous avez choisi Enregistrer !
IF "%close%"=="1" ECHO vous choisi Fermer !
REM si un bouton a été pressé, alors sa valeur de retour est 1
PAUSE>NUL
::#Menu
::Window "Faites un choix" 210 200
::Button "open" "Ouvrir" 10 10 180 40
::Button "save" "Enregister" 10 60 180 40
::Button "close" "Fermer" 10 110 180 40
::#EndGui
GOTO:EOF
 
:ShowGui_
FOR /F "tokens=1,* delims=:" %%A IN ('AGRAFV2 "%~1" %2') DO SET %%A=%%B
Goto:Eof





______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Cool le lien fonctionne.

Je vais tester tes exemples dés ce soir.

Merci

Ps: tu développe toujours agrafv2? Tu as besoin de retours sur mes tests?




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
marro a écrit:
Cool le lien fonctionne.

Je vais tester tes exemples dés ce soir.

Merci

Ps: tu développe toujours agrafv2? Tu as besoin de retours sur mes tests?
Je ne suis pas en train d'ajouter des fonctionnalités mais ça ne me dérange pas de corriger des bugs.




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Heu bah en faite j'ai pas pu résisté et je viens de tester.

Et hop ça bug:
Quand je clic sur Agrafv2.exe directement ==> pour avoir l'aide comme sur Agraf



Retour rapide comme tu peux voir ^^




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
marro a écrit:
Heu bah en faite j'ai pas pu résisté et je viens de tester.

Et hop ça bug:
Quand je clic sur Agrafv2.exe directement ==> pour avoir l'aide comme sur Agraf



Retour rapide comme tu peux voir ^^
Je n'ai pas encore mis l'aide, il faudra que je le fasse.




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Bonsoir,

Je fais mes tests, pour l'instant je regarde les possibilités.

Je rencontre une erreur quand j'utilise cette ligne de commande:

Code:
for /f "delims=:" %%a in ('ipconfig /all ^| find "Ethernet "')do call :TestReseau1 %%a


Code complet d'un de mes tests qui génère cette erreur:

Code:
::@echo on
rem set test=%~0
for /f "delims=:" %%a in ('ipconfig /all ^| find "Ethernet "')do call :TestReseau1 %%a
:TestReseau1
rem ::pause
rem set varR=%*
rem set Carte=%varR:Carte Ethernet =%
rem echo la carte est: %Carte%
rem set currentpath=%~dp0
set Carte=ma carte reseau
AGRAF "%~0" #Gui_0
::#Gui_0
::Window "MarroIpChange" 340 510
::Button "Button_25" "Annuler" 230 440 75 23
::Button "Button_24" "OK" 150 440 75 23
::Edit "Edit_23" "" 170 410 140 21
::Text "Serveur WINS:" 10 410 140 21
::Edit "Edit_21" "" 170 380 80 21
::Text "Métrique de l'interface" 10 380 140 21
::checkbox "Check_19" "Métrique automatique" "false" 30 350 280 21
::AddStyle "Check_19" 3
::Edit "Edit_18" "192.168.0.254" 170 320 140 21
::Text "Serveur DNS suplémentaire:" 10 320 140 21
::Edit "Edit_16" "8.8.4.4" 170 290 140 21
::Text "Serveur DNS auxiliaire:" 10 290 140 21
::Edit "Edit_14" "8.8.8.8" 170 260 140 21
::Text "Serveur de DNS pr‚f‚r‚:" 10 260 140 21
::radio "Radio_12" "Utiliser l'adresse de serveur DNS suivante:" "true" 2 30 230 280 21
::AddStyle "Radio_12" 9
::radio "Radio_11" "Obtenir une adresse IP automatiquement" "false" 2 30 210 280 21
::AddStyle "Radio_11" 9
::Edit "Edit_10" "192.168.0.254" 170 180 140 21
::Text "Passerelle par défaut:" 10 180 140 21
::Edit "Edit_8" "255.255.255.0" 170 150 140 21
::Text "Masque de sous-réseau:" 10 150 140 21
::Edit "Edit_6" "192.168.0.10" 170 120 140 21
::radio "Radio_2" "Utiliser l'adresse IP suivante:" "false" 1 30 90 280 21
::AddStyle "Radio_2" 9
::radio "Radio_1" "Obtenir une adresse IP automatiquement" "true" 1 30 70 280 21
::AddStyle "Radio_1" 9
::Text "Adresse IP:" 10 120 140 21
::Edit "Edit_2" "%Carte%" 170 40 140 21
::Text "Nom de la carte reseau:" 10 40 140 21
::Text "Propriétés de connexion au réseau local TCP/IPv4." 10 10 270 21
::#EndGui
pause


Voila voila peut être que je m y prend mal Question

Par contre j'aime bien la gestion des checkbox et des radio bouton false/true et groupe c'est bien plus pratique

Pas mal pas mal

Y a t'il une commande ou une astuce pour connaitre la version de ta commande?

Merci pour ton travaille surtout continu c'est très intéressant.




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
marro a écrit:
Bonsoir,

Je fais mes tests, pour l'instant je regarde les possibilités.

Je rencontre une erreur quand j'utilise cette ligne de commande:

Code:
for /f "delims=:" %%a in ('ipconfig /all ^| find "Ethernet "')do call :TestReseau1 %%a


Voila voila peut être que je m y prend mal Question
Le call rend le développement %~0 invalide (%~0 retourne donc le label appelé), on peut contourner le problème en définissant une variable contenant %~0 hors de l'appel
Code:
::@echo on
set p=%~0
rem set test=%~0
for /f "delims=:" %%a in ('ipconfig /all ^| find "Ethernet "') do call :TestReseau1 %%a
:TestReseau1
rem ::pause
rem set varR=%*
rem set Carte=%varR:Carte Ethernet =%
rem echo la carte est: %Carte%
rem set currentpath=%~dp0
set Carte=ma carte reseau
AGRAFV2 "%p%" #Gui_0
::#Gui_0
::Window "MarroIpChange" 340 510
::Button "Button_25" "Annuler" 230 440 75 23
::Button "Button_24" "OK" 150 440 75 23
::Edit "Edit_23" "" 170 410 140 21
::Text "Serveur WINS:" 10 410 140 21
::Edit "Edit_21" "" 170 380 80 21
::Text "Métrique de l'interface" 10 380 140 21
::checkbox "Check_19" "Métrique automatique" "false" 30 350 280 21
::AddStyle "Check_19" 3
::Edit "Edit_18" "192.168.0.254" 170 320 140 21
::Text "Serveur DNS suplémentaire:" 10 320 140 21
::Edit "Edit_16" "8.8.4.4" 170 290 140 21
::Text "Serveur DNS auxiliaire:" 10 290 140 21
::Edit "Edit_14" "8.8.8.8" 170 260 140 21
::Text "Serveur de DNS pr‚f‚r‚:" 10 260 140 21
::radio "Radio_12" "Utiliser l'adresse de serveur DNS suivante:" "true" 2 30 230 280 21
::AddStyle "Radio_12" 9
::radio "Radio_11" "Obtenir une adresse IP automatiquement" "false" 2 30 210 280 21
::AddStyle "Radio_11" 9
::Edit "Edit_10" "192.168.0.254" 170 180 140 21
::Text "Passerelle par défaut:" 10 180 140 21
::Edit "Edit_8" "255.255.255.0" 170 150 140 21
::Text "Masque de sous-réseau:" 10 150 140 21
::Edit "Edit_6" "192.168.0.10" 170 120 140 21
::radio "Radio_2" "Utiliser l'adresse IP suivante:" "false" 1 30 90 280 21
::AddStyle "Radio_2" 9
::radio "Radio_1" "Obtenir une adresse IP automatiquement" "true" 1 30 70 280 21
::AddStyle "Radio_1" 9
::Text "Adresse IP:" 10 120 140 21
::Edit "Edit_2" "%Carte%" 170 40 140 21
::Text "Nom de la carte reseau:" 10 40 140 21
::Text "Propriétés de connexion au réseau local TCP/IPv4." 10 10 270 21
::#EndGui
pause


marro a écrit:
Y a t'il une commande ou une astuce pour connaitre la version de ta commande?
Pour le moment non, mais je vais voir pour ajouter l'aide.

AddStyle n'est pas requis, il est utilisé dans Agraf mais ne l'est plus dans AgrafV2 (car le fonctionnement des checkbox à changé), il est donc ignoré.




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Voila, j'ai fais une version avec une aide :
https://1drv.ms/f/s!Ao64nlgUfTexg_EisYQ5ROZIyxi5cw



Il y a aussi des archives 7zippées (car la bande passante, ça coute cher Mort de Rire) :
- AgrafV2_full.7z : Contient tout (.exe + src)
- AgrafV2_exe.7z : Contient uniquement le .exe
- AgrafV2_src : Contient le code source (.cs) + un moyen de générer le .exe sur Windows (le plus compact du au fonctionnement du .7z)




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Super,

Ça c'est de la réactivité, je regarde ça ce soir

Merci




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Bonsoir,

Je viens poster mon code pour avoir vos expertises, savoir si c'est bien codé, si je dois faire autrement ou si je peux continuer.

En gros ce code permet: de changer l'adresse IP d'une carte réseau.

Je vous laisse regarder:

Code:
@echo off
rem 1-   verif admin                              ==>      ok 2
rem 1-                                       ==>                  ko 6
rem 2-   nom de la carte reseau                     ==>         ok 3
rem 2-                                       ==>                     ko 7
rem 3-   verif de la presence du fichier ini            ==>            ok 4
rem 3-                                       ==>                        ko 8
rem 4-   verif carte reseau connecté                  ==>               ok 5
rem 4-                                       ==>                           ko 9
rem 5-   je change les parametres de la carte reseau   ==>                  ok 11
rem 5-                                       ==>                              ko 10
rem 6-   msg lancer en admin                        ==>                     ok 12
rem 7-   gui pour controler le nom de la carte reseau   ==>         ok 3
rem                                          ==>                                 ko 12
rem 8-   gui pour cree le fichier ini               ==>         ok 3
rem                                          ==>                                 ko 12
rem 9-   gui pour demander la connexion reseau         ==>            ok 4
rem                                          ==>                                 ko 12
rem 10-   gui probleme inattendu pas de changement      ==>                     ok 12
rem 11-   je joue le son ok                        ==>                        ok 13
rem                                          ==>                                    ko 13
rem 12-   je joue le son ko                        ==>                        ok 13
rem                                          ==>                                    ko 13
rem 13-   exit
rem ----------------------------------------------------------------------------------------------------------
@echo off
:1-TestAdmin
rem Test pour verifier que le script est bien lance en administrateur
fltmc >nul 2>&1 && ( goto 2-NomCarte ) || ( goto 6-MsgDroitAdmin )
:2-NomCarte
echo NomCarte
::je lis un ipconfig et je cherche "Ethernet_" mon delimitateur est ":" si je trouve je vais sur TestReseau
for /f "delims=:" %%a in ('ipconfig /all ^| find "Ethernet "')do call :2-NomCarteTest %%a
goto 7-MsgNomCarte
:2-NomCarteTest
set varR=%*
set Carte=%varR:Carte Ethernet =%
IF NOT "%Carte%" == "" ( goto 3-Ini )
IF %Carte% == "" ( goto 7-MsgNomCarte )
:3-Ini
echo Ini
rem recupere le nom du fichier *.bat sans le .bat
set NomIni=%~n0
echo INI%NomIni%
pause
rem definit la variable currentpath et recupere le chemin complet sans le *.bat
set currentpath=%~dp0
echo CU %currentpath%
pause
rem definit la variable monini et recupere le chemin complet + le nom du .bat avec l'extention .ini
set monini=%currentpath%%NomIni%
if exist %currentpath%%NomIni%.ini ( for /f "delims=" %%i in ('type %monini%') do set /a Compt+=1
echo FICHIER: %monini%
pause
) else (
 set ManqueIni=%currentpath%
 goto 8-GuiIni
 )
:6-MsgDroitAdmin
rem j'utilise le magnetophone de xp pour lire erreur.wav
SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
rem message d'alerte
MSGBOX.EXE "Vous devez exécuter IpChange en tant qu'administrateur." "IpChange_Alerte!"
pause
exit
:7-MsgNomCarte
rem j'utilise le magnetophone de xp pour lire erreur.wav
%currentpath%\SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
rem message d'alerte
%currentpath%\MSGBOX.EXE "Vous devez exécuter IpChange en tant qu'administrateur." "IpChange_Alerte!"
pause
exit
:8-GuiIni
rem j'utilise le magnetophone de xp pour lire erreur.wav
%currentpath%\SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
%currentpath%\AGRAF "%currentpath%\newIp6.bat" #Gui_1
::#Gui_1
::icon "%currentpath%\rj45.ico"
::Window "MarroIpChange" 340 240
::Button "Bannul" "Annuler" 230 160 75 23
::Button "Bok" "OK" 150 160 75 23
::Edit "carteR" "%Carte%" 170 120 140 21
::Text "Nom de la carte réseau:" 10 120 140 21
::Text "Controle du nom de la carte réseau.                              A modifier si ce n'est pas la bonne carte reseau ou si le nom est erroné." 20 70 280 42
::Edit "profile" "" 170 40 140 21
::Text "Nom du profile reseau:" 10 40 140 21
::Text "Configuration d'un nouveau profile réseau" 10 10 270 21
::#EndGui
IF "%Bok%"=="1"
ECHO vous avez choisi ok!
pause
IF "%Bannul%"=="1"
ECHO vous avez choisi Annuler
pause
if %profile%=="" ( goto rien )
else ( goto 8-GuiIni2 )
pause
exit
:rien
echo rien55555555555555555555555555ssssssssssssh
pause
exit
:8-GuiIni2
rem j'utilise le magnetophone de xp pour lire erreur.wav
%currentpath%\SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
%currentpath%\AGRAF "%currentpath%\newIp6.bat" #Gui_2
::#Gui_2
::icon "%currentpath%\rj45.ico"
::Window "MarroIpChange" 340 510
::Button "Button_25" "Annuler" 230 440 75 23
::Button "Button_24" "OK" 150 440 75 23
::Edit "Edit_23" "" 170 410 140 21
::Text "Serveur WINS:" 10 410 140 21
::Edit "Edit_21" "" 170 380 80 21
::Text "Métrique de l'interface" 10 380 140 21
::checkbox "Check_19" "Métrique automatique" "false" 30 350 280 21
::Edit "Edit_18" "192.168.0.254" 170 320 140 21
::Text "Serveur DNS suplémentaire:" 10 320 150 21
::Edit "Edit_16" "8.8.4.4" 170 290 140 21
::Text "Serveur DNS auxiliaire:" 10 290 140 21
::Edit "Edit_14" "8.8.8.8" 170 260 140 21
::Text "Serveur de DNS pr‚f‚r‚:" 10 260 140 21
::radio "Radio_12" "Utiliser l'adresse de serveur DNS suivante:" "true" 2 30 230 280 21
::radio "Radio_11" "Obtenir une adresse IP automatiquement" "false" 2 30 210 280 21
::Edit "Edit_10" "192.168.0.254" 170 180 140 21
::Text "Passerelle par défaut:" 10 180 140 21
::Edit "Edit_8" "255.255.255.0" 170 150 140 21
::Text "Masque de sous-réseau:" 10 150 140 21
::Edit "Edit_6" "192.168.0.10" 170 120 140 21
::radio "Radio_2" "Utiliser l'adresse IP suivante:" "false" 1 30 90 280 21
::radio "Radio_1" "Obtenir une adresse IP automatiquement" "true" 1 30 70 280 21
::Text "Adresse IP:" 10 120 140 21
::Edit "Edit_2" "%Carte%" 170 40 140 21
::Text "Nom de la carte reseau:" 10 40 140 21
::Text "Propriétés de connexion au réseau local TCP/IPv4." 10 10 270 21
::#EndGui
pause
exit


Bien sur c'est pas fini mais, normalement j'ai rassemblé toutes les commandes qu'il me faut pour fini.
Je poste ici car mes interrogations les plus importantes son surtout sur la bonne utilisation de agrafv2

J'utilise des commandes externe et je converti mon batch en exe au moyen de Bat_To_Exe_Converter.

J'expliquerais la finalité et le bon fonctionnement quand j'en aurais fini ..... surprise.

Voila, j’attends vos avis et si je dois déplacer ce poste pas de soucis dites le moi.

A bientôt




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
marro a écrit:
Bonsoir,

Je viens poster mon code pour avoir vos expertises, savoir si c'est bien codé, si je dois faire autrement ou si je peux continuer.

En gros ce code permet: de changer l'adresse IP d'une carte réseau.

Je vous laisse regarder:

Code:
@echo off
rem 1-   verif admin                              ==>      ok 2
rem 1-                                       ==>                  ko 6
rem 2-   nom de la carte reseau                     ==>         ok 3
rem 2-                                       ==>                     ko 7
rem 3-   verif de la presence du fichier ini            ==>            ok 4
rem 3-                                       ==>                        ko 8
rem 4-   verif carte reseau connecté                  ==>               ok 5
rem 4-                                       ==>                           ko 9
rem 5-   je change les parametres de la carte reseau   ==>                  ok 11
rem 5-                                       ==>                              ko 10
rem 6-   msg lancer en admin                        ==>                     ok 12
rem 7-   gui pour controler le nom de la carte reseau   ==>         ok 3
rem                                          ==>                                 ko 12
rem 8-   gui pour cree le fichier ini               ==>         ok 3
rem                                          ==>                                 ko 12
rem 9-   gui pour demander la connexion reseau         ==>            ok 4
rem                                          ==>                                 ko 12
rem 10-   gui probleme inattendu pas de changement      ==>                     ok 12
rem 11-   je joue le son ok                        ==>                        ok 13
rem                                          ==>                                    ko 13
rem 12-   je joue le son ko                        ==>                        ok 13
rem                                          ==>                                    ko 13
rem 13-   exit
rem ----------------------------------------------------------------------------------------------------------
@echo off
:1-TestAdmin
rem Test pour verifier que le script est bien lance en administrateur
fltmc >nul 2>&1 && ( goto 2-NomCarte ) || ( goto 6-MsgDroitAdmin )
:2-NomCarte
echo NomCarte
::je lis un ipconfig et je cherche "Ethernet_" mon delimitateur est ":" si je trouve je vais sur TestReseau
for /f "delims=:" %%a in ('ipconfig /all ^| find "Ethernet "')do call :2-NomCarteTest %%a
goto 7-MsgNomCarte
:2-NomCarteTest
set varR=%*
set Carte=%varR:Carte Ethernet =%
IF NOT "%Carte%" == "" ( goto 3-Ini )
IF %Carte% == "" ( goto 7-MsgNomCarte )
:3-Ini
echo Ini
rem recupere le nom du fichier *.bat sans le .bat
set NomIni=%~n0
echo INI%NomIni%
pause
rem definit la variable currentpath et recupere le chemin complet sans le *.bat
set currentpath=%~dp0
echo CU %currentpath%
pause
rem definit la variable monini et recupere le chemin complet + le nom du .bat avec l'extention .ini
set monini=%currentpath%%NomIni%
if exist %currentpath%%NomIni%.ini ( for /f "delims=" %%i in ('type %monini%') do set /a Compt+=1
echo FICHIER: %monini%
pause
) else (
 set ManqueIni=%currentpath%
 goto 8-GuiIni
 )
:6-MsgDroitAdmin
rem j'utilise le magnetophone de xp pour lire erreur.wav
SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
rem message d'alerte
MSGBOX.EXE "Vous devez exécuter IpChange en tant qu'administrateur." "IpChange_Alerte!"
pause
exit
:7-MsgNomCarte
rem j'utilise le magnetophone de xp pour lire erreur.wav
%currentpath%\SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
rem message d'alerte
%currentpath%\MSGBOX.EXE "Vous devez exécuter IpChange en tant qu'administrateur." "IpChange_Alerte!"
pause
exit
:8-GuiIni
rem j'utilise le magnetophone de xp pour lire erreur.wav
%currentpath%\SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
%currentpath%\AGRAF "%currentpath%\newIp6.bat" #Gui_1
::#Gui_1
::icon "%currentpath%\rj45.ico"
::Window "MarroIpChange" 340 240
::Button "Bannul" "Annuler" 230 160 75 23
::Button "Bok" "OK" 150 160 75 23
::Edit "carteR" "%Carte%" 170 120 140 21
::Text "Nom de la carte réseau:" 10 120 140 21
::Text "Controle du nom de la carte réseau.                              A modifier si ce n'est pas la bonne carte reseau ou si le nom est erroné." 20 70 280 42
::Edit "profile" "" 170 40 140 21
::Text "Nom du profile reseau:" 10 40 140 21
::Text "Configuration d'un nouveau profile réseau" 10 10 270 21
::#EndGui
IF "%Bok%"=="1"
ECHO vous avez choisi ok!
pause
IF "%Bannul%"=="1"
ECHO vous avez choisi Annuler
pause
if %profile%=="" ( goto rien )
else ( goto 8-GuiIni2 )
pause
exit
:rien
echo rien55555555555555555555555555ssssssssssssh
pause
exit
:8-GuiIni2
rem j'utilise le magnetophone de xp pour lire erreur.wav
%currentpath%\SNDREC32.EXE /play "%windir%\Media\windows hardware fail.wav" /embedding /close
%currentpath%\AGRAF "%currentpath%\newIp6.bat" #Gui_2
::#Gui_2
::icon "%currentpath%\rj45.ico"
::Window "MarroIpChange" 340 510
::Button "Button_25" "Annuler" 230 440 75 23
::Button "Button_24" "OK" 150 440 75 23
::Edit "Edit_23" "" 170 410 140 21
::Text "Serveur WINS:" 10 410 140 21
::Edit "Edit_21" "" 170 380 80 21
::Text "Métrique de l'interface" 10 380 140 21
::checkbox "Check_19" "Métrique automatique" "false" 30 350 280 21
::Edit "Edit_18" "192.168.0.254" 170 320 140 21
::Text "Serveur DNS suplémentaire:" 10 320 150 21
::Edit "Edit_16" "8.8.4.4" 170 290 140 21
::Text "Serveur DNS auxiliaire:" 10 290 140 21
::Edit "Edit_14" "8.8.8.8" 170 260 140 21
::Text "Serveur de DNS pr‚f‚r‚:" 10 260 140 21
::radio "Radio_12" "Utiliser l'adresse de serveur DNS suivante:" "true" 2 30 230 280 21
::radio "Radio_11" "Obtenir une adresse IP automatiquement" "false" 2 30 210 280 21
::Edit "Edit_10" "192.168.0.254" 170 180 140 21
::Text "Passerelle par défaut:" 10 180 140 21
::Edit "Edit_8" "255.255.255.0" 170 150 140 21
::Text "Masque de sous-réseau:" 10 150 140 21
::Edit "Edit_6" "192.168.0.10" 170 120 140 21
::radio "Radio_2" "Utiliser l'adresse IP suivante:" "false" 1 30 90 280 21
::radio "Radio_1" "Obtenir une adresse IP automatiquement" "true" 1 30 70 280 21
::Text "Adresse IP:" 10 120 140 21
::Edit "Edit_2" "%Carte%" 170 40 140 21
::Text "Nom de la carte reseau:" 10 40 140 21
::Text "Propriétés de connexion au réseau local TCP/IPv4." 10 10 270 21
::#EndGui
pause
exit


Bien sur c'est pas fini mais, normalement j'ai rassemblé toutes les commandes qu'il me faut pour fini.
Je poste ici car mes interrogations les plus importantes son surtout sur la bonne utilisation de agrafv2

J'utilise des commandes externe et je converti mon batch en exe au moyen de Bat_To_Exe_Converter.

J'expliquerais la finalité et le bon fonctionnement quand j'en aurais fini ..... surprise.

Voila, j’attends vos avis et si je dois déplacer ce poste pas de soucis dites le moi.

A bientôt
Pas de soucis mis à part qu'il faudrait avec des boutons d'une hauteur de 25, ça permettra d'éviter le découpages de textes dans le bouton.
Et AgrafV2 ne suit pas le même encodage que cmd, donc ça change ne change pas les ',' en 'é'.

Dans #Gui_2, le dernier "Text" n'est pas assez grand et donc, n'est pas complet (il faudrait mettre 300 et pas 270).

(pour information, j'ai testé les interfaces avec la version gtk de AgrafV2 sous linux)




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Merci pour ton retour je modifie et je continu.




______________________________________________________
La différence entre un optimiste et un pessimiste ? Aucune, mais il y en a 1 qui vit beaucoup mieux.
Visiter le site web du posteur
Répondre en citant
Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 
Bonjour,

je souhaiterais utiliser agrafv2 pour créer une interface d'un scrip en dos que j'ai fait.

Mais je ne comprends pas comment l'utiliser...

j'ai télécharger le binaire agrafv2.exe.

J'ai besoin d'un autre utilitaire, ou seulement l'appeler dans mon .bat ?

Merci



Message [C#][BETA]AgrafV2- Créateur d'interface graphique - TSnake41 


Montrer les messages depuis:
Répondre au sujet Page 2 sur 3
Aller à la page: <  1, 2, 3  >
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch