Script för att ladda 8 hemsidor?

Tråden skapades och har fått 18 svar. Det senaste inlägget skrevs .
1
  • Medlem
  • Stockholm
  • 2008-06-22 17:51

Hej, har en liten fråga. Tittar på 8 sidor hyfsat ofta. Skulle vilja ha ett script som jag klickar på som sedan laddar första sidan i Safari, väntar i några sekunder sedan laddar nästa och sedan nästa.
Har varit inne lite i Automator men hittar liksom inte riktigt rätt. Någon?

Du kan ju plocka upp alla sidorna som flikar, sedan välja "Bookmark for theese tabs" i bokmärkes-menyn, då har du ju ett bokmärke som laddar alla sidorna..

Tillräckligt nära?

  • Medlem
  • Stockholm
  • 2008-06-22 18:41
Ursprungligen av Johan S:

Du kan ju plocka upp alla sidorna som flikar, sedan välja "Bookmark for theese tabs" i bokmärkes-menyn, då har du ju ett bokmärke som laddar alla sidorna..

Tillräckligt nära?

Tack men aldrig varit ett stort fan av tabs. Om det finns en annan lösning är jag glad men orkar ingen så hajar jag det om ni fattar.

  • Medlem
  • 2008-06-22 20:44
Ursprungligen av acke:

Tack men aldrig varit ett stort fan av tabs.

Då har du missat nåt. Tabbar är finfina. Växla mellan tabbar med cmd+Ä resp Ö.

Ursprungligen av Baron:

Då har du missat nåt. Tabbar är finfina. Växla mellan tabbar med cmd+Ä resp Ö.

Cmd+Shift+Ä resp Ö är det väl? Cmd+Ä/Ö är väl framåt/bakåt?

  • Medlem
  • Malmö
  • 2008-06-22 21:44
Ursprungligen av gabriel.fjellander:

Cmd+Shift+Ä resp Ö är det väl? Cmd+Ä/Ö är väl framåt/bakåt?

Nope .. här i senaste Safari är det Cmd + Ö/Ä.

Ursprungligen av Thomaz:

Nope .. här i senaste Safari är det Cmd + Ö/Ä.

Jag har också senaste safari, 3.1.1, och för mig är det med shift. Skumt...

  • Medlem
  • 2008-06-22 19:33

Klistra in i manusredigeraren och spara som script eller app. Du kanske är ute efter några andra sidor, så ändra dem först...

tell application "Safari"
	set URL of current tab of window 1 to "http://www.99.se"
	delay 5
	set URL of current tab of window 1 to "http://www.99.se/mac"
	delay 5
	set URL of current tab of window 1 to "http://www.99.se/musik"
	delay 5
end tell

Var det nåt sånt du ville ha?

Dammit, Baron hann före, här är mitt exakt likadana... Det plockar upp i samma fönster först dagens diskussioner på 99.se/mac, sedan dagens diskussioner på 99.se/ipod, sedan dagens diskussioner på 99.se/web

tell application "Safari"
	activate -- Detta kommando startar Safari och/eller öppnar ett nytt dokument om inget finns.
	
	set thisManySeconds to 6 -- Denna fiffigt döpta variabel avgör hur länge du vill vänta/titta på varje sida.
		
	-- Öppna först URL'en (Dagens Diskussioner 99.se/MAC) + vänt
	set URL of document 1 to "http://www.99.se/search.php?do=getdaily&exclu..."
	delay thisManySeconds
	
	
	-- Öppna först URL'en (Dagens Diskussioner 99.se/IPOD) + vänt
	set URL of document 1 to "http://www.99.se/search.php?do=getdaily&exclu..."
	delay thisManySeconds
	
	-- Öppna först URL'en (Dagens Diskussioner 99.se/WEBB) + vänt
	set URL of document 1 to "http://www.99.se/search.php?do=getdaily&exclu..."
	delay thisManySeconds
	
end tell
  • Medlem
  • 2008-06-22 20:41

