Jump to content

atwolf359

Active Members
  • Posts

    20
  • Joined

  • Last visited

Profile Information

  • WWW
    http://whmservices.com
  • Interests
    Technical Support Solutions
    whmservices.com

Recent Profile Visitors

328 profile views

atwolf359's Achievements

Seeker

Seeker (1/7)

1

Reputation

  1. Old solution, new to me, thank you Bowmore. for my own purposes i changed the the line If $arr[$i] <> "" Then To: If StringStripWS($arr[$i], 8) <> "" Then to remove white space which is not null
  2. very basic, but gives a starting point for self research. note the documents links below. google apikeys are required. YouTube made a major change in it's API a couple years back, version3. you need server and Browser keys, so no direct access is allowed. you must register thru YouTube to get the keys, and they are considered confidential. #include <MsgBoxConstants.au3> $video_id = 'A_QfO7g1YsI'; Parliament - Night of The Thumpasorus Peoples $apikey = 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx' ; // browser key for desktop apps. ;$apikey = 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx' ; // server key for web apps. $ytquery = 'https://www.googleapis.com/youtube/v3/videos' & '?id=' & $video_id & '&key=' & $apikey ; $ytquery = $ytquery & '&part=snippet,contentDetails,status,player'; $ytquery = $ytquery & '&fields=items(id,snippet(title),status(uploadStatus,rejectionReason,embeddable)'; $ytquery = $ytquery & ',contentDetails(duration,regionRestriction)'; $ytquery = $ytquery & ',player(embedHtml))'; $ytdata = InetRead($ytquery,1); $ytjson = BinaryToString($ytdata); ;MsgBox($MB_OK, $video_id, $ytjson) ConsoleWrite( @CRLF & $ytjson & @CRLF) Exit ; https://developers.google.com/youtube/v3/ ; https://developers.google.com/youtube/v3/docs/videos
  3. YouTube made a major change in it's API a couple years back, version3. https://developers.google.com/youtube/v3/ you need server and Browser keys, so no direct access is allowed. you must register thru YouTube to get the keys, and they are considered private. Code sample here
  4. Thanks for the info. I added a parameter to the end of the "_ArrayDisplay" function to hide the index and the seprator. *ADDED to end*** $noindex - [optional] Hide index column, 0{Default} show, 1 hide Func _ArrayDisplay(Const ByRef $avArray, $sTitle = "Array: ListView Display", $iItemLimit = -1, $iTranspose = 0, $sSeparator = "", $sReplace = "|", $sHeader = "", $NOINDEX = 0) atwolf359
  5. hello, is there a solution to hide the index column in the "_ArrayDisplay" function, without changing the code in the function. I would like to copy info out of the display without the index '[index]'. thanks hiding the index column in _ArrayDisplay wolf359
  6. That's great!Show me.
  7. Hi, I uploaded 'FTP_Ex.au3' on 2/24/2009. On 'syntaxcheck', I recieved the following error: ================================= C:\process control\FTP_Ex.au3(647,31) : ERROR: StringRight() [built-in] called with wrong number of args. If StringRight($s_LocalFolder) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^ C:\process control\FTP_Ex.au3 - 1 error(s), 0 warning(s) ================================= I Changed: If StringRight($s_LocalFolder) == "\" Then $s_LocalFolder = StringTrimRight($s_LocalFolder,1) To: If StringRight($s_LocalFolder, 1) == "\" Then $s_LocalFolder = StringTrimRight($s_LocalFolder, 1) Seems to work. Also, for my own personal programming convenance, Added the following after Global variables, for ease of use: $h_Handle = '' ;******** Added by atwolf359 $l_DllStruct = '' ;******** Added by atwolf359 Thanks for a geat utility!
  8. you fixed it. Thanks
  9. This routine comes in handy in my my db work. ;routine parses 'fixed field, non-delimited' data strings. #include <Array.au3> $ary2 = _StringSplitBydef('0123456789abcdef', '4:3:0:2:1') ;$recdef as a field map _ArrayDisplay($ary2, "StringSplitBydef " & 'Record definition -- "4:3:0:2:1"') $ary2 = _StringSplitBydef('0123456789abcdef', 3) ;$recdef as a fixed record spliter _ArrayDisplay($ary2, "StringSplitBydef " & 'Record definition -- 3') Exit ; #FUNCTION# ======================================================================== ; Name...........: _StringSplitBydef ; Description ...: Splits a string into substrings based on the record definition string. ; Returns an array, with each element, containing a given number of characters defined by the ; record definition string. Null fields are accepted. ; The last element will contain any remaining characters. ; Syntax.........: _StringSplitBydef($recString, $recdef) ; Parameters ....: $recString - string to be split. ; $recdef - Record definition string. ; Format 1 - a STRING - containing [index0 lenght[:]index1 lenght[:]index2 lenght[:]...[:]indexN lenght] ; this will return an array with index lenghts defined by [indexN lenght] ; Format 2 - a NUMBER - this will return an array with equal index lenghts defined by [NUMBER] ; Return values .: Success - Returns a 0-based indexed array. ; Failure - Blank string and @error = 1 ; Author ........: Atwolf359 ; Modified.......: ; Remarks .......: ; Related .......: ; Link ..........: ; Example .......: _StringSplitBydef('0123456789abcdef', '4:3:0:2:1') ; _StringSplitBydef('0123456789abcdef', 3) ; ; =========================================================== Func _StringSplitBydef($recString, $recdef) Local $i, $m, $n If IsNumber($recdef) = 1 Then $i = StringLen($recString) $recdef = Int($recdef) If $recdef < 1 Or $i < 1 Then $ary = '' SetError(1) Else $i = $i / $recdef $m = Int($i) If $m <> $i Then $m = $m + 1 Local $ary[$m] For $i = 0 To $m - 1 $ary[$i] = StringMid($recString, $i * $recdef + 1, $recdef) Next EndIf Else $ary = StringSplit($recdef, ':') $m = $ary[0] $n = 0 For $i = 1 To $m $ary[$i - 1] = StringMid($recString, $n + 1, $ary[$i]) $n = $n + $ary[$i] Next If $n < StringLen($recString) Then $ary[$m] = StringMid($recString, $n + 1) Else $i = UBound($ary) - 1 ReDim $ary[$i] EndIf EndIf Return $ary EndFunc ;==>_StringSplitBydef
  10. I am using "FTP_Ex.au3". The function "_FTP_UploadProgress" adds random characters to the end of uploaded files less than or equal to 7499 bytes. This happens weather I use an internal or external progress bar function. The function "_FtpPutFile" does not have this problem. Can anyone confirm/test this? It could be my PC. and not the function. Thanks
  11. Thanks, I read the doc. but really didn't understand it. my bad.
  12. in using the "_ArrayDisplay" function I can't see the "|" symbol. However when I copy the ListView table it shows up in the copied text. Is there a configuration setting I'm missing. Thanks ;Test code: Can't see '|' symbol $X = 'a | | | | | | | | | | | | | | | | | | | | z' ConsoleWrite($X & @CRLF) $ary2 = StringSplit($X,' ') _ArrayDisplay($ary2) Exit
  13. Could the group confirm that the "FileSelectFolder" command adds a trailing "\" if and only if the "Root" of a drive is selected? Just want to comfirm I'm using the command correctly. Thanks
  14. the new link worked, thanks. I'll post my results.
  15. Thanks everyone, You gave me some direction. I found "port.dll" ok , but the "commgAll.zip" would not open. Is there another link to this file
×
×
  • Create New...