完成搜索后如何在Web浏览器中显示XML文档 [英] How to display XML document in web browser after finished searching

问题描述

您好，



我有一个vb代码，可以搜索任何.xml文件，其标题中包含verify一词。



完成搜索后，我希望通过ASP.NET在Web浏览器上显示XML文件。



有没有有什么方法可以实现这个目标吗？



非常感谢任何帮助。



以下是我目前的代码看起来像：

Hello,

I have a vb code that search for any .xml file which contains the word 'verify' in its title.

After finished searching, I would like the XML file to be displayed on the web browser via ASP.NET.

Is there any ways to achieve this?

Any help is greatly appreciated.

Below is how my current code looks like:

Partial Class _Default
    Inherits System.Web.UI.Page
    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        'To find subdirectories with a specific pattern/WILD CARD
        'ms-help://MS.VSExpressCC.v80/MS.NETFramework.v20.en/dv_vbcn/html/c9265fd1-7483-4150-8b7f-ff642caa939d.htm
        'Me.ListBox1.Items.Clear()
        Dim path As String = "\\" + TextBox1.Text + "\E$"
        Dim searchPattern As String = "*verify*.xml"
        For Each value As String In My.Computer.FileSystem.GetFiles(path, FileIO.SearchOption.SearchAllSubDirectories, searchPattern
                                                                    )
            ListBox1.Items.Add(value)
            'TextBox1.Text = "found"
        Next
    End Sub
    Protected Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged
    End Sub
    Protected Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    End Sub
End Class

推荐答案

Dim searchPattern As String = * verify * .xml
For 每个值作为 字符串 在 My.Computer.FileSystem中.GetFiles（path，FileIO.SearchOption.SearchAllSubDirectories，searchPattern
）
ListBox1.Items.Add（value）
' TextBox1.Text =found
下一步
结束 Sub
受保护的 Sub ListBox1_SelectedIndexChanged（发件人作为 对象，e 作为 EventArgs）句柄 ListBox1.SelectedIndexChanged
结束 Sub
受保护的 Sub TextBox1_TextChanged（sender 正如 对象，e As EventArgs）句柄 TextBox1.TextChanged
结束 Sub
结束 类

" Dim searchPattern As String = "*verify*.xml" For Each value As String In My.Computer.FileSystem.GetFiles(path, FileIO.SearchOption.SearchAllSubDirectories, searchPattern ) ListBox1.Items.Add(value) 'TextBox1.Text = "found" Next End Sub Protected Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged End Sub Protected Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged End Sub End Class

这篇关于完成搜索后如何在Web浏览器中显示XML文档的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！