سلام و عرض ادب دارم خدمت آقای شاهپیری عزیز و تمامی برنامه نویسان گرامی انجمن
بنده به عنوان تست کردن گت المنت از این کدها استفاده کرده ام:
Sub Globals
Private WebView1 As WebView
Private Button1 As Button
Private EditText1 As EditText
Dim we As WebViewExtras
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout")
we.addJavascriptInterface(WebView1,"w")
we.addWebChromeClient(WebView1,"")
WebView1.LoadUrl("https://answercenter.ir")
End Sub
Sub Button1_Click
we.executeJavascript(WebView1,"w.CallSub('get_username',true,document.getElementsByClassName('ipsType_sectionTitle ipsType_reset ipsType_blendLinks cForumTitle')[0].innerText)")
End Sub
Sub get_username(username As String)
Msgbox(username,"")
End Sub
میخوام مثلا یک متنی رو بگیره و داخل msgbox نشون بده. ولی متاسفانه هنگام کلیک روی دکمه هیچ اتفاقی نمیفته! سایت های متفاوتی رو هم امتحان کردم و در اینجا از همین انجمن به عنوان تست استفاده کرده ام.خب به نظرتون مشکل کجاست؟
سوال
امیرحسین قاسمی 610
سلام و عرض ادب دارم خدمت آقای شاهپیری عزیز و تمامی برنامه نویسان گرامی انجمن
بنده به عنوان تست کردن گت المنت از این کدها استفاده کرده ام:
میخوام مثلا یک متنی رو بگیره و داخل msgbox نشون بده. ولی متاسفانه هنگام کلیک روی دکمه هیچ اتفاقی نمیفته! سایت های متفاوتی رو هم امتحان کردم و در اینجا از همین انجمن به عنوان تست استفاده کرده ام.خب به نظرتون مشکل کجاست؟
متنی هم که میخوام بگیرم مثلا مشخصاتش اینه:
این تصویر رو ملاحظه بفرمایید:
ممنون میشم راهنمایی بفرمایید.
لینک ارسال
به اشتراک گذاری در سایت های دیگر
2 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.