% set objMessage = createobject("cdo.message") set objConfig = createobject("cdo.configuration") ' Setting the SMTP Server Set Flds = objConfig.Fields Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" Flds.update Set objMessage.Configuration = objConfig objMessage.To = "negandhimehul@oite.com" objMessage.BCC = "mehul@oite.com" objMessage.From = "FRANCHISE_Expo_2008" objMessage.Subject = "FRANCHISE EXPO 2008 - Badges Form" // Mailer.BodyText objMessage.htmlBody = "
| Event Name : | |||
| Company Name : | |||
| Stand Number : | |||
| Email : | |||
|
Please type below names of all your colleagues who will represent your company at the exhibition stand) |
|||
| Full Name | Company | ||
|
|
|||
|