I have recently switched to Network solutions and found that my email form page was no longer working. Network solutions tech support told me that the site is coded wrong for their systems, the script is below.

Can anybody show me where this is wrong?

If (CStr(Request("MM_insert")) <> "") Then
' send email
' change to address of your own SMTP server
strHost = "xxxx.xxxx.com"


Set Mail = Server.CreateObject("Persits.MailSender")
' enter valid SMTP host
Mail.Host = strHost
Mail.Username = "xxxx@xxxx.com"
Mail.Password = "xxxx"
Mail.AddAddress "xxxxx@xxxxx.com"

Mail.From = "information@hvpsi.com" ' From address
Mail.FromName = Request("FromName") ' optional

' message subject
Mail.Subject = "Sent from www.hvpsi.com"
' message body
Mail.Body = "Request_Type = Form from High Voltage Power Solutions" + chr(10) + _
"name = " + Request("name") + chr(10) + _
"company = " + Request("company") + chr(10) + _
"address = " + Request("address") + chr(10) + _
"city = " + Request("city") + chr(10) + _
"state = " + Request("state") + chr(10) + _
"zip = " + Request("zip") + chr(10) + _
"count = " + Request("country") + chr(10) + _
"phone = " + Request("phone") + chr(10) + _
"fax = " + Request("fax") + chr(10) + _
"email = " + Request("email") + chr(10) + _
"website = " + Request("website") + chr(10) + _
"High Voltage Power Supplies = " + Request("interest1") + chr(10) + _
" Input Voltage = " + Request("one_a") + chr(10) + _
" Output Voltage = " + Request("one_b") + chr(10) + _
" Output Current = " + Request("one_c") + chr(10) + _
" Regulation_load_line = " + Request("one_d") + chr(10) + _
" Mechanical_Size = " + Request("one_e") + chr(10) + _
" Features = " + Request("one_f") + chr(10) + _
" Agency_Req = " + Request("one_g") + chr(10) + _
" Target_Price_Qty = " + Request("one_h") + chr(10) + _
"DC-DC Converters = " + Request("interest2") + chr(10) + _
" Input Voltage = " + Request("two_a") + chr(10) + _
" Output Voltage = " + Request("two_b") + chr(10) + _
" Output Current = " + Request("two_c") + chr(10) + _
" Regulation_Ripple = " + Request("two_d") + chr(10) + _
" Mechanical_Size = " + Request("two_e") + chr(10) + _
" Features = " + Request("two_f") + chr(10) + _
" Agency_Req = " + Request("two_g") + chr(10) + _
" Target_Price_Qty = " + Request("two_h") + chr(10) + _
"High Voltage Multiplier = " + Request("interest5") + chr(10) + _
" Input Frequency (kHz) = " + Request("five_a1") + chr(10) + _
" Input Drive Waveform = " + Request("five_a2") + chr(10) + _
" Input Voltage = " + Request("five_a") + chr(10) + _
" Output Voltage = " + Request("five_b") + chr(10) + _
" Output Current = " + Request("five_a3") + chr(10) + _
" Bleeder/Feedback Resistance = " + Request("five_a4") + chr(10) + _
" Type of Load = " + Request("five_a5") + chr(10) + _
" Other Electrical = " + Request("five_a6") + chr(10) + _
" Num of Stages = " + Request("five_c") + chr(10) + _
" Cap and Diode Ratings = " + Request("five_d") + chr(10) + _
" Mechanical_Size = " + Request("five_e") + chr(10) + _
" Target_Price_Qty = " + Request("five_f") + chr(10) + _
"Surge Suppessors and Arrestors = " + Request("interest6") + chr(10) + _
" App. Voltage = " + Request("six_a") + chr(10) + _
" Phase = " + Request("six_b") + chr(10) + _
" Secondary Arrestor = " + Request("six_c") + chr(10) + _
" Customom Surge = " + Request("six_d") + chr(10) + _
" Mechanical_Size = " + Request("six_e") + chr(10) + _
" Agency_Req = " + Request("six_f") + chr(10) + _
" Target_Price_Qty = " + Request("six_g") + chr(10) + _
"High Voltage Rectifier Ass. = " + Request("interest8") + chr(10) + _
" Max Voltage = " + Request("eight_a") + chr(10) + _
" Max current = " + Request("eight_b") + chr(10) + _
" Recovery Time = " + Request("eight_c") + chr(10) + _
" Agency_Req = " + Request("eight_d") + chr(10) + _
" Target_Price_Qty = " + Request("eight_e") + chr(10) + _
"High Voltage Digital Meters = " + Request("interest9") + chr(10) + _
"Dielectric Strength testers = " + Request("interest10") + chr(10) + _
" Input Voltage = " + Request("ten_a") + chr(10) + _
" Output Voltage = " + Request("ten_b") + chr(10) + _
" Mechanical Size reqs. = " + Request("ten_c") + chr(10) + _
" Features = " + Request("ten_d") + chr(10) + _
" Target_Price_Qty = " + Request("ten_e") + chr(10) + _
"High Voltage Diodes = " + Request("interest11") + chr(10) + _
" Max Voltage = " + Request("eleven_a") + chr(10) + _
" Max current = " + Request("eleven_b") + chr(10) + _
" Reverse Recovery Time = " + Request("eleven_c") + chr(10) + _
" Mechanical Size Reqs. = " + Request("eleven_d") + chr(10) + _
" Target_Price_Qty = " + Request("eleven_e") + chr(10) + _
"Comments = " + Request("comments") + chr(10)













strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
else
bSuccess = True
End If
Response.Redirect(Request("REDIRECT"))