VB.NET中怎么访问Iframe

VB.NET中怎么访问Iframe,相信很多没有经验的人对此束手无策,为此本文总结了问题出现的原因和解决方法,通过这篇文章希望你能解决这个问题。

成都网站建设、成都网站设计服务团队是一支充满着热情的团队,执着、敏锐、追求更好,是创新互联的标准与要求,同时竭诚为客户提供服务是我们的理念。创新互联把每个网站当做一个产品来开发,精雕细琢,追求一名工匠心中的细致,我们更用心!

VB.NET访问Iframe前台页面:

  1. < %@ Page Language="VB" AutoEventWireup="false" 
    CodeFile="mailindex.aspx.vb" Inherits="mailindex" %> 

  2. < %@ Register Assembly="Microsoft.Web.UI.WebControls, 
    Version=1.0.2.226, Culture=neutral, PublicKeyToken=31bf3856ad364e35" 

  3. Namespace="Microsoft.Web.UI.WebControls" TagPrefix="iewc" %> 

  4. < !DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//
    EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 

  5. < html xmlns="http://www.w3.org/1999/xhtml" > 

  6. < head runat="server"> 

  7. < title>供應商郵件管理< /title> 

  8. < link href ="body.css" rel ="Stylesheet" type ="text/css" /> 

  9. < script language ="javascript" type ="text/javascript" > 

触发iframe中删除按钮的事件

  1. function get_delbt()  

  2. {  

  3. var info=window.confirm('確定要刪除該郵件嗎?');  

  4. if (info==true)  

  5. {  

  6. //这句很关键,通过找到mainframe,运用dom访问其中的控件btdel
    (删除按钮),执行服务器操作click  

  7. document.getElementById("mainframe").contentWindow.document.
    getElementById("btdel").click();  

  8. }  

  9. }  

触发iframe中清空按钮的事件

  1. function get_delallbt()  

  2. {  

  3. var info=window.confirm('確定要清空該郵件夾嗎?');  

  4. if (info==true)  

  5. {  

  6. document.getElementById("mainframe").contentWindow.document.
    getElementById("btalldel").click();  

  7. }  

  8. }   

  9. < /script> 

  10. < /head> 

  11. < body> 

  12. < form id="form1" runat="server"> 

  13. < !--#include virtual="head.inc"--> 

  14. < div align ="center" > 

  15. < table width ="750px" background="images/back.gif">   

  16. < thead > 

  17. < tr> 

  18. < th colspan ="5" align ="left" > 

  19. < iewc:Toolbar ID="Toolbar1" Width ="400px" 
    DefaultStyle ="background-image:url(images/BackgroundT.bmp)" 
    ToolTip ="工具欄" OnButtonClick ="toolbarbt_click" runat="server"> 

  20. < iewc:ToolbarButton ID="inputbt" 
    ImageUrl="TreeLineImages/inbox.bmp" Text ="接收郵件"/> 

  21. < iewc:ToolbarButton ID="newbt" 
    ImageUrl="TreeLineImages/unreader.bmp" Text ="撰寫郵件" /> 

  22. < iewc:ToolbarSeparator /> 

  23. < iewc:ToolbarButton ID="delbt" 
    ImageUrl="TreeLineImages/unout.bmp" Text= "刪除郵件" /> 

  24. < iewc:ToolbarSeparator /> 

  25. < iewc:ToolbarButton ID="clearbt" 
    ImageUrl="TreeLineImages/reback.bmp" Text ="清空郵件" /> 

  26. < iewc:ToolbarSeparator /> 

  27. < iewc:ToolbarButton ID="infobt" 
    ImageUrl="TreeLineImages/hold.bmp" Text= "信息統計" /> 

  28. < iewc:ToolbarSeparator /> 

  29. < iewc:ToolbarButton ID="addressbt" 
    ImageUrl="TreeLineImages/mailbox.bmp" Text ="地址薄" />   

  30. < /iewc:Toolbar> 

  31. < /th> 

  32. < /tr> 

  33. < /thead> 

  34. < tbody > 

  35. < tr> 

  36. < td colspan="4" valign ="top" rowspan="2"> 

  37. < iframe id="mainframe" name ="mainframe" runat ="server" 
    scrolling="auto" width ="600px" height ="400px" >< /iframe> 

  38. < /td>   

  39. < /tr> 

  40. < tr> 

  41. < /tr>   

  42. < /tbody> 

  43. < tfoot > 

  44. < tr> 

  45. < /tr> 

  46. < /tfoot> 

  47. < /table> 

  48. < /div> 

  49. < input id="delbt1" type="button" runat ="server" value="delete" /> 

  50. < input id="clearbt1" type="button" runat ="server" value="clear" />   

  51. < /form> 

  52. < /body> 

  53. < /html> 


  1. Sub toolbarbt_click(ByVal sender As Object, ByVal e As EventArgs)  

  2. Select Case sender.id.ToString  

  3. Case "inputbt"  

  4. inputmail()  

  5. Return  

  6. Case "newbt"  

  7. Response.Write("< script>javascript:window.showModelessDialog
    ('sendmail.aspx',window,'dialogWidth:800px;resizable:yes;');
    < /script>")  

  8. Return  

  9. Case "delbt"  

  10. Me.delbt1_ServerClick(delbt1, New EventArgs) '触发delbt1的click事件  

  11. Case "clearbt"   

  12. Me.clearbt1_ServerClick(clearbt1, New EventArgs) 

  13. '触发clearbt1的click事件,下面红色部分  

  14. Case "infobt"  

  15. Response.Write("< script>javascript:window.showModelessDialog
    ('mailinfo.aspx',window,'dialogWidth:800px;resizable:yes;');
    < /script>")  

  16. Return  

  17. Case "addressbt"  

  18. Response.Write("< script>javascript:window.showModelessDialog
    ('mailbook.aspx',window,'dialogWidth:800px;resizable:yes;');
    < /script>")  

  19. Return  

  20. Case Else  

  21. Response.Write("請選擇按鈕")  

  22. End Select  

  23. End Sub  

  24. Protected Sub delbt1_ServerClick(ByVal sender As Object, 
    ByVal e As System.EventArgs) Handles delbt1.ServerClick  

  25. '调用JS方法:get_delbt().执行iframe中删除按钮的事件!  

  26. Page.ClientScript.RegisterStartupScript(GetType(String), "", 
    "< script>javascript:get_delbt();< /script")  

  27. End Sub  

  28. Protected Sub clearbt1_ServerClick(ByVal sender As Object, 
    ByVal e As System.EventArgs) Handles clearbt1.ServerClick  

  29. '调用JS方法:get_delallbt().执行iframe中清空按钮的事件!  

  30. Page.ClientScript.RegisterStartupScript(GetType(String), "", 
    "< script>javascript:get_delallbt();< /script")  

  31. End Sub 

看完上述内容,你们掌握VB.NET中怎么访问Iframe的方法了吗?如果还想学到更多技能或想了解更多相关内容,欢迎关注创新互联行业资讯频道,感谢各位的阅读!


新闻标题:VB.NET中怎么访问Iframe
网页网址:http://myzitong.com/article/geoosi.html