gracias por todo.
Aun no me dice la descripcion del error solo dice:
There is a problem with the page you are trying to reach and it cannot be displayed.
--------------------------------------------------------------------------------
Please try the following:
Open the
www.netservicescr.com home page, and then look for links to the information you want.
Click the Refresh button, or try again later.
Click Search to look for information on the Internet.
You can also see a list of related sites.
HTTP 500 - Internal server error
Internet Explorer
sin embargo miren el codigo:
on error resume next
set em = Server.CreateObject("CDONTS.NewMail")
em.From = "
[email protected]"
em.To = "
[email protected]"
'em.Cc = "
[email protected]"
em.Subject = "Información desde " & titulo
em.AttachFile Server.Mappath("adjunto/"&Session("filename"))
em.bodyformat = 0
em.mailformat = 0
em.Body = text
em.Send
'Eliminando el fichero.
Set oFSO = Server.CreateObject("Scripting.FileSystemObject")
oFSO.Deletefile(Server.Mappath("adjunto/"&Session("filename"))
Set oFSO = Nothing
if err.number<>0 then
response.write err.number &"<br>"
response.write err.description
response.end
end if
Bueno que opinan?