AutoResponse & Sending/Collecting Email Info Help!

Thu, 27 Jun 2002 20:21:08 -0700

Hi new to .NET and I almost have this working but I'm doing a few things wrong. *Its a autoresponse and form collection (by the way*).

1) How do I collect information from a <asp:dropdownlist/>??
I'm trying to collect information from the City List but I am not collecting it for some reason.

2) I am getting confused with how to send the information. The user should receive a Hi, " & Name.Text & " we received your message and will answer it in a prompt manner. And I should be getting the information that was input by the user.

As I have it now I am getting the information from the user but the user is not getting the automated response. I have been fiddling with this for awhileam now am just confused. Could someone let me know where I'm going wrong. I pretty sure it something basic. I think I'm doing something wrong with my

SmtpMail.SmtpServer = "mail.networks-plus.org"
SmtpMail.Send(MyMail)
SmtpMail.Send(Mail)........I think this is wrong??
My Code *****************************

<%@ Import Namespace= "System.IO" %>
<%@ Import Namespace="System.Web.Mail" %>
<%@ Page Language="VB" Debug="true" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title></title>
<script runat="server">
Sub Send_Click(Sender As Object, e As EventArgs)
Dim Mail As New MailMessage
Mail.To = ToText.Text & ";" & "timob12@networksplus.org"
Mail.Subject = "Hello from BerneyLaw.com!"
Mail.Body = "<html><body><h1>Hi, " & Name.Text & " we received your message and will answer it in a prompt manner.<h1></body></html>"
Mail.BodyFormat = MailFormat.Html
Mail.From = "timob12@networks-plus.org"

Dim MyMail As New MailMessage
MyMail.To = ToText.Text & ";" & "timob12@networks-plus.org"
MyMail.Subject = "User posted"
Dim body As StringWriter = New StringWriter()
body.Write("Sender Email: ")
body.WriteLine(ToText.Text)
body.Write("Sender Name: ")
body.WriteLine(Name.Text)
body.Write("Sender Selection: ")
' body.WriteLine(City.Items[City.SelectedIndex].Text )
MyMail.Body = body.ToString()
MyMail.BodyFormat = MailFormat.Text
MyMail.From = "timob12@networks-plus.org"

SmtpMail.SmtpServer = "mail.networks-plus.org"
SmtpMail.Send(MyMail)
SmtpMail.Send(Mail)
email.Text = "Thank you for your interest"
Dim Link As New HyperLink
Link.Text = "Click here to send another email."
Link.NavigateUrl = "autoresponse.aspx"
Page.Controls.Add(Link)
email.Visible = "false"
ToText.Visible= "false"
Name.Visible= "false"
Send.Visible= "false"
NameLabel.Visible= "false"
CityLabel.Visible= "false"
City.Visible= "false"
End Sub
</script>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body>
<FORM runat="server">

<asp:label id="email" text="Please enter your Email Address" runat="server" />
<asp:textbox id="ToText" Width="200" runat="server" />

<asp:label id="NameLabel" text="Please enter your Name" runat="server" />
<asp:textbox id="Name" Width="120" runat="server" />

<asp:label id="CityLabel" text="City" runat="server" />

<asp:dropdownlist id="City" runat=server>
<asp:listitem> PA </asp:listitem>
<asp:listitem> NJ </asp:listitem>
<asp:listitem> NY </asp:listitem>
</asp:dropdownlist>

<asp:button id="Send" text="Send" OnClick="Send_Click" runat="server" /></P>
</FORM>
</body>
</HTML>

'AutoResponse & Sending/Collecting Email Info Help!' Thread RSS Feed

AutoResponse & Sending/Collecting Email Info Help!