[problem] #include <IE.au3> do Msgboxa

[KingSP1MPC]

Witam. Próbowałem a nie mogę. Zawsze wywala 0 albo 1.

 

 

co ma skrypt robić (niezbyt skomplikowana czynność)

 

1. ze strony "http://translate.google.pl/" odczytał to co wpiszę się w te białe pole za pomocą Komunikatu np. msgboxa

[4ggr35510n]

Dziwne. Ja próbowałem i mogę.

 

 

 

 

SKRYPT I LOGI!!!!!!!

 

[KingSP1MPC]

Ujawnisz się z wiedzą?

[wojtek333314]

Widać nie zrozumiałeś dowcipu...może zbyt inteligentnie...więc powiem wprost co chciała 4ggr:

daj skrypt i logi błędu ze Scite jesli takowe istnieja to powiemy Ci co jest nie tak.

[KingSP1MPC]

#include <IE.au3>

Local $googletranslate = _IECreate("http://translate.google.pl/")
Local $ohard = _IEGetObjById($googletranslate, "source")
_IEFormElementSetValue($ohard, "mpc")
_IELoadWait($googletranslate)
Sleep(500)
MsgBox(0,"text z inputa! to :",$ohard)

 

 

prawie działa...

[Sopelek997]

nie znam się na ie, ale chyba najpierw powinno się czekać na wczytanie strony, a potem wykonywać na niej operacje

[wojtek333314]

o to kaman? :

#include <IE.au3>

Local $googletranslate = _IECreate("http://translate.google.pl/")
Local $ohard = _IEGetObjById($googletranslate, "source")
_IEFormElementSetValue($ohard, "mpc")
$wartosc=_IEFormElementGetValue($ohard)
_IELoadWait($googletranslate)
Sleep(500)
MsgBox(0,"text z inputa! to :",$wartosc)

 

@down: przecież skrypt co podałem mu działa

[RobeM]

ze złej strony się wziąłeś za to , z texteditów raczej nie wczytuje normalnie tekstu

 

tak przy okazji żebyś się nie męczył http://www.autoitscr...gle-translator/

na forum o wiele więcej podobnych skryptów z obsługa API google

 

 

zobacz też ten skrypt, nie mam jak sprawdzić czy działa :

 

#include <IE.au3>
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>

$Form1 = GUICreate("iTranslate", 360, 400, 300, 124)
$Button1 = GUICtrlCreateButton("Translate", 270, 370, 75, 25)
$combo = GUICtrlCreateCombo("", 10, 35, 150)
GUICtrlSetData(-1,"English|French|Italian")
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
   Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$oIE = _IECreate("[url="http://translate.google.com/"]http://translate.google.com/[/url]#")
$oForm = _IEFormGetObjByName($oIE, "text_form")
$oText = _IEFormElementGetObjByName($oForm, "text")
_IEFormElementSetValue($oText, "hello")
Sleep(3000)
$id1 = _IEGetObjById($oIE, "gt-sl-gms")
ControlClick($oIE, "goog-inline-block goog-flat-menu-button je", $id1)
$id = _IEGetObjById($oIE, "result_box")
$oText1 = _IEPropertyGet($id, "innertext")
MsgBox(0, "Value", $oText1)
$select = GUICtrlRead($combo)
Switch $select
Case "French"
 MsgBox(0,"Message","This should translate French")
Case "English"
 MsgBox(0,"Message","This should translate English")
Case "Italian"
 MsgBox(0,"Message","This should translate Italian")
EndSwitch
EndSwitch
WEnd