'SEGUNDA PARTE:
objSMTP.Subject = "Envio de de un archivo ,por: " & upload.form("E-MAIL") & " , " & upload.form("NOMBRE") '& vbCrLf
cristianchile = "Envio de de un archivo" & vbCrLf