10-01-16, 05:38 AM
السلام عليكم يا غالى
انا استخدم اداة awesomium browser
فى برنامجى بدلا من اداة الويب بروسر
اريد الربط بين التكست بوكس وتكست الرسالة فى المتصفح
والضغط على زر الارسال
محاولاتى
اولا عند ربط التكست
عملت الكود التالى
wbsms.ExecuteJavascript(String.Format("document.ge tElementById('composerInput').value='{0}'", "111"))
واشتغل تمام
111 هى القيمة الى بتتكتب فى التكست
ولكن لما احب اربطه من التكست نفسه بهذا الكود
Dim setmsg As String
setmsg = smst.Text
wbsms.ExecuteJavascript(String.Format("document.ge tElementById('u_0_r').SetAttribute='{0}'", setmsg))
مش بيشتغل
اما كود زر غلبنى معاه حوالى 3 ساعات
جربت اكتر من طريقة واكتر من كود
وهذا اخر كود جربته وبردو مش بيضغط على الزر
التجربة الاولى
wbsms.ExecuteJavascript(String.Format("docume nt.getElementsByTagName('u_0_6')[0]", "click"))
التجربة الثانية
wbsms.ExecuteJavascript("document.getElementById(' u_0_6')[0]", "click")
ودا رابط الصفحة
من هنا
انا استخدم اداة awesomium browser
فى برنامجى بدلا من اداة الويب بروسر
اريد الربط بين التكست بوكس وتكست الرسالة فى المتصفح
والضغط على زر الارسال
محاولاتى
اولا عند ربط التكست
عملت الكود التالى
wbsms.ExecuteJavascript(String.Format("document.ge tElementById('composerInput').value='{0}'", "111"))
واشتغل تمام
111 هى القيمة الى بتتكتب فى التكست
ولكن لما احب اربطه من التكست نفسه بهذا الكود
Dim setmsg As String
setmsg = smst.Text
wbsms.ExecuteJavascript(String.Format("document.ge tElementById('u_0_r').SetAttribute='{0}'", setmsg))
مش بيشتغل
اما كود زر غلبنى معاه حوالى 3 ساعات
جربت اكتر من طريقة واكتر من كود
وهذا اخر كود جربته وبردو مش بيضغط على الزر
التجربة الاولى
wbsms.ExecuteJavascript(String.Format("docume nt.getElementsByTagName('u_0_6')[0]", "click"))
التجربة الثانية
wbsms.ExecuteJavascript("document.getElementById(' u_0_6')[0]", "click")
ودا رابط الصفحة
من هنا