faustf Posted May 19, 2013 Share Posted May 19, 2013 hi guy i try to use dir move but dont go Func _Cancella_anagrafica() $prodamag = _GUICtrlListView_GetItemCount($List1AC) $controlmag = $prodamag $j = 0 Do $H = _GUICtrlListView_GetItemChecked($List1AC, $prodamag) Select Case $H = "true" _GUICtrlListView_SetItemSelected($List1AC, $prodamag) $aItem = _GUICtrlListView_GetItemTextArray($List1AC, $prodamag) Local $dest_folder_cliente = IniRead(@ScriptDir&"\Config.ini", "GlobalConfig", "key1", "NotFound") ;ShellExecute($dest_folder_cliente&"\"&$aItem[1]&"_"&$aItem[8]) DirMove($dest_folder_cliente&"\"&$aItem[1]&"_"&$aItem[8], $dest_folder_cliente&"\Eliminati") ShellExecute($dest_folder_cliente&"\Eliminati") EndSelect $prodamag = $prodamag - 1 $j = $j + 1 Until $j = $controlmag EndFunc Link to comment Share on other sites More sharing options...
faustf Posted May 19, 2013 Author Share Posted May 19, 2013 i tryed also in this mode Func _Cancella_anagrafica() $prodamag = _GUICtrlListView_GetItemCount($List1AC) $controlmag = $prodamag $j = 0 Do $H = _GUICtrlListView_GetItemChecked($List1AC, $prodamag) Select Case $H = "true" _GUICtrlListView_SetItemSelected($List1AC, $prodamag) $aItem = _GUICtrlListView_GetItemTextArray($List1AC, $prodamag) Local $dest_folder_cliente = IniRead(@ScriptDir&"\Config.ini", "GlobalConfig", "key1", "NotFound") ;ShellExecute($dest_folder_cliente&"\"&$aItem[1]&"_"&$aItem[8]) Local $source =String($dest_folder_cliente&"\"&$aItem[1]&"_"&$aItem[8]) Local $destination =String($dest_folder_cliente&"\Eliminati") Local $Ris=DirMove($source,$destination ) MsgBox(0,'',$ris) MsgBox(0,'',$source) MsgBox(0,'',$destination) EndSelect $prodamag = $prodamag - 1 $j = $j + 1 Until $j = $controlmag EndFunc $source is correct also destination but $ris give me always 0 Link to comment Share on other sites More sharing options...
PhoenixXL Posted May 20, 2013 Share Posted May 20, 2013 $source is correct also destination but $ris give me always 0 In that case you might not be having access over the destination folder, try to get the permission through UAC using a #requireadmin statement at the top of your script. If this doesn't help post the working script so that we can find out where the problem might be My code: PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners. MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression. Link to comment Share on other sites More sharing options...
faustf Posted May 20, 2013 Author Share Posted May 20, 2013 also withrequireadmin dont go Link to comment Share on other sites More sharing options...
PhoenixXL Posted May 20, 2013 Share Posted May 20, 2013 (edited) can you try changing the directory, for example copy/move a dir in the next level of your scriptdir to your scriptdir. Please post working code. Edited May 20, 2013 by PhoenixXL My code: PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners. MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression. Link to comment Share on other sites More sharing options...
guinness Posted May 20, 2013 Share Posted May 20, 2013 $H returns True not 'True'. #include <Constants.au3> ; This works, but I wouldn't rely on it. MsgBox($MB_SYSTEMMODAL, '', 'True' = True) MsgBox($MB_SYSTEMMODAL, '', 'True' == True) UDF List: _AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _ArrayFilter/_ArrayReduce • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples... Updated: 22/04/2018 Link to comment Share on other sites More sharing options...
kylomas Posted May 20, 2013 Share Posted May 20, 2013 (edited) faustf, If the destination dir exists then use flag = 1. Be advised that the source dir is deleted and if the destination dir exists the source dir will be added to the destination dir. kylomas Edited May 20, 2013 by kylomas Forum Rules Procedure for posting code "I like pigs. Dogs look up to us. Cats look down on us. Pigs treat us as equals." - Sir Winston Churchill Link to comment Share on other sites More sharing options...
faustf Posted May 20, 2013 Author Share Posted May 20, 2013 also in this mode thesame result Func _Cancella_anagrafica() $prodamag = _GUICtrlListView_GetItemCount($List1AC) $controlmag = $prodamag $j = 0 Do $H = _GUICtrlListView_GetItemChecked($List1AC, $prodamag) Select Case $H = "true" _GUICtrlListView_SetItemSelected($List1AC, $prodamag) $aItem = _GUICtrlListView_GetItemTextArray($List1AC, $prodamag) Local $dest_folder_cliente = IniRead(@ScriptDir&"\Config.ini", "GlobalConfig", "key1", "NotFound") ;ShellExecute($dest_folder_cliente&"\"&$aItem[1]&"_"&$aItem[8]) ;Local $source =String($dest_folder_cliente&"\"&$aItem[1]&"_"&$aItem[8]) ;Local $destination =String($dest_folder_cliente&"\Eliminati") Local $Ris=DirMove('c:\test','c:\test1' ) ;MsgBox(0,'',$ris) ;MsgBox(0,'',$source) ;MsgBox(0,'',$destination) ; ShellExecute($dest_folder_cliente&"\Eliminati") ShellExecute('c:\test') EndSelect $prodamag = $prodamag - 1 $j = $j + 1 Until $j = $controlmag EndFunc Link to comment Share on other sites More sharing options...
faustf Posted May 20, 2013 Author Share Posted May 20, 2013 kylomas you are the bosss thankz at all go perfect ) Link to comment Share on other sites More sharing options...
kylomas Posted May 20, 2013 Share Posted May 20, 2013 you are the bosss Then I quit.... Forum Rules Procedure for posting code "I like pigs. Dogs look up to us. Cats look down on us. Pigs treat us as equals." - Sir Winston Churchill Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now