hola a todos... tengo los pedazos del o que necesito
ahora tengo que unirlos.. me ayudan?
por un lado.. obtengo todos los archivos de un directorio
Código HTML:
Set filesys = CreateObject("Scripting.FileSystemObject")
Set demofolder = filesys.GetFolder(Server.MapPath("modelos/"))
Set filecoll = demofolder.Files
For Each fil in filecoll
filist = filist & Server.MapPath("modelos/" & fil.name)
filist = filist & "<BR>"
Next
Response.Write filist
y por otro lado el cdonts que envia el email.
como deberia dejar la linea del attachfile?
Código HTML:
Dim MyMail
Set MyMail = Server.CreateObject("CDONTS.NewMail")
MyMail.From = "[email protected]"
MyMail.To = "[email protected]"
MyMail.Subject = "prueba peoplesoft"
MyMail.BodyFormat = 1
MyMail.MailFormat = 0
MyMail.Importance = 2
MyMail.Body = sContenido
MyMail.Attachfile "c:\path\smiley.gif", "smilefile.gif", 1
MyMail.Send
Set MyMail = Nothing
espero ser comprendido
muchas gracias!!!! y
