ASP

Anon

I developed a mailing list software for my website. I hosted my website on the Webserver. Webserver supports ASP. I can delete, edit and view my subscribers. When I click on "Send" button of the Send.asp page, the mail is not sent.

I am sending the "Send.asp" page so you can check this.

=================================================

function open_Code_Heading_Text() {
popupWin = window.open('help.asp?ID=Code_Heading_Text', 'remote', 'width=300,height=200')
}
function open_Code_Heading_BG() {
popupWin = window.open('help.asp?ID=Code_Heading_BG', 'remote', 'width=300,height=200')
}
function open_Code_Body_Text() {
popupWin = window.open('help.asp?ID=Code_Body_Text', 'remote', 'width=300,height=200')
}
function open_Code_Body_BG() {
popupWin = window.open('help.asp?ID=Code_Body_BG', 'remote', 'width=300,height=200')
}
function open_Code_Border() {
popupWin = window.open('help.asp?ID=Code_Border', 'remote', 'width=300,height=200')
}

</script>

</head>
<body bgcolor="#F0F0F0" vlink="#48576C" link="#48576C" alink="#000000">
<table border="0" cellpadding="0" cellspacing="0" width="650" align="center">
<tr>
<td height="1" colspan="5" bgcolor="#000000"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

<tr>
<td bgcolor="#B0C4DE" width="130" height="15"><a href="send.asp"><font face="Verdana" size="1"><b> Send Mailing</b></font></a></td>
</tr>
<tr>
<td bgcolor="#000000" height="1"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

<tr>
<td bgcolor="#B0C4DE" width="130" height="15"><a href="subscribers.asp"><font face="Verdana" size="1"><b> View/Edit Subscribers</b></font></a></td>
</tr>
<tr>
<td bgcolor="#000000" height="1"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

<tr>
<td bgcolor="#B0C4DE" width="130" height="15"><a href="code.asp"><font face="Verdana" size="1"><b> Generate HTML</b></font></a></td>
</tr>
<tr>
<td bgcolor="#000000" height="1"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

<tr>
<td bgcolor="#B0C4DE" width="130" height="15"><a href="archive.asp"><font face="Verdana" size="1"><b> Mail Archive</b></font></a></td>
</tr>
<tr>
<td bgcolor="#000000" height="1"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

<tr>
<td bgcolor="#B0C4DE" width="130" height="15"><a href="settings.asp"><font face="Verdana" size="1"><b> Settings</b></font></a></td>
</tr>
<tr>
<td bgcolor="#000000" height="1"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

</td>
<td width="1" bgcolor="#000000"><img src="im/clear.gif" height="1" width="1"></td>
<td bgcolor="#FFFFFF" width="100%" valign="top" height="200">

<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td bgcolor="#B0C4DE" height="15" width="100%"><font face="Verdana" size="1" color="#000000"><b> Send Mailing</b></font></td>
</tr>
<tr>
<td bgcolor="#000000" height="1" width="100%"><img src="im/clear.gif" height="1" width="1"></td>
</tr>
</table>

<%
SQLIF = "SELECT ID FROM List"
Set RSIF = Server.CreateObject("ADODB.Recordset")
RSIF.Open SQLIF, Conn, 1, 3

If NOT (RSIF.BOF AND RSIF.EOF) Then%>

<form action="send2.asp" Method="Post">
<table border="0" cellpadding="3" cellspacing="0" align="center">
<%
Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * from Settings"
RS.Open SQL, Conn, 1, 3
%>
<tr>
<td bgcolor="#DAE3F0"><font face="Verdana" size="1">Subject:</font></td>
<td bgcolor="#DAE3F0"><input type="text" name="Subject" class="inputbox" size="40"></td>
</tr>
<tr>
<td bgcolor="#C5D3E7"><font face="Verdana" size="1">Format:</font></td>
<td bgcolor="#C5D3E7"><select name="Format" class="inputbox">
<option value="Text">Text</option>
<option value="HTML">HTML</option>
</select></td>
</tr>
<tr>
<td bgcolor="#DAE3F0"><font face="Verdana" size="1">Archive Message:</font></td>
<td bgcolor="#DAE3F0"><input type="checkbox" name="Archive" checked></td>
</tr>
<tr>
<td bgcolor="#C5D3E7" colspan="2"><font face="Verdana" size="1">Body:<br>
<textarea name="Body" class="inputbox" cols="80" rows="25"></textarea>
</font></td>
</tr>
<tr>
<td colspan="2"><input type="submit" name="Submit" value="Send" class="inputSubmit"></td>
</tr>
</table>
</form>

<%Else%><br><center><font face="Verdana" size="1">There are currently no subscribers.</font></center><%End If%>

</td>
</tr>
</table></td>
<td width="1" bgcolor="#000000"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

<tr>
<td width="1" bgcolor="#000000"><img src="im/clear.gif" height="1" width="1"></td>
<td colspan="3" align="center" bgcolor="#B0C4DE" height="30"> </td>
<td width="1" bgcolor="#000000"><img src="im/clear.gif" height="1" width="1"></td>
</tr>

</body>

Please check code of this page and fix error of it.

What thing is to require sending a mail?

I want to add an Email Delivery Date field into Send.asp page.

Email Delivery Date is when should mail be delivered.

If I entered 11/1/2001 date into Email Delivery Date, the mail should be delivered at 11/1/2001.

If you give me your email, I will send the entire mailing list software.

Please reply soon.

Anon

If I were you, I would consult an ASP-oriented site. Try

www.learnasp.com
msdn.microsoft.com/scripting/
www.4guysfromrolla.com
www.15seconds.com

These pages (except for the MS one) should all contain links to other good ASP sites.