在新的IE窗口中打开Url(VB.net)

       

在新的IE窗口中打开Url(VB.net)

        Dim startInfo As New System.Diagnostics.ProcessStartInfo("IExplore.exe", "http://www.hao123.com/")
        startInfo.CreateNoWindow = True
        System.Diagnostics.Process.Start(startInfo) 

VB.NET,如果你希望通过WebBrowser控件间接操作Excel应用,由于WebBrowser本身并不能直接控制本地应用程序,你需要借助一些技术手段来实现。以下是一种常见的间接方法: 首先,你可以编写一个JavaScript函数,让Excel打开时发送一个消息到父窗口(也就是你的VB.NET程序)。这可以通过HTML5的Window.postMessage API实现: ```html <!-- HTML部分 --> <button onclick="openExcel()">打开Excel</button> <script> function openExcel() { // 创建一个的Excel应用 const excelApp = new ActiveXObject("Excel.Application"); // 打开文件 excelApp.Workbooks.Open("你的文件路径"); // 当Excel准备好后发送一个message给父窗口 window.parent.postMessage({ action: 'excelOpened', data: excelApp }, '*'); } </script> ``` 然后,在VB.NET的WebBrowser的DocumentCompleted事件,监听来自JavaScript的消息并处理: ```vb Private Sub webBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles webBrowser1.DocumentCompleted If e.Url.ToString.Contains(".html") Then Dim jsFunction As String = "<script>window.onmessage = function(e) {" & _ "if (e.data.action === 'excelOpened') {" & _ " var app = e.data.data;" & _ " ' 这里你可以使用app变量来操作Excel,例如保存或关闭" & _ "}</script>" webBrowser1.Document.InvokeScript("eval", New Object() {jsFunction}) End If End Sub ``` 这里只是一个示例,实际操作Excel应用可能涉及到更多的API调用,比如`app.Worksheets.Add`, `app.ActiveWorkbook.SaveAs`, 等。注意,这种方式依赖于ActiveX对Excel的支持,并且如果用户的计算机上禁用了ActiveX,那么上述方法就无法工作。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值