[R] Problème pour Créer ISO avec mkisofs

#1

Bonjour a tous,voilà le code: je m'explique ensuite:

► Afficher le texte

 #include <GUIConstants.au3> 
If Not FileExists ( @AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\CréateurISO.lnk" ) Then 
FileCreateShortcut ( @ScriptDir & "\CréateurISO.exe" , @AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\CréateurISO.lnk" , @ScriptDir , "" , "Créer une iso a partir d'un dossier" , @ScriptDir & "\CréateurISO.exe" , "" , "0" , @SW_MINIMIZE ) 
EndIf 
If Not FileExists ( "cygwin1.dll" ) Then 
Exit 
EndIf 
Dim $ChoixDossier 
$CreateurISO = GUICreate ( "CréateurISO" , 330 , 105 , - 1 , - 1 , $WS_OVERLAPPEDWINDOW ) 
GUICtrlSetFont ( - 1 , 20 , 400 , 0 , "Arial" ) 
GUISetIcon ( @SystemDir & "\shell32.dll" , 66 ) 
; dossier source 
GUICtrlCreateLabel ( "Dossier Source :" , 5 , 13 , 80 , 25 ) 
$InputDossierSource = GUICtrlCreateInput ( "" , 90 , 10 , 200 , 20 , - 1 , $WS_EX_CLIENTEDGE ) 
$BouttonDossierSource = GUICtrlCreateButton ( "..." , 298 , 9 , 25 , 20 ) 
; Nom de l'image 
GUICtrlCreateLabel ( "Nom de l'image :" , 5 , 43 , 157 , 25 ) 
$InputNomdelimage = GUICtrlCreateInput ( "" , 90 , 40 , 200 , 20 , - 1 , $WS_EX_CLIENTEDGE ) 
$BouttonNomdelimage = GUICtrlCreateButton ( "..." , 298 , 39 , 25 , 20 ) 
; Créer l'ISO 
$BouttonCreerlISO = GUICtrlCreateButton ( "Créer l'ISO" , 5 , 70 , 320 , 30 ) 
GUICtrlSetState ( - 1 , $gui_disable ) 
If FileExists ( "mkisofs.exe" ) Then 
GUICtrlSetState ( $BouttonCreerlISO , $gui_enable ) 
EndIf 
GUISetState ( @SW_SHOW ) 
While 1 
$msg = GUIGetMsg ( ) 
Select 
; Boutton Dossier Source 
Case $msg = $BouttonDossierSource 
choisissezledossiersources ( ) 
; Boutton Nom de l'image 
Case $msg = $BouttonNomdelimage 
choisissezledossiersorti ( ) 
; Boutton Créer l'ISO 
Case $msg = $BouttonCreerlISO 
RunWait ( @ScriptDir & '\mkisofs.exe - o "test.iso" "' & $ChoixDossier ) 
Case $msg = $GUI_EVENT_CLOSE 
ExitLoop 
EndSelect 
WEnd 
; Choisissez le dossier Sources 
Func choisissezledossiersources ( ) 
$ChoixDossier = FileSelectFolder ( "Choisissez le dossier Sources" , "" ) 
If StringRight ( $ChoixDossier , 3 ) == "" Then 
MsgBox ( 4096 , "" , "Vous n'avez pas choisi le dossier source" , 5 ) 
Else 
GUICtrlSetData ( $InputDossierSource , $ChoixDossier ) 
EndIf 
EndFunc 
; Choisissez le dossier Sorti 
Func choisissezledossiersorti ( ) 
$ChoixNomdelimage = FileSaveDialog ( "Choisissez le dossier Sorti" , @DesktopDir , "Images disques ( *.iso ) " , 2 ) 
If StringRight ( $ChoixNomdelimage , 4 ) == "" Then 
MsgBox ( 4096 , "" , "Vous n'avez pas choisi le dossier de sorti" , 5 ) 
Else 
GUICtrlSetData ( $InputNomdelimage , $ChoixNomdelimage & ".iso" ) 
EndIf 
EndFunc

Mon Probleme se situe au niveau du Runwait,ou je n'arrive pas a incorporer la variable $ChoixNomdelimage pour que mon emplacement soit prit en compte et chaque test,j'ai une erreur..
le fichier peu etre trouver ici( http://www.linux-france.org/article/graver_linux.html , http://severinterrier.free.fr/Boot/CD-MultiBoot.htm ou http://wii2.fr/index.php?p=223&s=emulateur_sur_wii)

Merci de votre aide...

#2

bizarr

tu indique dans le runwait et dans la selection du répertoire test.iso (ce qui donne deux fois erreur), je m'etonne de voir çà, vu ce qui me fut envoyé

indique le dim image

RunWait ( @ScriptDir & '\mkisofs.exe - o "test.iso" "' & $ChoixDossier )

y a un quote qui se balade pour rien il ne trouve pas son double :p

RunWait ( @ScriptDir & '\mkisofs.exe - o "test.iso" "' & $ChoixDossier & '"')

--Erreur mkisofts--
Dans les paramètres il se peut que ton chemin fasse plus de 64caractère ? 16 cacact§re pour le nom de l'image ? il faut donc ajouter les paramètres ..

Ani observe :: en utilisant le filesavedialog avec cette info, la selection du filtre et en caractère Nippon chez vous aussi ?
BUG ou .... merci

FileSaveDialog("","","","exe","softname")

super j'ai le hell32.dll

?

#3

Hello,toujours un pb,je test,farfouille,retourne etc... c la kata..

#4

Je vais récapituller tout ça:

sans variable,comme ce qui suit sa fonctionne impécable:

RunWait ( 'mkisofs.exe - o "C:\Documents and Settings\All Users\Bureau\gggg.iso" "F:\Devis"' )

Avec une seul variable,celle du choix du dossier,sa marche aussi:

RunWait ( @ScriptDir & '\mkisofs.exe - o "test.iso" "' & $ChoixDossier )

Mais je bug pour la 2ème variable...

Merci de votre aide

#5

Est-ce que ceci fonctionne ?

Code : Tout sélectionner

RunWait ( @ScriptDir & '\mkisofs.exe - o ' & '"' & $ChoixNomdelimage & '" ' & '"' & $ChoixDossier & '"')

#6

on ne me lit même pas

triste monde..

#7

ani a écrit :on ne me lit même pas

Si Si mon pauvre ani

Si tu fait référence à : FileSaveDialog("","","","exe","softname")
La ligne devrait être : FileSaveDialog("","","Executable (*.exe)","softname")

Je ne vois aucun bug.

#8

ok, mais ne je parlais pas de çà, mais bon,
pour la fonction je la connait, peut etre ma version au3 qui bug, j'ai fait un screen du combobox et c'est bien la première fois que je rencontre çà, j'ai déjà vu des bizarerie mais là c'est le hell qui ma tué ^^" .