Jump to content

Youtube keyword finder


Recommended Posts

after many searching and asking i am success in to write this code

it is little autoit script that enable to get keyword from youtube

#include <IE.au3>
#include <Youtube.au3>
#include <File.au3>
; using youtube.udf to get keyword 
$sID = ClipGet() 
_IELoadWait ($sID)
$sPlayer = _Youtube_Read($sID); Read webpage (could take a while)
$sKeywords = _Youtube_GetKeywords($sPlayer)
MsgBox(0, "keywords", $sKeywords)
_FileWriteToLine("c:\auto.txt", 1, $sKeywords, 0)
_IEQuit ($sID)

now i am getting two problem / bugs

1- some times it return null / blank value

2- it is no capable to get Chinese character

please download modified youtube.udf

(i made minor change in youtube.udf get only video link like DsL_5bovozE

but i change into : http://www.youtube.com/watch?v=DsL_5bovozE

Youtube.au3

my script

yt_keyword.au3

can i implement loop ......... while loop is better for this purpose ?

Edited by ironmankho
Link to comment
Share on other sites

Sorry for bump !!!!!

please help me ...i do my best but can't find any solution for blank value (some time it return null value some time return good result )

because i will use this for my _youtube indexing site approximatly i have 45,000 links ..... so that'why i can't post links with out Tag

Even i write this code again

#include <IE.au3>
#include <Youtube.au3>
#include <File.au3>
; using youtube.udf to get keyword 
$sID = ClipGet() 
MsgBox(0, "Clipget Auto it ID", $sID)
$sPlayer = _Youtube_Read($sID); Read webpage (could take a while)
$sKeywords = _Youtube_GetKeywords($sPlayer)
;ClipPut($sKeywords)
MsgBox(0, "keywords that last time grabbe", $sKeywords)

;Run("pagesaver.exe", "", @SW_HIDE)
If $sKeywords="   "Then
     MsgBox(0,"", "String only contained whitespace characters.")
$sID = ClipGet() 
;_IELoadWait ($sID)
$sPlayer = _Youtube_Read($sID); Read webpage (could take a while)
sKeywords = _Youtube_GetKeywords($sPlayer)
MsgBox(0, "retrive error", $sKeywords)
;FileWriteToLine("c:\auto.txt", 1, $sKeywords, 0)
Else
_IEQuit ($sID)
EndIf
Edited by ironmankho
Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...