Jump to content

Broadcastic

Active Members
  • Posts

    30
  • Joined

  • Last visited

Everything posted by Broadcastic

  1. Anyone has updated version of Imgur uploader? Looks like they updated API and old UDF does not work. Thanks in advance
  2. Hello autoiters! How do I find whole row? Searching for row which looks like this [-1,0,0]. Thanks in advance Global $arrayVectors[26][3]=[[-1,-1,-1],[-1,-1,0],[-1,-1,1],[-1,0,-1],[-1,0,0],[-1,0,1],[-1,1,-1],[-1,1,0],[-1,1,1],[0,-1,-1],[0,-1,0],[0,-1,1],[0,0,-1],[0,0,1],[0,1,-1],[0,1,0],[0,1,1],[1,-1,-1],[1,-1,0],[1,-1,1],[1,0,-1],[1,0,0],[1,0,1],[1,1,-1],[1,1,0],[1,1,1]]; Dim $arr3[1][3]=[[-1,0,0]]; ConsoleWrite(_ArraySearch($arrayVectors,$arr3,0,0,0,0,1,-1,True));
  3. Does not seem to work under Win 10. The property is written yet not showing up. I'm trying to change Video title and Copyright etc
  4. I search all occurrence of word "History" in an ebook. I cant post ebook coz its copyrighted. the loop keeps finding the first word and I pass back original range object. The DocFind correctly calculates Start of next search but the new DocFind iteration keeps finding the first word only, Not sure if something changed in Office 2016 or Win10? 1094-1101 TEST1101 1199965ForwardTrue 1094-1101 TEST1101 1199965ForwardTrue 1094-1101
  5. So did u find solution? I also keep finding same stuff and it does not move to the next
  6. Hey gang Anyone doing Bing Rewards automation? They just launched Bing iPhone App and added extra +10 points. I was wondering if this is just a iPhone User Agent string spoof work on Internet Explorer? Anyone figured it out? Basically I want to run my script on Desktop and let Bing think it's a Bing iPhone app.
  7. Thanks, M23. I can write one, I just want to see if it exists in some part before I do that.
  8. Hey gang Anyone seen Meetup UDF? I need Create Event function. Thanks
  9. I'm getting JSON from Russian website but actual text for title comes like in Unicode. I'm saving data as FileOpen( , 1+128) Unicode UTF8 (with BOM It keeps saving garbage like that "веÑеÑинкÐ" How do I fix it? I wrapped response to BinaryToString $Response = BinaryToString($oHTTP.ResponseText,4); it gives me half-baked Russian ""�?лассика KL10TCH для �?�?�?а�?ей �?ок-н-�?олла и консолей: л�?бим�?е �?�?еки, ги�?а�?а, бас, ба�?абанная �?с�?ановка и сове�?�?енно нов�?е �?азвле�?ения �?? Kinect dance&sport и доска Tony Hawk Ride. JSON "results":[{"id":67545,"title":"веÑеÑинка «Valentine Day» в Ciao Bella bar & kitÑhen","rank":-1238040.395346,"favorites_count":2,"comments_count":0,"first_image":{"id":260079,"image":"http://kudago.com/media/images/event/81/07/81075c03c06ba5ddef91a4363acc36ff.jpg","thumbnails":{"144x96":"http://kudago.com/media/thumbs/144x96/images/event/81/07/81075c03c06ba5ddef91a4363acc36ff.jpg","640x384":"http://kudago.com/media/thumbs/640x384/images/event/81/07/81075c03c06ba5ddef91a4363acc36ff.jpg"}},"description":"ÐеÑело оÑмеÑаÑÑ ÐÐµÐ½Ñ Ð¡Ð²ÑÑого ÐаленÑина, влÑблÑÑÑÑÑ Ð¸ пÑизнаваÑÑÑÑ Ð² лÑбви пÑиглаÑÐ°ÐµÑ ÑеÑÑоÑан Ciao Bella bar & kitÑhen на ÐевÑком.\n
  10. I have 2 processes one is Manager another is Worker.exe Master launches worker by Run with parameters directive passing PID of Manager as well I'm trying to reassign console from worker to the master so I will see some info from worker I called FreeConsole and _WinAPI_AttachConsole to Manager's PID. $workerID=$CmdLine[1]; ... $ManagerPID=$CmdLine[4]; $res=_WinAPI_FreeConsole(); $res2=_WinAPI_AttachConsole($ManagerPID); ConsoleWrite(" worker "&$workerID&" connected to console "); I don't see any console messages from worker in my SciTE console window where Manager's console lives Any ideas why?
  11. I have a group of basic shapes on a slide. Need to get some Node Points coordinates Node object seems to be accessible with Count and other properties
  12. Need some help with Office API Shapes.Nodes.Points Should get an array instead I get a string line 78 #include "PowerPoint.au3"; ;#include <excel.au3> ;include <misc.au3> Global $OldShape; $oMyError = ObjEvent("AutoIt.Error","MyErrFunc") $shapeTextBox=1; $shapeRegPentagon=12; $shapeFlowChart=73; ;~ Global $oExcel = _Excel_Open(); ;~ $WorkBook=_Excel_BookOpen($oExcel,@ScriptDir&"\Answers.csv") ;~ $oSheet = $oExcel.Worksheets.Item(1); ;~ $ReportMaxRows = $oSheet.UsedRange.Rows.Count; ;~ ;$oExcel.ActiveSheet.Range("A2:G:G").Columns.AutoFit $objPPT = _PPT_PowerPointApp() If @error Then MsgBox(0,"","No PowerPoint available") Exit EndIf $MyPres=_PPT_PresentationOpen($objPPT,@ScriptDir&"\OctaElements2.pptx"); $MySlide=$MyPres.Slides.Item(1); for $index=1 to $MySlide.Shapes.Range.Count ;$Text=_PPT_SlideTextFrameGetText($MyPres,1,$index); $MyShape=$MySlide.Shapes.Range($index); $ObjName=$MyShape.Name; $ObjTop=$MyShape.Top; $ObjLeft=$MyShape.Left; $ObjType=$MyShape.Type; $group=$MyShape.GroupItems; if $ObjType =6 Then $groupCount=$group.Count; Else $groupCount=0; EndIf ;ConsoleWrite(@CRLF&"Obj"&$index&"="&$ObjName&" has "&" items"&@CRLF&" top:"&$ObjTop&" left:"&$ObjTop&" type:"&$ObjType&@CRLF); ConsoleWrite(@CRLF&"Obj"&$index&"="&$ObjName&" has "&$groupCount&" items"&@CRLF&" top:"&$ObjTop&@CR&" left:"&$ObjTop&@CRLF); if $ObjType =6 Then for $indx2=1 to $group.Count; $gr=$group.Item($indx2); if IsObj($gr) Then $ObjName=$gr.Name; $ObjTop=$gr.Top; $ObjLeft=$gr.Left; $ObjType=$gr.AutoShapeType; if $ObjType = $shapeFlowChart Then $gr.left=$gr.left+10; $gr.top=$gr.top-10; EndIf ConsoleWrite(@CRLF&"Inside Obj"&@CRLF&$ObjName&@CRLF&" top:"&$ObjTop&@CR&" left:"&$ObjTop&@CR&" type:"&$ObjType&@CRLF); if IsObj($gr.Nodes) then ConsoleWrite(@CRLF&"Nodes "&$gr.Nodes.Count); EndIf Dim $arrPoints; for $node in $gr.Nodes $arrPoints=$node.Points; ConsoleWrite(@CRLF&"Points"&@CRLF&VarGetType($arrPoints)&@CRLF); ; ConsoleWrite(@CRLF&"Points"&@CRLF&$arrPoints[0][0]&@CRLF); Next EndIf Next EndIf next; ;_PPT_PresentationClose($MyPres); ;_PPT_PowerPointQuit($objPPT);
  13. is there any workaround? I reinstalled AutoIt with 32 bit setting - same thing.
  14. Just upgraded to Win 8.1 from Win 8 and script stopped working. It freezes on IENaviagate - just sits there does nothing Everything was working under Windows 8 #include <IE.au3>#include <Array.au3> $EnableActiveX=3; RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\", "1200", "REG_DWORD", $EnableActiveX) $oIE = _IECreate("www.facebook.com");WinSetState ("[CLASS:IEFrame]","",@SW_MAXIMIZE); HotKeySet("{ESC}", "Terminate") Func Terminate() HotKeySet("{ESC}"); _IEQuit($oIE ); ;Enable Scripting ActiveX $EnableActiveX=1; RegWrite("HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\", "1200", "REG_DWORD", $EnableActiveX) Exit;EndFunc #Region --- CodeWizard generated code Start ---;MsgBox features: Title=Yes, Text=Yes, Buttons=OK and Cancel, Icon=Warning Local $iMsgBoxAnswer=2;;_IEErrorHandlerRegister("MyErrFunc") _IENavigate($oIE,'http://www.bing.com/news'); ConsoleWrite("here");$sText = StringStripWS(_IEBodyReadText($oIE),7);$arrWords=StringSplit($sText," ");;_ArrayDelete($arrWords,"1-168"); Sleep(999);Dim $arrURLSWhile $iMsgBoxAnswer=2 $iMsgBoxAnswer = MsgBox(49,"Facebook","Please login with facebook") Select Case $iMsgBoxAnswer = 1 ;OK Case $iMsgBoxAnswer = 2 ;Cancel EndSelect #EndRegion --- CodeWizard generated code End --- WEnd
  15. I recently switched to Windows 7. was there an autocomplete for variables names in sciTE4Autoit editor ? or is it a setting I missed?
  16. Yes, it worked. I uninstalled old and installed 3.3.8.0 release Thank you! btw when I was installing 3.3.8.0 it defaulted to Program files (x86) folder while compiler was looking at Program files 'C:program' is not recognized as an internal or external command, operable program or batch file.
  17. Also check where is sqlite3.dll on your system and if it's "_x64". Yes I found one in Windows/system32 directory, did try to rename it and it re-copies itself again IS THIS HOW W7 BEHAVES? sqlite3_x64.dll Run beta agin C:\Program Files (x86)\AutoIt3\Beta\Includesqlite.au3(2,13) : ERROR: missing separator character after keyword. #IgnoreFunc __SQLite_Inline_Version ~~~~~~~~~~~~^
  18. i just used Run Script(x86) - I get the same error, same line
  19. I just got a new laptop with Windows 7 64 bit and moving my Autoit projects from XP I downloaded SQLite.au3 here and also got a new Beta Still I get an error while using _SQLite_QuerySingleRow error code is 21 - I belive it is "Library is used incorrectly" WTF?! and how to fix it?
  20. I used recorder so it is tailored to my screen Clicking "x" adds person to my cirecle using IE tabs and context menu "Open in a new tab" this does not work if person at the bottom of the search page I have to put so much delay coz G+ is so slow painting the "add" button I wish they put "Add" button on a profile search page near each person! HotKeySet("x","DoFollow"); HotKeySet("{ESC}","Terminate"); while 1 sleep(200) WEnd Func Terminate() HotKeySet("!x"); HotKeySet("{ESC}"); Exit EndFunc Func DoFollow() $pos= MouseGetPos() MouseClick("right",$pos[0],$pos[1]) MouseClick("left",$pos[0]+88,$pos[1]+32); MouseClick("left",348,100) sleep(2900) MouseMove(977,238) sleep(1000) MouseClick("left",835,331) ;circle 2 MouseClick("left",838,351) sleep(1000) MouseClick("left",393,96) sleep(200) MouseMove($pos[0],$pos[1]+130) EndFunc
  21. My hand is tired! (That's what she said! ) Anyone come up with Google+ Circles automation to add people to my circles via script? Please share! Thanks!
  22. No, you prepare show script for live broadcast and play it, while doing live show. LiveStream/Ustream Casting App grabs whatever you are displaying on the screen + audio and broadcasts it live
  23. I consider myself advanced programmer, although added Autoit to my skillset only 2 years ago
×
×
  • Create New...