As a VS Macro (Warning: VB)<p>Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports EnvDTE90a
Imports EnvDTE100
Imports System.Diagnostics<p>Public Module Module1<p><pre><code> Sub ClassNameGen()
Dim res As String
Dim req As System.Net.WebRequest = System.Net.HttpWebRequest.Create("http://www.classnamer.com/")
Dim rsp = req.GetResponse()
Using sr As New System.IO.StreamReader(rsp.GetResponseStream())
res = sr.ReadToEnd()
End Using
Dim doc As Document = DTE.ActiveDocument
Dim textDoc As TextDocument = CType(doc.Object("TextDocument"), TextDocument)
textDoc.StartPoint.CreateEditPoint()
Dim strstr As String = "<p id=""classname"">"
Dim endstr As String = "</p>"
Dim strt As Integer = res.IndexOf(strstr)
textDoc.Selection.Insert(res.Substring(strt + strstr.Length, res.Length - (res.IndexOf(endstr, strt) + endstr.Length)))
End Sub
</code></pre>
End Module
I was about to make a snarky comment like "ShootMeNow", until I realized that OP may actually have a real winner on his hands...<p>Think about it.<p>It a Big 5 consulting firm acquired this and used it in their enterprise web app practice, would anyone ever be able to tell the difference?