Jump to content

randallc

Active Members
  • Posts

    1,879
  • Joined

  • Last visited

Everything posted by randallc

  1. Hey, good work, sorry I didn't get to look at it.Can you or Larry do a new UDF for tail read/ write to incorporate this? (accepting the original was "badly written" anyway, and, I presume, only worked for ANSI files, if I understand correctly?) Best, randall
  2. Hi Doesn't look like it in 12relaese; Local $iColLimit = 250, $iLVIAddUDFThreshold = 4000, $iWidth = 640, $iHeight = 480randall
  3. Hi, See my sig TailAPIrw.au or similar? Randall
  4. Hi, Probably easier to make your recursive file list to an array first (see link to _FileListToArrayNew), then just loop through your comparisons in one hit.. Best, Randall [PS - alternatively of course, just wrap xcopy with "/d"]
  5. Hi, _ArrayDisplay($cardsarray, "_ArrayDisplay() 2D Test", 1, 1); [2D, transposed]oÝ÷ Úf²mæ®¶­seô'&F7Æb33c¶6&G6'&ÂgV÷Cµô'&F7Æ$BFW7BgV÷C²ÂÓ²³$BÂG&ç7÷6VE, or make the itemnumber how many you want? Best, Randall
  6. oops, not your array; probably arraydisplay, but not sure why it has bugged up.. maybe show your script..[though maybe arraydisplay has gone back to old version..] Randall
  7. hi, probly old autoit version and lookig in arraydisplay; try beta 3.2.11.7? R
  8. Sorry again, 2nd topic here;at least in 3.2.11.4 ;"$iLVIAddUDFThreshold = 4000", so does still affect this function... Thanks,Randall
  9. Hi, Off topic a little, sorry.Is the _ArrayDisplay() func being updated to accept the new 65,000 control limit instead of 4000? Thamks pm, Randall
  10. Hi, Looks like a lot of hard work and it is nowhere near done; i think you would be better re-writing it from scratch, but then you would need to know its mechanism better. I suggest you 1. read the script as a file into variable. 2. stringreplace the directories or whatever you need to change 3. write new script file and run that. Best, Randall
  11. thanks, OKI'll try.. Best, Randall
  12. Thanks again; All work except "http://124.171.104.168:8080/index.au3" from local machine, or across Internet. [where 124.171.104.168 is say, currrent IP address on server; does it need a password script or something to log on acrooss the internet?] What is wrong with that? Best, Randall PS I also get the blank message box before the html opens; where is that coming from?
  13. Thanks, But I seem to have a server running; 1. How do I show that it is working? 2. What can I run on it? 3. How do I set something up to see? 4. How do I connect to it from local machine? 5. How do I connect to it from other machine? 6. How do I connect to it from other location? 7. Are there any example scripts to show? [in absolute blankness,]Best, randall
  14. No, I don't think i can replicate it.If I put 2 LVs on different tabs with AutoiTt, the second one become "instance2", not a second "instance1" best, randall PS I have PMd the screen shots..
  15. Hi, I guess; I'll have to see if there are example scripts out there with 2 ListViews on different tabs; I'll look. oK i'll try to pm or attch screenshots; not very good at it and will have to nut it out. the "initial screen", when I am running it, is the same as after controlsend; I only put that there in case the initial is ever not that tab Why it takes the sysListView32 from the other tab is unclear; appears to be nothing to do with it ever having been visible, though! randall PS Any thoughts?
  16. Hi, I don't know how to write an app with those controls ["SysTab32" and "SysListView32"], if that is your question.. 1. From another program, the controls are distinguished by the tab name being identified; ("Rx" and "Progress" respectively in control definition) 2. "Info" in scite gives a control hex number; but using that as the handle does not work (not as number, hex of string, or string); is there a way of using that? 3. what do you mean that 11.2 "reads" differently? thanks, Randall
  17. Hi, I have an App with a number of instances of same name/ ID SysListView32 on different tabs/ achild windows. 3.2.11.2 seems to retrieve a different instance; can I specify this better? WinActivate('Medical') Local $WindowHwnd = HWnd(WinGetHandle('Medical')) If @error Then ConsoleWrite("@error $WindowHwnd@error=" & @error & @LF) ConsoleWrite("$WindowHwnd =" & $WindowHwnd & @LF) Local $TabControl_HWnd = ControlGetHandle($WindowHwnd, '', '[Class:SysTabControl32;Instance:1]') If @error Then ConsoleWrite("@error $TabControl_HWnd @error=" & @error & @LF) ConsoleWrite("$TabControl_HWnd =" & $TabControl_HWnd & @LF) ControlSend('Medical', "", $TabControl_HWnd, "!l!x"); 'Curr&x' Local $FileListView_HWnd = ControlGetHandle($WindowHwnd, '', '[Class:SysListView32;Instance:8]');100); If @error Then ConsoleWrite("@error $FileListView_HWnd @error=" & @error & @LF) Local $d = 0, $i = 0, $colCount = _GUICtrlListView_GetColumnCount($FileListView_HWnd), $i, $aItems[100] Working in 3.2.11.1 Not Working in 3.2.11.2 So it retrieves a different instance with 7 cols instead of 20 cols Only the ID is different here (in fact sometimes the same, but not for this problem;) But I can't seem to retrieve it using ID alone.. Is there some syntax method I am missing here? Best, Randall
  18. Hi, Glad to help. though I would have thought doing it SQL woyld be more reliable? [ie post before]; $iRval = _SQLite_GetTable2d (-1, "SELECT * FROM persons ORDER BY Year,Count_Failed;", $aResult, $iRows, $iColumns)Or would it slow things down if you had to select repeatedly? Best, randall
  19. or; ; sqlitesort3.au3 #include <Array2D.au3> #include <SQLite.au3> Local $aResult, $iRows, $iColumns, $iRval _SQLite_Startup () If @error > 0 Then MsgBox(16, "SQLite Error", "SQLite.dll Can't be Loaded!") Exit - 1 EndIf _SQLite_Open (); Open a :memory: database If @error > 0 Then MsgBox(16, "SQLite Error", "Can't Load Database!") Exit - 1 EndIf If Not _SQLite_Exec (-1, "CREATE TEMP TABLE persons (Year, Count_Failed);") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) If Not _SQLite_Exec (-1, "INSERT INTO persons VALUES ('2008','43');") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) If Not _SQLite_Exec (-1, "INSERT INTO persons VALUES ('2008','21');") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) If Not _SQLite_Exec (-1, "INSERT INTO persons VALUES ('2008','28');") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) If Not _SQLite_Exec (-1, "INSERT INTO persons VALUES ('2007','43');") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) If Not _SQLite_Exec (-1, "INSERT INTO persons VALUES ('2008','24');") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) If Not _SQLite_Exec (-1, "INSERT INTO persons VALUES ('2007','1');") = $SQLITE_OK Then _ MsgBox(16, "SQLite Error", _SQLite_ErrMsg ()) ; Query $iRval = _SQLite_GetTable2d (-1, "SELECT * FROM persons;", $aResult, $iRows, $iColumns) ;~ $iRval = _SQLite_GetTable2d (-1, "SELECT * FROM persons ORDER BY Year,Count_Failed;", $aResult, $iRows, $iColumns) If $iRval = $SQLITE_OK Then Else MsgBox(16, "SQLite Error: " & $iRval, _SQLite_ErrMsg ()) EndIf _SQLite_Close () _SQLite_Shutdown () _ArrayDisplay($aResult) _ArrayDelete2D( $aResult, 0) _ArrayDisplay($aResult) _Array2D1DFieldSortSt( $aResult,"1|2") $aResult=_Array2DCreateFromArraySt($aResult) _ArrayDisplay($aResult)Randall
  20. Hi, $iRval = _SQLite_GetTable2d (-1, "SELECT * FROM persons ORDER BY Year,Count_Failed;", $aResult, $iRows, $iColumns)Randall
  21. Hi, You displayed the unsorted array again at the end; try _ArrayDisplay($a_Array)oÝ÷ ÚÚºÚ"µÍÌÍÚT[HÔÔS]WÑÙ]XL LK ][ÝÔÑSPÕ ÓHÛÛÈÔTH[YNÉ][ÝË ÌÍØTÝ[ ÌÍÚTÝÜË ÌÍÚPÛÛ[[Ê Randall
  22. Hi, still no time.. method, I think;' 1. Get output from fields in 1 db 2. Stringsplit to array 3. close that db, open 2nd db. 4. check field exists in 2nd db 5. else add field 6. loop through array and insetr data in the field for each row. Best, randall ; let me know...
  23. btw, best I can do is; _Array2DToArStrings ($aItems2D, $aItems) $sSysListView = StringReplace(_ArrayToString($aItems, @CRLF), "|", @TAB) $oApplication.Visible = False $oApplication.Selection.HomeKey ($wdStory) $oApplication.Selection.InsertBefore ($sSysListView) $oApplication.Run("TemplateProject.EditSelectAll.MAIN") With $oApplication.Selection.Font .Name = "Arial" .Size = 6 EndWith Local $wdLine = 5, $wdSeparateByTabs = 1, $wdAutoFitBehavior = 1;0;1,2 $oApplication.Selection.ConvertToTable ($wdSeparateByTabs, Default, Default, Default, Default, Default, Default, Default, Default, Default, Default, Default, Default, $wdAutoFitBehavior, $wdAutoFitBehavior, $wdAutoFitBehavior)But therer is a beter way? Best, Randall
  24. Hi, You just mean StringReplace ( $add, "|", @CRLF)oÝ÷ Øaw¥±éÉ·ºÚ"µÍÝ[ÔYÑ^XÙH ÌÍØY ][ÝÉÌLß ][ÝËÔrandall
×
×
  • Create New...