Sign in to follow this  
Followers 0
faustf

dirmove and dricopy dont go

10 posts in this topic

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

Share this post


Link to post
Share on other sites



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  :(

Share this post


Link to post
Share on other sites

 

$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.

Share this post


Link to post
Share on other sites

also withrequireadmin  dont  go :(

Share this post


Link to post
Share on other sites

#5 ·  Posted (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 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.

Share this post


Link to post
Share on other sites

$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)

_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_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 parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 04/09/2015

Share this post


Link to post
Share on other sites

#7 ·  Posted (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 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

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites

kylomas

you are the bosss  :)  thankz at all go perfect :))

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0