Page 3 of 3 FirstFirst 123
Results 21 to 28 of 28

Thread: Release Lyric Tagger

  1. #21
    Constant Bitrate
    Join Date
    Mar 2006
    Posts
    145
    Quote Originally Posted by deus ex machina View Post
    You'd have to using something stupid like an IE control get popups that way.
    sure, but nobody released his superb solution before (or at least i couldnt find it), and that was from my point of view the easiest and fastest way...

    Quote Originally Posted by deus ex machina View Post
    I wrote a class that downloads web pages (without actually rendering them in IE) using the Winsock API, if you want it.
    - you dont have to use the ie control - just use your control and return the search result - you can do all that in the search module...
    - if you want, i can also integrate your class, but i think all search modules must be changed then cause of the different interface.

  2. #22
    Constant Bitrate deus ex machina's Avatar
    Join Date
    Mar 2006
    Posts
    136
    Try this out. It will probably go a lot faster if you download the text of the page in VB and just use the scripts to parse it. Make sure you have a reference to MSWINSCK.OCX if you try to use these in your project.

  3. #23
    Super Moderator
    Auto Apps:loading...
    JohnWPB's Avatar
    Join Date
    Sep 2005
    Location
    West Palm Beach, Florida
    Posts
    4,689
    Blog Entries
    1

    my 27 cents worth (Inflation)

    Quote Originally Posted by ReflexNPG View Post
    @johnwpb:
    no lyrics? if they are not on the site, what are you expecting? if they are and the program does not get them, maybe you've found a bug, so let me know, fix it yourself...or take option 4!
    Dude, I was trying to be nice in my last post, and even thanked you for your work. Well... I guess you did not see it that way.

    Maybe the rest of us are wrong to make suggestions, report bugs and the like.

    A VERY good suggestions was a couple posts back, that if you are offering no support for this, and it is released "As Is" then you should have made that very clear at the beginning as a simple statement.

    When something is released, it is typical in these forums for people to make requests, and offer suggestions to improve upon whatever the item is. I have released scripts and skins myself, and have only been able to improve on them from suggestions from others.

    In my case, your "plugin" locks my computer tight (3.2 Ghz machine), where the window can not even be dragged, the log stops and stays on one song for an EXTENDED amount of time, and crashes quite frequently. After all that it gets only about 10% of the lyrics at most when it does finally finished with what it was doing.

    Lyrics are not available? sorry, thats not it, after running your plugin on a test directory, I ran Zortam on the SAME test directory, and it gets at least 75% of the SAME songs that yours gets maybe 10% of. (with the binary characters /unicode and clutter mixed in unfortunately)
    brainstorming? most posters even dont know how it's working and start complaining.
    My opinion, take the criticism from Liquid Smoke, myself and a few others and learn from it. We DO know computers, custom scripting and programming both inside and outside of RR.

    Sure, when something is released, some people will blindly criticize the work that has went into something. But, if you decide to release something to the public, you better damn well be prepared for that and not attack people for their criticism or opinions!

    Again, thank you for your work on this, and for sharing, next time, however, you should make it clear that you do not want criticism or suggestions on what you have done and then you will just have "Thank You" posts in your thread..
    Front End of Choice: Ride Runner (Is there anything else??? ) & Powered by the DFX5.1 Skin Available in the Mobile App Mart

    My Fiero Build Thread

  4. #24
    Constant Bitrate
    Join Date
    Mar 2006
    Posts
    145
    @deus ex machina:
    thx, i will take a look at it

    @JohnWPB:
    please use zortam

  5. #25
    SMKFree liquid_smoke's Avatar
    Join Date
    Aug 2003
    Location
    Chicago
    Posts
    4,842
    nice attitude
    01101100 01101001 01110001 01110101 01101001 01100100 01011111 01110011
    01101101 01101111 01101011 01100101

    beer replenishment fund
    http://www.mp3car.com/vbulletin/rr-faq/
    mp3car live search

    i have joost invites, just hit me up for one.

  6. #26
    Constant Bitrate
    Join Date
    Mar 2006
    Posts
    145
    New search module - copy the code 2 the new file "00_lyricsplugin.vbs" into directory searchmodules.
    (JohnWPB asked 4 it, but he didnt know what 2 do or he was 2 lazy to do it ...)

    Code:
    ' search lyrics
    'by Reflex 2006.12.08
    Dim sartist,soldartist,stitle,bFound,sresult,serror
    
    'Set oWscript = WScript
    'Set oIe = CreateObject("Internetexplorer.Application")
    'sartist = "Prince"
    'stitle = "Kiss"
    'Call searchtest()
    
    Function searchtest()
    	Call search()
    	MsgBox sresult
    End Function
    
    Function dosearch()
    	serror = ""
    	sresult = ""
    	stitle = oSearch.stitle
    	sartist = oSearch.sartist
    	Call search()	
    	osearch.sresult = sresult
    	osearch.serror = serror
    End Function
    
    Function sleep(ms)
    	owscript.sleep ms
    End Function
    
    
    Function search()
    
    On Error Resume Next
    
    sartist = LCase(sartist)
    If InStr(stitle, "(") > 0 Then
        stitle = Left(stitle, InStr(stitle, "(") - 1)
    End If
        
        oie.Navigate "http://www.lyricsplugin.com/plugin/?artist=" & Replace(sartist, " ", "%20") & "&title=" & Replace(stitle, " ", "%20")
    
    iReset = 0
    'While oIe.busy
    Do While oie.ReadyState <> 4
        Sleep 100
        iReset = iReset + 1
        If iReset > 1000 Then
            Exit Do
        End If
    Loop
    Sleep 500
    
    If Len(oie.Document.body.innertext) < 130 + Len(sartist) + Len(stitle) Then
        serror = "Song not found"
    Else
            sresult = LCase(oie.Document.body.innertext)
            For i = 1 To 2
               sresult = Right(sresult, Len(sresult) - InStr(sresult, Chr(10)))
               sresult = Left(sresult, InStrRev(sresult, Chr(10)) - 2)
            Next
    End If
    
    End Function

  7. #27
    FLAC
    Join Date
    Jun 2002
    Location
    Virginia
    Posts
    1,788
    (JohnWPB asked 4 it, but he didnt know what 2 do or he was 2 lazy to do it ...)
    That's a funny one. Apparently you haven't been following JohnWPB's work on this forum. We all appreciate your work and willingness to share, but in one short thread you have managed to insult two of the biggest contributors to the forum - Liquid Smoke and JohnWPB.

  8. #28
    SMKFree liquid_smoke's Avatar
    Join Date
    Aug 2003
    Location
    Chicago
    Posts
    4,842
    eh, i could care less. I just asked a simple question about how it works. For some reason some people always think they are being attacked or criticized when they aren't. Im sure JohnWPB could easily just say the app was crap and that would be enough for a lot of people to just avoid it. Suggestions are made to largely help you or your efforts become better, they shouldn't be taken as insults or trashing your thread. But i do see you have a new search module now
    01101100 01101001 01110001 01110101 01101001 01100100 01011111 01110011
    01101101 01101111 01101011 01100101

    beer replenishment fund
    http://www.mp3car.com/vbulletin/forumdisplay.php?f=93
    mp3car live search

    i have joost invites, just hit me up for one.

Page 3 of 3 FirstFirst 123

Similar Threads

  1. iGMod Beta 1 release
    By PURDooM in forum Other Cool Stuff
    Replies: 175
    Last Post: 12-28-2005, 10:17 PM
  2. [SKIN]FPs "Bright Life" (input needed to complete)
    By yunusyu in forum FrodoPlayer
    Replies: 76
    Last Post: 06-25-2005, 02:59 PM
  3. RELEASE - FreeDrive 0.60
    By CdRsKuLL in forum FreeDrive
    Replies: 144
    Last Post: 06-10-2005, 04:45 PM
  4. SpeakEasy Voice Recognition - Release 0.9.1
    By ruairi in forum Software & Software Development
    Replies: 11
    Last Post: 06-03-2005, 05:19 PM

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •