我需要帮助将伪代码转换为vb.net代码

时间:2012-04-21 22:47:55

标签: vb.net webbrowser-control pseudocode vb.net-2010

我正在尝试使用webbrowser控件与网页进行交互,有一个我需要与之交互的特定元素,但对于我的生活,我不能尝试通过id,href,src,元素图像调用,电影,地狱甚至bgcolor但无济于事。然后我发现了这个想法,我把它组织成一种伪代码,现在需要帮助在代码中实现它。

  • 创建变量类型点。
  • 设置指向我在浏览器中点击的位置(有点像getelementfrompoint,但我无法让它工作)
  • msgbox =指向字符串
  • 将html元素设置为指向
  • 调用html元素(“click”)`

有人可以帮我这个吗? 编辑: 谢谢你的答案,但正如我所说的尝试按元素id调用,但是有几个id标签,我不能告诉哪一个是正确的(我的HTML知识有限)但是我尝试了所有我能找到的那些保留给有问题的对象,但没有一个工作,这里是对象的HTML

 <div id="button">
            <script type="text/javascript">                                         function disableButton() {                          btn = document.getElementById('sbutton');                           btn.style.display = 'none';                         btn_clicked = document.getElementById('sbutton_clicked');                           btn.style.display = 'block';                        }                                       </script>
                <div id="sbutton" style="z-index:1">                        
                <script language="javascript">
                        AC_FL_RunContent(
                            'codebase', 'http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,0,0',
                            'width', '373',
                            'height', '373',
                            'src', '/images/buttons/',
                            'quality', 'high',
                            'pluginspage', 'http://www.macromedia.com/go/getflashplayer',
                            'align', 'middle',
                            'play', 'false',
                            'loop', 'true',
                            'scale', 'showall',
                            'wmode', 'transparent',
                            'devicefont', 'false',
                            'id', '',
                            'bgcolor', '#ddeef6',
                            'name', '',
                            'menu', 'true',
                            'allowFullScreen', 'false',
                            'allowScriptAccess','sameDomain',
                            'movie', '/images/buttons/button_2',
                            'salign', ''
); //end AC code
                    </script><embed style="z-index:1;position:relative" width="373" height="373" src="/images/buttons/button_2.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" align="middle" play="false" loop="true" scale="showall" wmode="transparent" devicefont="false" bgcolor="#ddeef6" name="" menu="true" allowfullscreen="false" allowscriptaccess="sameDomain" salign="" type="application/x-shockwave-flash">
                    <noscript>
                        &lt;object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,0,0" width="373" height="373" id="" align="middle" style="z-index:1"&gt;
                            &lt;param name="allowScriptAccess" value="sameDomain" /&gt;
                            &lt;param name="allowFullScreen" value="false" /&gt;
                            &lt;param name="movie" value="/images/buttons/button_2.swf" /&gt;&lt;param name="quality" value="high"    /&gt;&lt;param name="bgcolor" value="#ddeef6" /&gt;   &lt;embed src="/images/buttons/.swf" quality="high" bgcolor="#ddeef6" width="373" height="373" name="" align="middle" allowScriptAccess="sameDomain" allowFullScreen="false" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" /&gt;
&lt;!-- no_flash content --&gt;
                            &lt;a href="/button/push_the_button" data-method="post" onmousedown="disableButton();return false;" rel="nofollow"&gt;&lt;img alt="sbutton" src="/images/sb/sbutton.jpg?1331667296" /&gt;&lt;/a&gt;
                            &lt;!-- end no_flash content --&gt;
                        &lt;/object&gt;
                    </noscript>
                </div>
                <div id="sbutton_clicked" style="display:none">
                    <img alt="sbutton" src="/images/sb/sbutton.jpg?1331667296">
                </div>
        </div>

我试过按钮按钮调用.swf(我确实玩了,但是我认为我没有点击这么恶心去试试现在)也试过sbutton_clicked等找不到一个会激活它的。我现在完全失去了,只是吐痰。 非常感谢任何帮助

1 个答案:

答案 0 :(得分:0)

欢迎使用Stackoverflow。 请注意这个问题过于宽泛。在发布下一个问题之前,请先阅读http://https://stackoverflow.com/FAQhttp://whathaveyoutried.comhttps://meta.stackexchange.com/questions/128548/what-stack-overflow-is-not,谢谢。

1,2&amp; 3)

http://homepage.ntlworld.com/kayseycarvey/jss3p2.html

<HEAD>
<TITLE>XY Coordinates</TITLE>

<SCRIPT Language = javascript>

function XYpos() {
xPos = event.screenX
yPos = event.screenY
alert(xPos + " left " + yPos + " down")
}

</Script>

</HEAD>

<BODY onMouseDown = XYpos()>

或尝试此示例:http://www.brenz.net/snippets/xy.asp

4)https://www.google.com.au/search?q=set+html+element+to+point

5)你可以通过Javascript或VB.Net调用点击:

Private Function ClickSubmitButton()
    Dim theButton As HtmlElement

    Try

        ' Link the ID from the web form to the Button var
        theButton = webbrowser1.Document.GetElementById("htmlElementId")

        ' Now do the actual click.
        theButton.InvokeMember("click")
        Return True

    Catch ex As Exception

        Return False

    End Try

End Function

如果你想在VB.Net代码而不是javascript(如第5点所示)中更多地控制它,你可以尝试这样的技术:how to open windows form control in a web page?