Microsoft VBScript compilation error '800a0409'

Unterminated string constant

/emaillist/addaddress.asp, line 36

Mail.From = "support@Xray-Supplies.com ' Specify sender's address
-----------------------------------------------------------------^