Taz vinner. Jag glömde "activate". Men jag skrev å andra sidan utifrån att man kör skriptet inifrån Safari.

Acke, thisManySeconds är bra om man vill ha alla sidor öppna lika länge. Men om man skannar av Aftonbladet på 3 sekunder och nytimes.com på 6 kanske man vill speca fr varje site hur länge man vill kika. Delayvärdet tar heller ingen hänsyn till hur lång tid sidan tar att ladda.

  • Medlem
  • 2008-06-22 21:40

Inte i min Safari.

  • Medlem
  • Stockholm
  • 2008-06-22 22:51

Olalala! Som alltid, 99.se är bäst! Tack alla, sätter mig och kollar på detta nu.

  • Medlem
  • Stockholm
  • 2008-06-22 23:22

Man kan istället för att skapa massa skript skapa en mapp i "bookmarks bar" och ha alla länkar där och således när man trycker öppna i flikar, öppna alla, sedan ta ner flik efter flik med Äpple+w

enklast tycker jag

  • Medlem
  • 2008-06-22 23:40

Det är ingen sport. Utmaningen var ju att lösa det utan flikar och med ett klick.

  • Medlem
  • 2008-06-23 00:45

Med lite fulkod har jag gjort en variant som frågar om man vill gå vidare och går vidare ändå om man väntar för länge. Den minns också var man var om man stannade nånstans på vägen.

property mySite : ""
property myDialog : ""
property myStart : ""

if myStart is "" then
	my FC1()
else if myStart is "DN" then
	my FC2()
else if myStart is "SvD" then
	my FC3()
else if myStart is "AB" then
	my FC4()
else if myStart is "EX" then
	my FC5()
end if


on FC1()
	tell application "Safari"
		activate
		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC1

on FC2()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC2

on FC3()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC3

on FC4()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC4

on FC5()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
	end tell
end FC5
  • Medlem
  • Stockholm
  • 2008-06-23 08:23
Ursprungligen av Baron:

Med lite fulkod har jag gjort en variant som frågar om man vill gå vidare och går vidare ändå om man väntar för länge. Den minns också var man var om man stannade nånstans på vägen.

property mySite : ""
property myDialog : ""
property myStart : ""

if myStart is "" then
	my FC1()
else if myStart is "DN" then
	my FC2()
else if myStart is "SvD" then
	my FC3()
else if myStart is "AB" then
	my FC4()
else if myStart is "EX" then
	my FC5()
end if


on FC1()
	tell application "Safari"
		activate
		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC1

on FC2()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC2

on FC3()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC3

on FC4()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
	end tell
end FC4

on FC5()
	tell application "Safari"
		activate
		
		(*		
		set myStart to "SDS"
		set mySite to "http://sydsvenskan.se"
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till DN?"
		set mySite to "http://www.dn.se"
		set myStart to "DN"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till SvD?"
		set mySite to "http://www.svd.se"
		set myStart to "SvD"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Aftonbladet?"
		set mySite to "http://www.aftonbladet.se"
		set myStart to "AB"
		display dialog myDialog giving up after 5
		set URL of current tab of window 1 to mySite
		
		delay 3
		set myDialog to "Fortsätt till Expressen?"
		set mySite to "http://www.expressen.se"
		set myStart to "EX"
		display dialog myDialog giving up after 5
		*)
		set URL of current tab of window 1 to mySite
		
	end tell
end FC5

Åh Baron inte behöver du fortsätta. Du har ju redan min kärlek som i en liten ask.

  • Medlem
  • Stockholm
  • 2008-06-23 09:03

ni är inte helt friska

  • Medlem
  • Sundsvall
  • 2008-06-23 09:09
Ursprungligen av Tangen:

ni är inte helt friska

Nej, det är dom VERKLIGEN inte!

Visst är det uppfriskande och härligt

  • Medlem
  • Stockholm
  • 2008-06-23 10:23
Ursprungligen av Eva:

Nej, det är dom VERKLIGEN inte!

Visst är det uppfriskande och härligt

ABSOLUT

1
Bevaka tråden