Регулярное выражение для удаления всего текста, кроме

Question

Там может быть более простой способ, и если есть, я все для этого.Тем не менее - моя страница ASP.NET имеет множество элементов управления, и я дал им все идентификаторы, которые начинаются с подчеркивания.Я скопировал всю разметку в Notepad ++ и пытаюсь найти регулярное выражение, которое найдет все, кроме элементов управления, и заменит его пробелом.таким образом у меня будет текстовый файл со всеми именами элементов управления, которые я, вероятно, добавлю в Excel и выполню некоторые операции со строками, чтобы добавить ".Text =" и т. д.

Answer 1

Если вы просто хотите, чтобы все имена элементов управления вы могли легко перечислить в вашей коллекции Page.Controls во время выполнения (при необходимости переходя к дочерним элементам управления) и распечатать список в любом формате, который вы хотите, даже добавив свой ".Text = ... "прямо там.

Answer 2

Значительным преимуществом FrontPage 2003 ($) и SharePoint Designer 2007 (бесплатно) (если у вас установлена ​​одна из них) является возможность доступа к документу через VBA.

Вы можете сделать то же самое, загрузив веб-страницу в WebBrowser control и получив доступ к классу HtmlDocument через свойство Document.

Я не могу найти свой код VBA, который делаетименно то, что вы хотите, но я нашел следующую процедуру, которая может помочь.

Option Explicit

Sub GatherFieldNames()
    Dim tag  As FrontPageEditor.IHTMLElement
    Dim i As Long
    Dim sDoc As String

    sDoc = vbNullString
    For i = 0 To ActiveDocument.all.Length - 1
        Set tag = ActiveDocument.all.Item(i)
        Select Case LCase$(tag.tagName)
            Case "form"
            Case "input", "select", "textarea"
                'sDoc = sDoc & Trim$(tag.Name) & vbCrLf
                'or
                sDoc = sDoc & Trim$(tag.getAttribute("name")) & vbCrLf
            Case "option"
                'included with select
            Case "table", "tbody", "tr", "td"
            Case "b", "font"
            Case "br", "p", "div", "hr", "span"
            Case "a", "img"
            Case "html", "head", "meta", "body", "script", "title", "link"
            Case "h1", "h2", "h3", "h4", "h5", "h6"
            Case "strong"
            Case "webbot"
            Case Else
              Debug.Print tag.tagName
        End Select
    Next i

End Sub