Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 10/18/2017 in Posts

  1. jchd

    Arrays with StringRegExp

    Would this work for you? ; Imagery Extent Local $ImageryExtent = "ImageryExtent.txt" ; Read the current file Local $sInput = FileRead($ImageryExtent) If @error Then MsgBox($MB_SYSTEMMODAL, "", "There was an error reading the file. @error: " & @error) Else Local $sResult = StringRegExpReplace($sInput, "(?im)XMin: (-?\d+\.\d+), YMin: (-?\d+\.\d+)\RXMax: (-?\d+\.\d+), YMax: (-?\d+\.\d+)\R", _ '{"xmin";$1,"ymin":$2,"xmax":$3,"ymax":$4,"spatialReference":{"wkid":26917}}') ConsoleWrite($sResult & @LF) ; optional visual check ; write results to file Local $hOut = FileOpen("Results.txt", $FO_OVERWRITE) FileWrite($hOut, $sResult) FileClose($hOut) EndIf
    2 points
  2. Thanks. I didn't realize that the JSON Arrays were "just arrays." Solution provided below for others. #Include "JSon.au3" Local $Json = '{"name":"John","cars":[ "Ford", "BMW", "Fiat", "Chevy" ]}' ;Correctly returns a count of 2 elements (name and cars) Local $Obj = JSon_Decode($Json) ConsoleWrite("count root: " & Json_ObjGetCount($Obj) & @CRLF) ;Returns error Variable must be of type "Object" ;Local $Cars = Json_ObjGet($Obj, '["cars"][0]') ;ConsoleWrite("count cars: " & Json_ObjGetCount($aCars) & @CRLF) ;Solution from TheDcoder Local $aCars = Json_Get($Obj, '["cars"]') ConsoleWrite("count cars: " & UBound($aCars) & @CRLF) ;Walking the array For $iCurrentCar = 0 To UBound($aCars) - 1 ;zero-based array ConsoleWrite("Car '" & $iCurrentCar & "' of '" & UBound($aCars) & "' is '" & _ Json_Get($Obj, '["cars"][' & $iCurrentCar & ']') & "'" & @CRLF) Next
    1 point
  3. I'm not sure that is possible. The background image information is stored in the registry. So unless you're just swapping files and restarting Explorer.exe, there's no way to make it permanent.
    1 point
  4. 1 point
  5. @Belini, I don't either know how this works, I came across this snippets and thought this might help you. I know a bit how Bassdll udf works but I don't know all the ins and outs of it.
    1 point
  6. Anticipating Errors : "Any program that accepts data from a user must include code to validate that data before sending it to the data store. You cannot rely on the data store, ...., or even your programming language to notify you of problems. You must check every byte entered by your users, making sure that data is the correct type for its field and that required fields are not empty."
    1 point
  7. I think you're still missing my point. We volunteer time and explanations where and when we are willing and able to provide it, but you cannot expect people to solve your problems for you. Please DO NOT send me credentials; I will NOT engage with your machine personally; that's up to you.
    1 point
  8. @sabrinisalerno: Please do NOT send me your login credentials; I'm not going to spend time engaging with your machine, I merely shared some suggestions so you can work out your own solution to your problem.
    1 point
  9. I've seen this problem before - control click as far as I know can't interact with a remote desktop session. The only way around it I know of is you have to have a client server arrangement that will send commands to the RDS and inside that the client running on the RDS will send the controlclick. I hope that makes sense
    1 point
  10. AndreyS, This link might interest you. Follow the links inside for various solutions. kylomas
    1 point
  11. Bert

    MsgBox Timeout Limits

    You didn't answer his question (you just stated your problem again) so let me ask it in a different way - what is the intent of the script, not just the problem you have with the script?
    1 point
  12. @Decibel Use Ubound($aCars) to get count of an array.
    1 point
  13. water

    Active Directory UDF

    I have converted and extended the adfunctions.au3 written by Jonathan Clelland to a full AutoIt UDF including help file, examples, ScITE integration etc. The example scripts should run fine without changes. 2016-08-18: Version: 1.4.6.0 As always: Please test before using in production! KNOWN BUGS: (Last changed: ) None AD 1.4.6.0.zip For AutoIt >= 3.3.12.0 AD 1.4.0.0.zip other versions of AutoIt
    1 point
  14. robertcollier4, Like this perhaps: #include <GUIConstantsEx.au3> #include <WinAPI.au3> Opt("GUIOnEventMode", 1) $hGUI = GUICreate("Test", 500, 500) GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") $cListView = GUICtrlCreateListView("Item List", 10, 10, 300, 300) $hLV = GUICtrlGetHandle($cListView) For $i = 1 To 10 GUICtrlCreateListViewItem("Item " & $i, $cListView) Next $cInPut = GUICtrlCreateInput("", 10, 400, 200, 20) $cEnter_Dummy = GUICtrlCreateDummy() GUICtrlSetOnEvent(-1, "_Enter") GUISetState() Local $aAccelKeys[1][2] = [["{ENTER}", $cEnter_Dummy]] GUISetAccelerators($aAccelKeys) While 1 Sleep(10) WEnd Func _Exit() Exit EndFunc Func _Enter() If _WinAPI_GetFocus() = $hLV Then MsgBox(0, "Hi", "Enter pressed in ListView") EndIf EndFunc M23
    1 point
×
×
  • Create New...