Jump to content

SWB

Members
  • Posts

    14
  • Joined

  • Last visited

SWB's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Thanks, It works great!
  2. #include <GUIConstants.au3> #include <GuiListView.au3> #include <Array.au3> #include <File.au3> Global $ListView7 Global $iniFile = @ScriptDir & ".\Config.ini" Global $scriptDir = @ScriptDir ; Main GUI $Form1 = GUICreate("Software Installer", 633, 451) $Tab1 = GUICtrlCreateTab(16, 8, 601, 377) $TabSheet1 = GUICtrlCreateTabItem("Audio/Video/Photo") $ListView1 = GUICtrlCreateListView("Software Name|Description", 24, 40, 582, 334) _GUICtrlListView_SetExtendedListViewStyle($ListView1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_GRIDLINES)) GUICtrlSendMsg(-1, 0x101E, 0, 200) GUICtrlSendMsg(-1, 0x101E, 1, 375) $TabSheet2 = GUICtrlCreateTabItem("Computer Maintenance") $ListView2 = GUICtrlCreateListView("Software Name|Description", 24, 40, 578, 334) _GUICtrlListView_SetExtendedListViewStyle($ListView2, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_GRIDLINES)) GUICtrlSendMsg(-1, 0x101E, 0, 200) GUICtrlSendMsg(-1, 0x101E, 1, 375) $TabSheet3 = GUICtrlCreateTabItem("Internet") $ListView3 = GUICtrlCreateListView("Software Name|Description", 24, 40, 578, 334) _GUICtrlListView_SetExtendedListViewStyle($ListView3, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_GRIDLINES)) GUICtrlSendMsg(-1, 0x101E, 0, 200) GUICtrlSendMsg(-1, 0x101E, 1, 375) $TabSheet4 = GUICtrlCreateTabItem("Games") $ListView4 = GUICtrlCreateListView("Software Name|Description", 24, 40, 578, 334) _GUICtrlListView_SetExtendedListViewStyle($ListView4, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_GRIDLINES)) GUICtrlSendMsg(-1, 0x101E, 0, 200) GUICtrlSendMsg(-1, 0x101E, 1, 375) $TabSheet5 = GUICtrlCreateTabItem("Miscellaneous") $ListView5 = GUICtrlCreateListView("Software Name|Description", 24, 40, 578, 334) _GUICtrlListView_SetExtendedListViewStyle($ListView5, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_GRIDLINES)) GUICtrlSendMsg(-1, 0x101E, 0, 200) GUICtrlSendMsg(-1, 0x101E, 1, 375) $TabSheet6 = GUICtrlCreateTabItem("Productivity") $ListView6 = GUICtrlCreateListView("Software Name|Description", 24, 40, 578, 334) _GUICtrlListView_SetExtendedListViewStyle($ListView6, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES, $LVS_EX_GRIDLINES)) GUICtrlSendMsg(-1, 0x101E, 0, 200) GUICtrlSendMsg(-1, 0x101E, 1, 375) GUICtrlCreateTabItem("") ; This ends the tab item creation $Button1 = GUICtrlCreateButton("Install Selected Software", 398, 395, 219, 25, 0) $MenuItem1 = GUICtrlCreateMenu("File") $MenuItem2 = GUICtrlCreateMenuItem("Unselect All", $MenuItem1) $MenuItem3 = GUICtrlCreateMenuItem("Exit", $MenuItem1) $MenuItem4 = GUICtrlCreateMenu("Help") $MenuItem5 = GUICtrlCreateMenuItem("Help Topics", $MenuItem4) $MenuItem6 = GUICtrlCreateMenuItem("About", $MenuItem4) _Populate() GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 _InstallSelectedSoftware() Case $MenuItem2 _UnselectAll() Case $MenuItem3 Exit Case $MenuItem5 _HelpTopics() Case $MenuItem6 _AboutProject() EndSwitch WEnd Func _Populate() ; Find all files in the Software folder and populate the tabs with the installers. $f = FileFindFirstFile("Software/*.*") Dim $array[1] $i = 0 Do $s = FileFindNextFile($f) If Not @error Then $array[$i] = $s $i += 1 ReDim $array[$i + 1] EndIf Until @error if $i = 0 Then Return 0 ReDim $array[$i] For $i = 1 To UBound($array) Step 1 $category = IniRead($iniFile, $array[$i - 1], "Category", "5") $desc = IniRead($iniFile, $array[$i - 1], "Desc", "") If $category = 1 Then GUICtrlCreateListViewItem($array[$i - 1] & "|" & $desc, $ListView1) ElseIf $category = 2 Then GUICtrlCreateListViewItem($array[$i - 1] & "|" & $desc, $ListView2) ElseIf $category = 3 Then GUICtrlCreateListViewItem($array[$i - 1] & "|" & $desc, $ListView3) ElseIf $category = 4 Then GUICtrlCreateListViewItem($array[$i - 1] & "|" & $desc, $ListView4) ElseIf $category = 6 Then GUICtrlCreateListViewItem($array[$i - 1] & "|" & $desc, $ListView6) Else GUICtrlCreateListViewItem($array[$i - 1] & "|" & $desc, $ListView5) EndIf Next EndFunc ;==>_Populate Func _InstallSelectedSoftware() Dim $sArray[1] ; Find which items were selected by user on all six tabs $count = _GUICtrlListView_GetItemCount($ListView1) $aCount = 0 For $i = 1 To $count Step 1 If _GUICtrlListView_GetItemChecked($ListView1, $i - 1) = True Then $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView1, $i - 1) ReDim $sArray[UBound($sArray) + 1] $aCount += 1 EndIf Next $count = _GUICtrlListView_GetItemCount($ListView2) For $i = 1 To $count Step 1 If _GUICtrlListView_GetItemChecked($ListView2, $i - 1) = True Then $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView2, $i - 1) ReDim $sArray[UBound($sArray) + 1] $aCount += 1 EndIf Next $count = _GUICtrlListView_GetItemCount($ListView3) For $i = 1 To $count Step 1 If _GUICtrlListView_GetItemChecked($ListView3, $i - 1) = True Then $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView3, $i - 1) ReDim $sArray[UBound($sArray) + 1] $aCount += 1 EndIf Next $count = _GUICtrlListView_GetItemCount($ListView4) For $i = 1 To $count Step 1 If _GUICtrlListView_GetItemChecked($ListView4, $i - 1) = True Then $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView4, $i - 1) ReDim $sArray[UBound($sArray) + 1] $aCount += 1 EndIf Next $count = _GUICtrlListView_GetItemCount($ListView5) For $i = 1 To $count Step 1 If _GUICtrlListView_GetItemChecked($ListView5, $i - 1) = True Then $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView5, $i - 1) ReDim $sArray[UBound($sArray) + 1] $aCount += 1 EndIf Next $count = _GUICtrlListView_GetItemCount($ListView6) For $i = 1 To $count Step 1 If _GUICtrlListView_GetItemChecked($ListView6, $i - 1) = True Then $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView6, $i - 1) ReDim $sArray[UBound($sArray) + 1] $aCount += 1 EndIf Next ; Begin installing selected software ProgressOn("Software Installer", "Installing", "", -1, -1, 16) For $i = 1 To UBound($sArray) - 1 Step 1 $fileName = $sArray[$i - 1] $switch = IniRead($iniFile, $fileName, "Switch", "") Local $szDrive, $szDir, $szFName, $szExt $extension = StringRight($fileName, 3) If $extension = "msi" Then Run("msiexec /i " & '"' & $scriptDir & "Software" & $fileName & '" ' & $switch) ; For MSI type installers Else RunWait('"' & $scriptDir & "Software" & $fileName & '"' & " " & $switch) ; For EXE installers EndIf ProgressSet($i / (UBound($sArray) - 1) * 100, Round($i / (UBound($sArray) - 1) * 100, 0) & "%", "Installing " & $i & " of " & UBound($sArray) - 1) Next ProgressOff() EndFunc ;==>_InstallSelectedSoftware Func _UnselectAll() $count = _GUICtrlListView_GetItemCount($ListView1) For $i = 1 To $count Step 1 _GUICtrlListView_SetItemChecked($ListView1, $i - 1, False) Next $count = _GUICtrlListView_GetItemCount($ListView2) For $i = 1 To $count Step 1 _GUICtrlListView_SetItemChecked($ListView2, $i - 1, False) Next $count = _GUICtrlListView_GetItemCount($ListView3) For $i = 1 To $count Step 1 _GUICtrlListView_SetItemChecked($ListView3, $i - 1, False) Next $count = _GUICtrlListView_GetItemCount($ListView4) For $i = 1 To $count Step 1 _GUICtrlListView_SetItemChecked($ListView4, $i - 1, False) Next $count = _GUICtrlListView_GetItemCount($ListView5) For $i = 1 To $count Step 1 _GUICtrlListView_SetItemChecked($ListView5, $i - 1, False) Next $count = _GUICtrlListView_GetItemCount($ListView6) For $i = 1 To $count Step 1 _GUICtrlListView_SetItemChecked($ListView6, $i - 1, False) Next EndFunc ;==>_UnselectAll Func _HelpTopics() $Form2 = GUICreate("Help Topics", 633, 447) $Label1 = GUICtrlCreateLabel("", 8, 16, 612, 425) GUICtrlSetData(-1, "This program uses silent switches to install software without user interaction. To use this functionality, you can edit the Config.ini file to add software and their switches. Example: " & @CRLF & @CRLF & "[7zip.exe]" & @CRLF & "Switch=/S" & @CRLF & "Desc=A zip file utility" & @CRLF & "Category=5" & @CRLF & @CRLF & "The name of the file is the first line in the brackets. The line with Switch= is the section for the unattended switch. The Desc= is the description for the program. The Category= is the tab you want the program to show up on the interface." & @CRLF & @CRLF & "Here are some common switches for various installers:" & @CRLF & @CRLF & "/silent used for Inno Setup installers" & @CRLF & "/verysilent used for Inno Setup installers" & @CRLF & "/S used for Nullsoft (aka NSIS) installers" & @CRLF & "/s used for Wise installers" & @CRLF & "-s used for Ghost installers" & @CRLF & "-ms used for Mozilla installers" & @CRLF & "/quiet used for Microsoft installers" & @CRLF & "/qb used for Microsoft installers" & @CRLF & "/qn used for Microsoft installers" & @CRLF & "/passive used for Microsoft installers" & @CRLF & "/Q used for Microsoft installers" & @CRLF & @CRLF & "Note: Some installers are case sensitive (Ghost and Nullsoft for sure).") GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form2) ExitLoop EndSwitch WEnd EndFunc ;==>_HelpTopics Func _AboutProject() $Form3 = GUICreate("About", 413, 196) $Label1a = GUICtrlCreateLabel("", 24, 64, 364, 113) $Label2a = GUICtrlCreateLabel("Software Installer 1.0", 24, 8, 375, 41) GUICtrlSetFont(-1, 24, 800, 2, "MS Sans Serif") GUICtrlSetColor(-1, 0x000080) GUISetState(@SW_SHOW) $aboutData = "This program was written|in a programming language called Autoit||Brought to you by abberration" $sData = StringSplit($aboutData, "|", 2) $string = "" For $i = 1 To UBound($sData) Step 1 $string = $string & @CRLF & $sData[$i - 1] & @CRLF GUICtrlSetData($Label1a, $string) Sleep(1000) Next While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form3) ExitLoop EndSwitch WEnd EndFunc ;==>_AboutProject
  3. Run("msiexec /i " & '"' & $scriptDir & "Software" & $fileName & '" ' & $switch) ; For MSI type installers RunWait('"' & $scriptDir & "Software" & $fileName & '"' & " " & $switch) ; For EXE installers These 2 lines don't seem to work as written, when executed a box just flashes real fast and nothing happens. Can anybody see whats wrong with this, stumped.
  4. I prefer WinRAR at this point in time btw copyright for WinRAR 1993, 7-Zip copyright 1999. Thanks, though for the info.
  5. I need to achive this:> C:File.rar with this line:> RunWait(@ComSpec & " /k " & "'C:Program FilesWinRARRar.exe a -av -m5 -o+ -r -sfx'" & '' & GUICtrlRead($Archive) & '' & GUICtrlRead($Name) & '' & '.rar') I have tried every combination, and even moving the .rar to different locations in the line, and I'm pulling my hair out trying to figure this out. The GUI part is working, it brings up the rar cmd window, but either sits there or gives an error: The filename, directory name, or volume label syntax is incorrect., depending on how things are changed. Thanks, #include <GUIConstantsEx.au3> Opt('MustDeclareVars', 1) ;Global $Program = "C:Program FilesWinRAR" Dim $msg, $fsf Dim $guiHandle = GUICreate("RAR", 200, 135) GUICtrlCreateLabel('Name of RAR:' , 5, 5, 190) Dim $Name = GUICtrlCreateInput("", 5, 20, 165) GUICtrlCreateLabel('Archive File:' , 5, 50, 190) Dim $Archive = GUICtrlCreateInput("", 5, 65, 165) Dim $Folder = GUICtrlCreateButton( '...', 170, 65, 25, 22) Dim $rarbutton = GUICtrlCreateButton("Run RAR", 5, 108, 75) Dim $exitbutton = GUICtrlCreateButton("Exit", 120, 108, 75) GUISetState(@SW_SHOW, $guiHandle ) While 1 $msg = GUIGetMsg($guiHandle ) Select Case $msg == $GUI_EVENT_CLOSE Or $msg = $exitbutton Exit Case $msg == $Folder $fsf = FileSelectFolder('Choose Folder to Archive', '') If Not @error Then GUICtrlSetData($Archive, $fsf) Case $msg == $rarbutton RunWait(@ComSpec & " /k " & "'C:Program FilesWinRARRar.exe a -av -m5 -o+ -r -sfx'" & '' & GUICtrlRead($Archive) & '' & GUICtrlRead($Name) & '' & '.rar') Case Default EndSelect WEnd
  6. The GUI opens the RAR CMD window but it just sits there and does nothing, blinking cursor. Thanks
  7. I did this small GUI for my own use for WinRAR, When I go to run it, the script errors out, no matter what I try, what am I doing wrong? Script is attached. This is uses a command line in the script. Thanks, #include <GUIConstantsEx.au3> Opt('MustDeclareVars', 1) Global $Program = 'C:Program FilesWinRAR' Dim $msg, $fsf Dim $guiHandle = GUICreate("RAR", 200, 135) GUICtrlCreateLabel('Name of RAR:' , 5, 5, 190) Dim $Name = GUICtrlCreateInput("", 5, 20, 165) GUICtrlCreateLabel('Archive File:' , 5, 50, 190) Dim $Arc = GUICtrlCreateInput("", 5, 65, 165) Dim $Folder = GUICtrlCreateButton( '...', 170, 65, 25, 22) Dim $rarbutton = GUICtrlCreateButton("Run RAR", 5, 108, 75) Dim $exitbutton = GUICtrlCreateButton("Exit", 120, 108, 75) GUISetState(@SW_SHOW, $guiHandle ) While 1 $msg = GUIGetMsg($guiHandle ) Select Case $msg == $GUI_EVENT_CLOSE Or $msg = $exitbutton Exit Case $msg == $Folder $fsf = FileSelectFolder('Choose Folder to Archive','') If Not @error Then GUICtrlSetData($Arc, $fsf) Case $msg == $rarbutton RunWait($Program & 'Rar.exe a -av -m5 -o+ -r -sfx' & GUICtrlRead($Name) & '.rar' & '' & GUICtrlRead($Arc) Case Default EndSelect WEnd RAR.au3
  8. RAR.au3 It still gives me an error: C:\Documents and Settings\Owner\Desktop\DVDFAB Command-Line\DVDFab\SCRIPTS\DVDFAB MAIN MOVIE ISO MODE\RAR.au3(27,105) : WARNING: $Archive: possibly used before declaration. RunWait(@ComSpec & " /k Start RAR a -av -m5 -o+ -r -sfx "& '\' & '" archive "' & GUICtrlRead($Archive) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\Owner\Desktop\DVDFAB Command-Line\DVDFab\SCRIPTS\DVDFAB MAIN MOVIE ISO MODE\RAR.au3(27,108) : ERROR: syntax error RunWait(@ComSpec & " /k Start RAR a -av -m5 -o+ -r -sfx "& '\' & '" archive "' & GUICtrlRead($Archive)) & ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\Owner\Desktop\DVDFAB Command-Line\DVDFab\SCRIPTS\DVDFAB MAIN MOVIE ISO MODE\RAR.au3(27,142) : ERROR: Object method or attribute accessed without 'With'. RunWait(@ComSpec & " /k Start RAR a -av -m5 -o+ -r -sfx "& '\' & '" archive "' & GUICtrlRead($Archive)) & ' \' & GUICtrlRead($Name) & .rar) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\Owner\Desktop\DVDFAB Command-Line\DVDFab\SCRIPTS\DVDFAB MAIN MOVIE ISO MODE\RAR.au3(27,142) : ERROR: syntax error RunWait(@ComSpec & " /k Start RAR a -av -m5 -o+ -r -sfx "& '\' & '" archive "' & GUICtrlRead($Archive)) & ' \' & GUICtrlRead($Name) & .rar) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\Documents and Settings\Owner\Desktop\DVDFAB Command-Line\DVDFab\SCRIPTS\DVDFAB MAIN MOVIE ISO MODE\RAR.au3(27,105) : ERROR: $Archive: undeclared global variable. RunWait(@ComSpec & " /k Start RAR a -av -m5 -o+ -r -sfx "& '\' & '" archive "' & GUICtrlRead($Archive)
  9. Can't get this to run, please help. Thanks, SWB #include <GUIConstantsEx.au3> Opt('MustDeclareVars', 1) ;Global $Program = 'C:\Program Files\WinRAR' Dim $msg, $fsf Dim $guiHandle = GUICreate("RAR", 200, 135) GUICtrlCreateLabel('Archive:' , 5, 5, 190) Dim $Archive = GUICtrlCreateInput("", 5, 20, 165) Dim $Folder = GUICtrlCreateButton( '...', 170, 19, 25, 22) GUICtrlCreateLabel('Name:' , 5, 50, 190) Dim $Name = GUICtrlCreateInput("", 5, 65, 190) Dim $rarbutton = GUICtrlCreateButton("Run RAR", 5, 108, 75) Dim $exitbutton = GUICtrlCreateButton("Exit", 120, 108, 75) GUISetState(@SW_SHOW, $guiHandle ) While 1 $msg = GUIGetMsg($guiHandle ) Select Case $msg == $GUI_EVENT_CLOSE Or $msg = $exitbutton Exit Case $msg == $Folder $fsf = FileSelectFolder('Choose Folder to Archive','') If Not @error Then GUICtrlSetData($Archive, $fsf) Case $msg == $rarbutton RunWait(@COMSPEC & " /k Start RAR a -av -m5 -o+ -r -sfx & '\' "' archive "' & GUICtrlRead($Archive))'" & '\' & GUICtrlRead($Name) & .rar"')) Case Default EndSelect WEnd
  10. Thank You, that did it! SWB
  11. I'm only able to get one of these exe to run, what's wrong? Thanks, Opt('MustDeclareVars', 1) Global $Program = 'C:\Program Files\SlySoft\AnyDVD' Global $Program = 'C:\Program Files\DVD Decrypter' ; Prompt the user to run the script - use a Yes/No prompt Local $answer = MsgBox(4, "DVDDecrypter", "Run DVDDecrypter On Drive G: In File Mode, DeCrypt All Files") ; Check the user's answer to the prompt ; If "No" was clicked (7) then exit the script If $answer = 7 Then MsgBox(0, "AutoIt", "OK. Bye!") Exit EndIf RunWait($Program & '\AnyDVD.exe'); Starts AnyDVD, Reads Disc Sleep (20000); Waits 20 Seconds, giving AnyDVD time to read disc Run("REGEDIT /S C:\reg\AnyDVDec.reg");Setup AnyDVD and DVDDecrypter ;with the decryption processing being handled by AnyDVD Sleep (5000); Waits 5 seconds, before starting DVDDecrypter RunWait($Program & '\DVDDecrypter.exe /SRC G: /MODE FILE /FILES ALL /CLOSE') Run("REGEDIT /S C:\reg\DVDecDef.reg");Set DVDDecrypter back to default settings Exit
  12. I Thank You, This what I was looking for, short and sweet, I guess I took the long way around. What I was doing was trying to read from the inputbox, which doesn't look like you can do, Thanks Again, Regards' SWB
  13. I get this as output %DEST%%SHOW% (%YEAR%)%SHOW% (%YEAR%).ISO From this: #cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.8.1 Author: Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ;Script Start - Add your code below here $answer = InputBox("Question", "What Is The Film Destination?","C:Movies", "") $filmyear = InputBox("Film Year", "Please Enter The Film Year") $filmname = InputBox("Film Name", "Please Enter The Film Name") #include <GUIConstantsEx.au3> Opt('MustDeclareVars', 1) Dim $msg Dim $guiHandle = GUICreate("Run DVDFAB", 200, 60) Dim $blurbLabel = GUICtrlCreateLabel("Enter Your Choice", 5, 5) Dim $dvdfabbutton = GUICtrlCreateButton("Run DVDFab", 5, 30, 75) Dim $exitbutton = GUICtrlCreateButton("Exit", 120, 30, 75) GUISetState(@SW_SHOW, $guiHandle ) While 1 $msg = GUIGetMsg($guiHandle ) Select Case $msg == $GUI_EVENT_CLOSE Or $msg = $exitbutton Exit Case $msg == $dvdfabbutton ;do dvdfab ;******************************************************************** ;RunWait(@COMSPEC & " /c Start fabisog.exe") ; THIS WORKS ;******************************************************************** ;ShellExecuteWait("fabisog.exe") ; THIS WORKS ;******************************************************************** RunWait('"C:Program FilesDVDFab 8 QtDVDFab.exe" /mode "mainmovie" /src "g:" /dest "%dest%%show% (%year%)%show% (%year%).iso" /DISPLAYFORCEDSUB "Yes" /Title "auto" /removemenu "yes" /removepgc "yes" /outdisc "dvd5" /close"') ; THIS WORKS MsgBox(0,"Debug","Program is done!") ;RunWait("fabisog.exe") ; THIS WORKS ;MsgBox(0,"Debug","Program is done!") ;******************************************************************** ;RunWait(@COMSPEC & " /c Start fabisog.exe") ; THIS WORKS ;******************************************************************** ;RunWait("fabisog.exe") ; THIS WORKS ;MsgBox(0,"Debug","Program is done!") ;******************************************************************** Case Default EndSelect WEnd I want to end up wih this D:MOVIESMURDER BY DEATH (1980)MURDER_BY_DEATH.ISO Thanks,
  14. I've been running this batch program from autoit, which runs fine but, want to run completely from autoit. RUN DVDFAB IN ISO MODE (G).txt
×
×
  • Create New...