[slikom] JS - CopyLinks

  • From: Zlatko Sobočan <sobocan@xxxxxxxxxxxx>
  • To: "SliKom \(Grupa\)" <slikom@xxxxxxxxxxxxx>
  • Date: Fri, 20 Jun 2008 11:23:41 +0200

    Pozdrav svima!

Napravio sam Jaws skriptu koja sa web stranice kopira samo linkove radi
izrade popisa.

Svrha skripte je kopiranje svih linkova sa otvorene web stranice u
Clipboard. Zatim se dobiveni popis zalijepi u bilo koji tekst editor ili
word procesor. Takav popis predstavlja

jednu vrstu kataloga. Buduci da ne sadrzi reklame i ostali sadrzaj koji nas
ne zanima a oduzima vrijeme, lako je napraviti usporedbu s popisom npr.
knjige ili glazbe kojeg imamo od ranije.

Ovu Jaws skriptu koristim kao program za katalogiziranje, jer mi olaksava
preuzimanje npr. knjiga sa 4shared servisa ili sa:
http://baneprevoz.com/bane/bok/
Skripta je na stranicama sa glazbom, torrentima i sl. sadrzajem takoder od
velike pomoci.


    Rukovanje

1. Otvorite web stranicu
2. Pritisnite tipkovnu kraticu za pokretanje Jaws skripte "CopyLinks" --
Alt+4
3. Pokrenite Notepad ili Word
4. Zalijepite sadrzaj odlagalista pomocu Ctrl+V
5. Spremite dokument-popis pomocu Ctrl+S


    Postavljanje Jaws skripte

1. Oznacite i kopirajte ovaj programski kod:

; Pocetak skripte
Script CopyLinks ()
var
object doc,
object links,
object all,
int nLinks,
string buffer,
string strTemp,
string strSeparator,
int nIdx

if ieVersion == IE3 then
SayFormattedMessage (ot_ERROR, msgFeatureNotAvailable1_L,
msgFeatureNotAvailable1_S)
return
EndIf
let doc = ie4GetCurrentDocument ()
let links = doc.links
let all = doc.all
let nLinks = links.length
if nLinks == 0 then
SayFormattedMessage (ot_ERROR, msgNoLinks1_L, msgNoLinks1_S )
return
EndIf

let strSeparator = "\13\10"
let nIdx = 0
while nIdx < nLinks
let strTemp = links(nIdx).InnerText
if ! strTemp then
let strTemp = all(links(nIdx).SourceIndex + 1).alt
EndIf
if ! strTemp then
let strTemp = links(nIdx).href
EndIf
let buffer = buffer + strSeparator + strTemp
let nIdx = nIdx+1
EndWhile

CopyToClipboard (buffer)
SayString ("Linkovi su kopirani u odlagalište.")
EndScript
; Kraj skripte

2. Pokrenite Internet Explorer (verzija nije vazna)
3. Pokrenite Jaws Script Manager pomocu Insert+0
4. Kursor premjestite na kraj dokumenta pomocu Ctrl+End
5. Zalijepite programski kod pomocu Ctrl+V
6. Strelicom premjestite kursor unutar programskog koda
7. Otvorite Documentation pomocu Ctrl+D
8. Pritisnite tipku TAB i ukljucite potvrdni okvir "Can be attached to Key"
9. Cetiri puta pritisnite tipku TAB i u kontroli "Assign To: Hotkey"
pritisnite kombinaciju tipaka: Alt+4
10. Zatvorite dijaloski okvir klikom na gumb OK.
11. Kompajlirajte skriptu pomocu Ctrl+S
12. Izadite iz Jaws Script Managera pomocu Alt+F4

Ovime je postavljanje zavrseno. Sada mozete napraviti svoj prvi
popis-katalog. Pritisnite Alt+4,
Otvorite Word i zalijepite popis.

Lijep pozdrav,
        Zlatko



____________________

Za prijavu na ovu listu poslati poruku na adresu: 
<slikom-request@xxxxxxxxxxxxx> i u polju za tekst upisati, subscribe
Za odjavu sa ove liste poslati poruku na adresu: <slikom-request@xxxxxxxxxxxxx> 
i u polju za tekst upisati, unsubscribe
Za pristup arhivi poruka koristiti adresu: 
//www.freelists.org/archives/slikom/ 
Login: username=slikom  Password=mokils

____________________

Other related posts:

  • » [slikom] JS - CopyLinks