My Happy Moments

Recently I was asked to write a code to send entire Aspx page as an HTML mail using VB.Net.
Private Function ReadAspxPage(ByVal url As String) As String
Dim htmlPage As String
Dim objResponse As System.Net.WebResponse
Dim objRequest As System.Net.WebRequest = System.Net.HttpWebRequest.Create(url)
objResponse = objRequest.GetResponse()
Dim readpage As New System.IO.StreamReader(objResponse.GetResponseStream())
htmlPage = readpage.ReadToEnd()
readpage.Close()
Return htmlPage.toString()
End Function

Share and Enjoy:

Private Function GetEmailTemplate(ByVal templateName As String) As String
Dim sr As IO.StreamReader = New IO.StreamReader(System.Web.HttpContext.Current.Server.MapPath(templateName))
Dim body As String = sr.ReadToEnd()
sr.Close()
sr.Dispose()
[...]

I was asked to read all Mail merge Files in an HTML Template and then perform a mail Merge.
The MailMerge Fields were like ##[Field]##.
So thought to use regex to find the fields.
The biggest task for me was to write a regex for Matching ##[Merge Fields]##.

Share and Enjoy: