Subversion Repositories DevTools

Rev

Rev 15 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15 Rev 19
Line 79... Line 79...
79 
	' Attach the file
 79 
	' Attach the file
80 
	myMail.AddAttachment LocalPath
 80 
	myMail.AddAttachment LocalPath
81 
	myMail.Body = "Your requested xml files .."
81 
	myMail.Body = "Your requested xml files .."
82 
	myMail.Send
 82 
	myMail.Send
83
83
84 
	set myMail=nothing
 84 
	set myMail = nothing
- 
 
 85 
	set objWSH = nothing
85
86
86 
	rsQry.Close
 87 
	rsQry.Close
87 
	Set rsQry = nothing
 88 
	Set rsQry = nothing
88
89
89 
	'Response.write "<br>You will be emailed shortly with the XML files generated.<br>"
 90 
	'Response.write "<br>You will be emailed shortly with the XML files generated.<br>"