VS 2008 Streamlining Submit / Contact Forms

One thing I do often is have a Submit/Contact form on a page. Sometimes the fields are the same (name, email phone etc) but sometimes there are additional ones. Normally i just copy the code and from another page and modify it.So i will use something like this

Code:
Const fromAddress As String = "sales@asdf.com"
'(1) Create the MailMessage instance
Dim mm As New MailMessage(fromAddress, "sales@asdf.com")
'(2) Assign the MailMessage's properties
mm.CC.Add("support@asdf.com")
mm.Subject = "subject Name-" & destdrop.SelectedItem.ToString

[code]....

At times I insert the information in a database as well.