ASP code attachment problem

**seogurutech4** · 08-13-2008 11:58 PM

I have made below two file for sending email with attachment.
but it does not work properly.
I want to upload file form user pc.
not form my server path. and save it to my mail.

two files are below
1. form.html

<html>
<head>
<title>form to email script</title>
</head>
<body>

<div align="center">
<form method="POST" action="form_ac.asp" name="form1">
<table width="75%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>name:</td>
<td colspan="2">
<input type="text" name="name"></td>
</tr>
<tr>
<td>email:</td>
<td colspan="2">
<input type="text" name="email"></td>
</tr>
<tr>
<td>message:</td>
<td colspan="2">
<textarea name="message" cols="40" rows="5"></textarea></td>
</tr>
<tr>
<td> </td>
<td colspan="2"><label>
<input type="file" name="attach">
</label></td>
</tr>
<tr>
<td> </td>
<td colspan="2">
<input type="submit" name="Submit" value="Submit">
<input type="reset" name="Reset" value="Reset"></td>
</tr>
</table>
</form>
</div>
</body>
</html>
===========================================

2. form_ac.asp

<%@ Language="VBscript" %>
<% Option Explicit %>

<html>
<head>
<title>Message Sent</title>
</head>

<body>
<%
'declare the variables that will receive the values
'receive the values sent from the form and assign them to variables
'note that request.form("name") will receive the value entered into the textfield
'called name, and so with email and message
Dim name, email, message, NewMailObj
name=request.form("name")
email=request.form("email")
message=request.form("message")

'create the mail object and send the details
Set NewMailObj=Server.CreateObject("CDONTS.NewMail")
NewMailObj.From = "yuo@mail.com"
NewMailObj.To = "you@mail.com"
NewMailObj.Subject = "New message sent.."
NewMailObj.Body = "the name you entered was " & name & _
"<br>the email was " & email & _
"<br>the message was " & message

'you need to add the following lines FOR the mail to be sent in HTML format
NewMailObj.BodyFormat = 0
NewMailObj.MailFormat = 0
newMailObj.AddAttachment Request.Form("attach")
NewMailObj.Send
'Close the email object and free up resources
Set NewMailObj = nothing
Response.write "The email was sent."
%>

</body>
</html>
=========================================

**malhyp** · 08-17-2008 09:14 AM

What happens when you submit the form?

Cheers
Shane
Website Design Melbourne

**Marshmellow_Man** · 09-08-2008 04:11 PM

I am having the same problem. It gives me this error whenever I try opening it in my web browser:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'BodyFormat'

**Bullschmidt** · 09-09-2008 12:53 AM

It's a little convoluted but what has worked for me is to use some kind of file uploader (perhaps an ASP class of code) to upload file to server, then attach the file from the server to your e-mail in code of course, then delete the file from the server.

And regarding the first post nowadays CDO is used more than CDONTS for sending e-mail.

Thread: ASP code attachment problem

Thread Tools

Display

ASP code attachment problem

same

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions