Hello
I am new to ASP .I am geeting the error. Please Help me.
Error Type:
Server object, ASP 0177 (0x800401F3)
Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.
/shah/wap_ASPMail.asp, line 24
My code is
<%@ Language="VbScript"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<%If Request.ServerVariables("REQUEST_METHOD") = "POST" Then%>
<BODY bgcolor="#c0c0c0" Background="">
<p Align="center"><Font Face="Arial, geneva" size="5"> Email Form</Font></p>
<%
Dim SenderEmail
Dim Subject
Dim Recipient
Dim CC
Dim Body
SenderEmail = Request.Form("from")
Recipient = Request.Form("to")
Recipient = Request.Form("to")
CC = Request.Form("cc")
Subject = Request.Form ("subject")
Body = Request.Form("message")
Set ASPMail = Server.CreateObject ("ASPMail.SMTPsvg")
ASPMail.RemoteHost = "smtp.test.myserver.com"
ASPMail.FromAddress = Senderemail
ASPMail.Subject = Subject
ASPMail.AddRecipient Recipient
If CC <> "" Then
ASPMail.AddCC CC
End If
' 1 - Highest priority (Urgent)
' 3 - Normal
' 5 - Lowest
ASPMail.Priority = 1
ASPMail.AltBody = Body
' Send it...
ASPMail.SendMail
%>
<center>
<Font Face="Arial, geneva" size="3">Your email has been sent to<%=Recipient%><BR>
</Font>
</CENTER>
<%Else%>
<Form Method="Post" Action="wap_ASPMail.asp">
<Table bgcolor="#c0c0c0" border="0" cellpadding="4" cellspacing="0" width="638" Align="Center">
<TR>
<td width="80">
<font size="2"><b>From:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="TEXTBOX" NAME="from" size="73" value="Enter your own email"></font>
</TD>
</TR>
<TR>
<td width="80">
<font size="2"><b>To:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="TEXTBOX" NAME="to" size="73" Value="Yours [email protected]"></font>
</TD>
</TR>
<TR>
<TD>
<font size="2"><b>Cc:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="text" NAME="cc" size="73"></font>
</TD>
</TR>
</TR>
<TR>
<TD>
<font size="2"><b>Subject:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="TEXTBOX" NAME="subject" maxlength="255" size="73" VALUE="Please enter your own email subject"></font>
</TD>
</TR>
</Table>
<Table bgcolor=#c0c0c0 border="0" cellpadding="4" cellspacing="0" width="638" Align="Center">
<TR>
<td width="100%">
<TEXTAREA cols="74" rows="17" name="message" wrap=virtual></textarea>
</TD>
</TR>
</Table>
<Center><Input type="Submit" Value="[ Send ]"></Center>
</FORM>
<%End IF%>
</BODY>
</HTML>
........................
Any suggetion will be appreatiated
I am new to ASP .I am geeting the error. Please Help me.
Error Type:
Server object, ASP 0177 (0x800401F3)
Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.
/shah/wap_ASPMail.asp, line 24
My code is
<%@ Language="VbScript"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<%If Request.ServerVariables("REQUEST_METHOD") = "POST" Then%>
<BODY bgcolor="#c0c0c0" Background="">
<p Align="center"><Font Face="Arial, geneva" size="5"> Email Form</Font></p>
<%
Dim SenderEmail
Dim Subject
Dim Recipient
Dim CC
Dim Body
SenderEmail = Request.Form("from")
Recipient = Request.Form("to")
Recipient = Request.Form("to")
CC = Request.Form("cc")
Subject = Request.Form ("subject")
Body = Request.Form("message")
Set ASPMail = Server.CreateObject ("ASPMail.SMTPsvg")
ASPMail.RemoteHost = "smtp.test.myserver.com"
ASPMail.FromAddress = Senderemail
ASPMail.Subject = Subject
ASPMail.AddRecipient Recipient
If CC <> "" Then
ASPMail.AddCC CC
End If
' 1 - Highest priority (Urgent)
' 3 - Normal
' 5 - Lowest
ASPMail.Priority = 1
ASPMail.AltBody = Body
' Send it...
ASPMail.SendMail
%>
<center>
<Font Face="Arial, geneva" size="3">Your email has been sent to<%=Recipient%><BR>
</Font>
</CENTER>
<%Else%>
<Form Method="Post" Action="wap_ASPMail.asp">
<Table bgcolor="#c0c0c0" border="0" cellpadding="4" cellspacing="0" width="638" Align="Center">
<TR>
<td width="80">
<font size="2"><b>From:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="TEXTBOX" NAME="from" size="73" value="Enter your own email"></font>
</TD>
</TR>
<TR>
<td width="80">
<font size="2"><b>To:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="TEXTBOX" NAME="to" size="73" Value="Yours [email protected]"></font>
</TD>
</TR>
<TR>
<TD>
<font size="2"><b>Cc:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="text" NAME="cc" size="73"></font>
</TD>
</TR>
</TR>
<TR>
<TD>
<font size="2"><b>Subject:</b></font>
</TD>
<TD>
<font size="2"><INPUT TYPE="TEXTBOX" NAME="subject" maxlength="255" size="73" VALUE="Please enter your own email subject"></font>
</TD>
</TR>
</Table>
<Table bgcolor=#c0c0c0 border="0" cellpadding="4" cellspacing="0" width="638" Align="Center">
<TR>
<td width="100%">
<TEXTAREA cols="74" rows="17" name="message" wrap=virtual></textarea>
</TD>
</TR>
</Table>
<Center><Input type="Submit" Value="[ Send ]"></Center>
</FORM>
<%End IF%>
</BODY>
</HTML>
........................
Any suggetion will be appreatiated