平武建站

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://pwwzsj.com/article/geoosi.html

其他资讯