Terve.
Nyt olis ongelma. Niinkuin Apulanta lauloi...
>>Koodissa on ongelma, jokin virhe ohjelmoinnissa, puuteita koodissa, korvaa arvaamattomuudella. XD (ei ihan noin mut melkein)
Eli siis mulla on seuraavankaltainen Botti:
'Etsi Google
Dim objWshShell,IE,searchStr
Set objWshShell = Wscript.CreateObject("Wscript.Shell")
Set IE = CreateObject("InternetExplorer.Application")
searchStr = InputBox("Kirjoita Google-haku", "Boten Anna")
With IE
.Visible = True
.Navigate "http://www.google.com"
'Odota selainta
Do While .Busy
WScript.Sleep 100
Loop
.Document.getElementsByName("q").Item(0).Value = searchStr
.Document.getElementsByName("btnK").Item(0).Click
End With
With IE
.Visible = True
Do while .Busy
WScript.Sleep 100
Loop
IE.Document.getElementById("gbqfba").Click
End With
Oon yrittänyt kasata koodia eri nettisivuilta ja yrittänyt opetella sitä mukaa kuin oon saanu kasaan.
Eli kysymys on ilmaantunut.
1. Kun "Anna" avaa googlen, se kirjoittaa pyydetyn tekstin hakukenttään mutta sitten ongelmat alkavat. "Anna" ei osaa painaa Google-haku nappia mitä tuolla viimeisellä With osalla yritin saada opetettua. Miten saisin tuon napin painon onnistumaan? Kun klikkaan auennutta IE:n ikkunaa (se aukeaa taustalle, vois vaikuttaa siihen että napin paino ei onnistu) IE löytää kaiken normaalisti ja kaikki toimii... Paitsi "Anna" jonka koodi loppuu tohon.
2. Miten saisin "Annan" painamaan nappia flash sovelluksessa joka pyörii nettisivulla?
3. Tai tunnistamaan tiettyjä kuvia tai tapahtumia flash sovelluksesta.
Muualla on suositeltu käyttämään sovellusta joka saa koneen klikkaamaan tiettyä kohtaa näytössä ja se ei toimi koska koulut ja muut päivittävät sivujaan jolloin ohjelma ei tietenkään toimisi niinkuin toivoisi.
Ja kohdat 2 ja 3 ovat asioita joihin en ole vielä ehtinyt tutustua mutta ajattelin että voisin kysyä nyt topicin kerran avasin.
Jos joku kokeneempi voisi neuvoa.
Nyt olis ongelma. Niinkuin Apulanta lauloi...
>>Koodissa on ongelma, jokin virhe ohjelmoinnissa, puuteita koodissa, korvaa arvaamattomuudella. XD (ei ihan noin mut melkein)
Eli siis mulla on seuraavankaltainen Botti:
'Etsi Google
Dim objWshShell,IE,searchStr
Set objWshShell = Wscript.CreateObject("Wscript.Shell")
Set IE = CreateObject("InternetExplorer.Application")
searchStr = InputBox("Kirjoita Google-haku", "Boten Anna")
With IE
.Visible = True
.Navigate "http://www.google.com"
'Odota selainta
Do While .Busy
WScript.Sleep 100
Loop
.Document.getElementsByName("q").Item(0).Value = searchStr
.Document.getElementsByName("btnK").Item(0).Click
End With
With IE
.Visible = True
Do while .Busy
WScript.Sleep 100
Loop
IE.Document.getElementById("gbqfba").Click
End With
Oon yrittänyt kasata koodia eri nettisivuilta ja yrittänyt opetella sitä mukaa kuin oon saanu kasaan.
Eli kysymys on ilmaantunut.
1. Kun "Anna" avaa googlen, se kirjoittaa pyydetyn tekstin hakukenttään mutta sitten ongelmat alkavat. "Anna" ei osaa painaa Google-haku nappia mitä tuolla viimeisellä With osalla yritin saada opetettua. Miten saisin tuon napin painon onnistumaan? Kun klikkaan auennutta IE:n ikkunaa (se aukeaa taustalle, vois vaikuttaa siihen että napin paino ei onnistu) IE löytää kaiken normaalisti ja kaikki toimii... Paitsi "Anna" jonka koodi loppuu tohon.
2. Miten saisin "Annan" painamaan nappia flash sovelluksessa joka pyörii nettisivulla?
3. Tai tunnistamaan tiettyjä kuvia tai tapahtumia flash sovelluksesta.
Muualla on suositeltu käyttämään sovellusta joka saa koneen klikkaamaan tiettyä kohtaa näytössä ja se ei toimi koska koulut ja muut päivittävät sivujaan jolloin ohjelma ei tietenkään toimisi niinkuin toivoisi.
Ja kohdat 2 ja 3 ovat asioita joihin en ole vielä ehtinyt tutustua mutta ajattelin että voisin kysyä nyt topicin kerran avasin.
Jos joku kokeneempi voisi neuvoa.
Vastaukset 4
Vanhimmat
Hei taas.
Sain alun ongelmat selätettyä muokkaamalla koodin toiseen muotoon. Lisäksi sain lisättyä sivun mille olen menossa joten koodi näyttää nyt tältä:
Set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "iexplore.exe",3
wscript.sleep (7000)
WshShell.sendkeys "{F6}"
wscript.sleep (2000)
WshShell.Sendkeys "http://pelikone.fi/pelit/arcade-pelit/Goodgame-Empire/11409"
WshShell.sendkeys "{ENTER}"
wscript.sleep (60000)
Mutta nyt en saa ohjelmaa klikkaamaan painiketta jossa lukee pelaa koko ruudulla. Tuossa on sivun HTML koodi painikkeesta:
Pelaa koko ruudulla
Nyt en siis ymmärrä millä koodilla saan tuon klikkaamaan tuota nappia...?
Onko ratkaisu ison nenän varjossa..?
Oho. Ei antanut tota HTML...
Tossa:
Pelaa koko ruudulla
No ei vieläkään...?
/script>
ul class="gamepage-action-bar">
li class="gamepage-action" style="position:relative">Pelaa koko ruudulla
Poistin parit < joten jos nyt toimis...
Osa tuli jo XD
/script>
ul class="gamepage-action-bar">
li class="gamepage-action" style="position:relative">span class="preroll-counter">/span>a rel="nofollow" title="Pelaa koko ruudulla" class="do-fullscreen action-bar-fullscreen disabled dd-pngfix" href="#">Pelaa koko ruudulla/a>/li>
Poistinpa niitä lisää...