Rapidshare links von seite in editor kopieren..

gcg12

Hi,
habe soeben mein erstes Auto-IT runtergeladen und würde gerne etwas bestimmtes erstellen..
ich denke zumindest mal dass es nicht sehr schwer ist, und zwar brauch ich ein skript was ich aktivieren kann,
es erkennt dass auf der aktuellen seite ein rapidshare link steht, diesen kopiert in einen editor einfügt, enter drückt und natürlich
wenn es geht dann auch tab oder firefox ganz schließt.. man kann aber nicht einfach firefox ganz killen, sonst müsste ich nach jedem link die seute nochma neu durchsuchen..
ein weiteres problem ist die url, die seite überblendet die rapidshare.com addresse mit ihrer eigenen..
aber in der seitenmitte steht die url ja nochmal... also muss man sie von da holen..

beispiel link:
http://rapidshare.com/files/*

wichtig ist, dass es erkennt dass der editor schon offen ist und den nächsten link unter den anderen einkopiert..

jemand ne idee, bin noch nich sehr weit^^

Run("notepad.exe")
WinWaitActive("Unbenannt - Editor")
Link einkopieren??
Send("{ENTER}")

tausend dank mal im voraus,

thomas

Dankeschön

Ich würde den Quellcode von der Seite speichern lassen (externe Datei) und dann gucken bis der Anfang eines RS-Links kommt !
Fertig.

///edit: Wollte das auch mal machen,mal sehen ob ichs heute schaffe !

Spoiler anzeigen

Warzeseiten sind meist ungesund für den PC !
Nimm lieber Gulli:Boardbörse,da sind keine Viren drinne !

gcg12

meinsde mann muss den umweg gehen den quellcode abspeichern?
weiss es nicht aber denke man muss dem ja sagen können

markieren (link)
strg+c
wechsele zu editor oder starte wenn nicht da ist
strg+v
enter
close tab (wobei mir das nich wichtig wäre..)

habe ich mir dass nun zu einfach vorgestellt?

Dankeschön

Gant einfach !

Du hast 200 Zeilen Code !
Du kannst dem Script nich sagen "Suche aus den zeilen alle Links raus"
Sondern nur Zeile für Zeile überprüfen !
Deswegen musst du das temporär speichern,damit du überhaupt etwas zum durchsuchen hast !
Und str+c etc. und erst recht das öffnen des Notepads würde ich lassen,sondern es automatisch in ne Textdatei speichern.

Ich schreibe es gerade,warte noch ein bisschen !

**BugFix**

z.B. IE-Funktionen verwenden?
Links mit _IELinkGetCollection abfragen, näheres in der Hilfe.

Dankeschön

Kenne mich mit dem Inet zeugs nich aus und verstehje das alles iregdnwie nciht !
Mach ichs halt über Umwege !

@TS : Hast du mal ne Beispielsseite zum ausprobieren für mich?

////edit : BugFix : Die Funktion sieht ganz gut aus,nur wie führe ich das auf einen Link aus?
Im Beispiel mit Inetexample,aber da istn kein Link !

gcg12

Gott, hier wird ja schnell geantwortet^^,
ich kenne diese ie funktion nicht.. wie setzt man die denn in autoit um,
muss man dafür zusatzfunktionen einfügen?
ich warte mal gerade auf dich dankeschön..
hier mal einer der seiten wo ich das einsetzen würde..

http://***.org/categorie.php?cat=apps

klick das erstbeste an, dann hast du einen link

gruß

Edit peethebee: Link entfernt, potentiell illegale Inhalte.

Dankeschön

Ich gebs auf,das klappt nicht bei mir !

gcg12

wollt nix illegales posten^^ sry

kannst du uns helfen bug fix?

thx

**BugFix**

Ist Hilfe lesen soo schwer ?
Steht doch alles da, mußt nur mal die anderen Funktionen zu IE auch anschauen!

[autoit]

#include <IE.au3>
$i = 1
$oIE = _IECreate ("autoit.de", 0, 0)
$oLinks = _IELinkGetCollection ($oIE)
$iNumLinks = @extended
MsgBox(0, "Link Info", $iNumLinks & " links found")
For $oLink In $oLinks
ConsoleWrite("Link " & $i & @TAB & $oLink.href & @CRLF)
$i += 1
Next
_IEQuit($oIE)

[/autoit]

gcg12

danke,
hilft dir das dankeschön?

Dankeschön

Ähm,danke,aber lesen ist nicht schwer,nein,
das verstehen schon !
Nicht jeder ist oberschlau !

///edit: Es werden nicht nur RS-Links genommen ........

anno2008

Zitat

///edit: Es werden nicht nur RS-Links genommen ........

Ja, aber das hat ja auch keiner behauptet, oder?
Du musst aus den links jetzt die rapidsharelinks rausfilern ...

.::Mignon::.

nur für den fall, dass du das mit dme filtern auch nicht hinbekommst ein kleiner tipp. man könnte es mit "StingInStr" versuchen.

McPoldy

Habe mal das Script von BugFix um das StringinString von Mignon erweitert:

[autoit]

#include <IE.au3>
#include <array.au3>
dim $arrlinks[1]
$filter="onestat.com" ;<-- hier der filter z. B. rapidshare.com
$i = 1
$oIE = _IECreate ("autoit.de", 0, 0)
$oLinks = _IELinkGetCollection ($oIE)
$iNumLinks = @extended
MsgBox(0, "Link Info", $iNumLinks & " links found")
For $oLink In $oLinks
if StringInStr($oLink.href,$filter) Then
ConsoleWrite("Link " & $i & @TAB & $oLink.href & @CRLF)
$i += 1
_arrayadd($arrlinks,$oLink.href)
EndIf
Next
_IEQuit($oIE)
$arrlinks[0] = UBound($arrlinks) -1
_ArrayDisplay($arrlinks)

[/autoit]