creazione mail

[gguida]

ragazzi non mi funziona l'invio mail ma non vedo errori.....e da un altra pagina funziona...

myRoot= "/mio.mdb"
					set fs=Server.CreateObject("Scripting.FileSystemObject") 
					set f=fs.GetFile (Server.MapPath(myRoot)) 
					'Response.Write(f.Size & " bytes.")
					'If f.size >  6022272 bytes.  then
						Set link = CreateObject("CDONTS.Newmail")
							link.From = "Automatic Web Mail DataBase Full"
							link.To = "giovanni@raffygio.com"
							link.Subject = "Automatic Web Mail DataBase Full"
							link.Body = "Please, download the database -DBSTATS-, because is more big..."
							link.Send
						Set link = Nothing
					'End If
					set f=nothing 
					set fs=nothing 
					set filen=nothing