Archive-dot-org simple helper

[grymmjack]

This is cool, @mnrvovrfc

I had to make some changes to get it to work on windows (filename with space in path, and firefox didn't like the input surrounded in single quotes for the URL).

Code: (Select All)

comd$ = CHR$(34) + launchprog$ + CHR$(34) + " https://archive.org/details/audio?and[]=year%3A%22" + ayear$ + _

"%22&and[]=mediatype%3A%22audio%22&and[]=subject%3A%22"

plu = INSTR(asubj$, "+")

IF plu > 0 THEN

    comd$ = comd$ + LEFT$(asubj$, plu - 1) + "%22&and[]=subject%3A%22" + MID$(asubj$, plu + 1) + "%22"

ELSE

    comd$ = comd$ + asubj$ + "%22"

END IF

PRINT launchprog$

PRINT comd$

SLEEP

SHELL _HIDE _DONTWAIT comd$

Here is my helparchorg-browser.txt file:

Code: (Select All)

C:\Program Files\Mozilla Firefox\firefox.exe

I tried to put the double quotes in this file, but it wasn't finding the browser as a file that existed per the stuff at the top that checks for it. However, it found it without double quotes there.

For the benefit of others here are screenshots of it working: