Fair enough. Yes you are correct about the SMTP service. You could install a component on your server which sends the email through a server which you specify, or (going back to your original question) you could create a form containing hidden inputs and automatically submit it to wsendmail using javascript without the need for user interaction.
HTH Sam Thompson ---------------------------------------------- 2cs Communications Ltd http://www.2cs.com [EMAIL PROTECTED] T: 01473 622263 F: 01473 622515 ----------------------------------------------- ----- Original Message ----- From: "Alex Elger" <[EMAIL PROTECTED]> To: "ActiveServerPages" <[EMAIL PROTECTED]> Sent: Thursday, August 01, 2002 4:00 PM Subject: RE: Inserting a record and posting the to sendmail equiv. > I was under the assumption that cdonts used the SMTP service that comes with > IIS 4 etc. > I do not want to install that service, the less i have running on iis the > better i feel. > If i am completely wrong then please tell me. > Thanks again > Alex Elger > Micronage Ltd > [EMAIL PROTECTED] > > > -----Original Message----- > From: Sam Thompson [mailto:[EMAIL PROTECTED]] > Sent: 01 August 2002 3:43 PM > To: ActiveServerPages > Subject: Re: Inserting a record and posting the to sendmail equiv. > > > wsendmail and CDONTS are probably almost the same thing. Can you explain > your "security/spam" reasons? Dont pick on CDONTS he's a good friend of > mine!! ;) > > > Sam Thompson > ---------------------------------------------- > 2cs Communications Ltd > http://www.2cs.com > [EMAIL PROTECTED] > T: 01473 622263 > F: 01473 622515 > ----------------------------------------------- > ----- Original Message ----- > From: "Alex Elger" <[EMAIL PROTECTED]> > To: "ActiveServerPages" <[EMAIL PROTECTED]> > Sent: Thursday, August 01, 2002 3:33 PM > Subject: FW: Inserting a record and posting the to sendmail equiv. > > > > I am trying to insert a record in an access database and post the info to > a > > cgi-bin style sendmail program called wsendmail. (I don't like the idea of > > using cdonts for security/spam reasons) > > I can insert the record no problem, however i am having difficulties > finding > > out how to post to the program without any user having to click a second > > submit button. > > I have included the 2 asp pages that are used so far to do the record > > insert. > > In the second page (updaterecord.asp) at the bottom is the info needed to > > post the e-mail message. > > The html page is an example page of how to use the wsendmail program. > > Thanks in advance for your help. > > Alex Elger > > Micronage Ltd > > [EMAIL PROTECTED] > > > > :Updaterecords.asp > > > > <% @LANGUAGE = VBSCRIPT %> > > <%option explicit%> > > <%response.buffer=true%> > > <!-- #INCLUDE FILE="../adovbs.inc" --> > > <!-- #INCLUDE FILE="../connection.asp" --> > > > > <% > > 'LOCAL VARIABLES > > dim objCon ' Connection object > > dim objCommand ' Command object > > dim objRS ' Recordset object > > dim intRows ' Number of matches found > > dim intGroup ' Group > > dim blnGotRows ' Flag indicating if anything was found > > dim strRecordArray ' Array for holding Records > > dim strRecordArrayMain ' Array for holding Main Records > > dim intMaxCount ' Upper bound for loop > > dim intCounter ' Loop counter > > dim MessageFor > > dim From > > dim Time > > dim Message > > dim InsertType > > dim UserName > > > > ' GET THE DATA FROM THE FORM > > MessageFor = Request.Form("MessageFor") > > >From = Request.Form("From") > > Time = Request.Form("Time") > > Message = Request.Form("Message") > > InsertType = Request.QueryString("InsertType") > > UserName = Request.Cookies("Micronage")("UserName") > > > > Message = Replace(Message, """","""""") > > > > ' FIRSTLY CHECK THE DATABASE FOR MATCHING DATA AND REDIRECT TO a "No > > Matches" PAGE IF NONE FOUND > > ' Create Connection > > Set objCon = Server.CreateObject( "ADODB.Connection" ) > > objCon.Open strConnectionMessages > > > > 'Define Command object > > Set objCommand = Server.CreateObject( "ADODB.Command" ) > > Set objCommand.ActiveConnection = objCon > > objCommand.CommandType = adcmdText > > objCommand.CommandText = "INSERT INTO ActivityLog (UserName, InsertType, > > Area) SELECT " + chr(34) + UserName + chr(34) + ", " + chr(34) + > InsertType > > + chr(34) + ", 'Documents';" > > > > ' Execute the Command object and store the return code > > objCommand.Execute > > > > ' Immediately Clear the command object > > set objCommand = nothing > > > > 'Define Command object > > Set objCommand = Server.CreateObject( "ADODB.Command" ) > > Set objCommand.ActiveConnection = objCon > > objCommand.CommandType = adcmdText > > > > if InsertType = "edit" Then > > objCommand.CommandText = "Update Wire SET Title=" + chr(34) + Title + > > chr(34) + ", Catagory=" + chr(34) + Catagory + chr(34) + ", Country=" + > > chr(34) + Country + chr(34) + ", Source=" + chr(34) + Source + chr(34) + > ", > > ArticleDte=#" + chr(32) + Date + chr(32) + "#, Summary=" + chr(34) + > Summary > > + chr(34) + ", Link=" + chr(34) + Link + chr(34) + " WHERE WireNo = " + > > chr(32) + WireNo + chr(32) + ";" > > else > > if InsertType = "add" then > > objCommand.CommandText = "INSERT INTO Wire (Catagory, Country, Title, > > Source, ArticleDte, Summary, Link) SELECT " + chr(34) + Catagory + chr(34) > + > > ", " + chr(34) + Country + chr(34) + ", " + chr(34) + Title + chr(34) + ", > " > > + chr(34) + Source + chr(34) + ", #" + chr(32) + Date + chr(32) + "#, " + > > chr(34) + Summary + chr(34) + ", " + chr(34) + Link + chr(34) + ";" > > else > > if InsertType = "delete" then > > objCommand.CommandText = "DELETE DISTINCT from Wire WHERE WireNo = " + > > chr(32) + WireNo + chr(32) + ";" > > else > > if InsertType = "addmessage" then > > objCommand.CommandText = "INSERT INTO Messages (UserName, Caller, > > MessageTime, Message, TakenBy) SELECT " + chr(34) + MessageFor + chr(34) + > > ", " + chr(34) + From + chr(34) + ", " + chr(34) + Time + chr(34) + ", " + > > chr(34) + Message + chr(34) + ", " + chr(34) + UserName + chr(34) + ";" > > end if > > end if > > end if > > end if > > > > > > ' Execute the Command object and store the return code > > objCommand.Execute > > > > ' Immediately Clear the command object > > set objCommand = nothing > > > > objCon.close > > set objCon = nothing > > > > if InsertType = "addmessage" then > > sendmessage() > > end if > > > > Response.Redirect "../update_success.htm" > > > > > > %> > > > > > > <html> > > <head> > > <script language="JavaScript"> > > <!-- > > function MM_swapImgRestore() { //v3.0 > > var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) > > x.src=x.oSrc; > > } > > > > function MM_preloadImages() { //v3.0 > > var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array(); > > var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; > i<a.length; > > i++) > > if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; > d.MM_p[j++].src=a[i];}} > > } > > > > function MM_findObj(n, d) { //v3.0 > > var p,i,x; if(!d) d=document; > > if((p=n.indexOf("?"))>0&&parent.frames.length) { > > d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);} > > if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) > > x=d.forms[i][n]; > > for(i=0;!x&&d.layers&&i<d.layers.length;i++) > > x=MM_findObj(n,d.layers[i].document); return x; > > } > > > > function MM_swapImage() { //v3.0 > > var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; > > for(i=0;i<(a.length-2);i+=3) > > if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) > > x.oSrc=x.src; x.src=a[i+2];} > > } > > function validation() { > > if (formgroup.MessageFor.value == null || formgroup.MessageFor.value == > > ""){alert("Sorry, you must enter who you are passing the message on to") > > return > > } > > if (formgroup.From.value == null || formgroup.From.value == > > ""){alert("Sorry, you must enter who the message is From") > > return > > } > > if (formgroup.Time.value == null || formgroup.Time.value == > > ""){alert("Sorry, you must enter the Message Time") > > return > > } > > if (formgroup.Message.value == null || formgroup.Message.value == > > ""){alert("Sorry, you must enter the Message") > > return > > } > > > > formgroup.submit() > > } > > //--> > > </script> > > <title>BPSD User Admin</title> > > <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> > > </head> > > > > <body bgcolor="#FFFFFF" text="#000000" onLoad=""> > > <table width="600" border="0" cellpadding="0" cellspacing="0" > > align="center"> > > <tr valign="top"> > > <td colspan="2" height="30" valign="middle"> > > <div align="center"> </div> > > </td> > > </tr> > > </table> > > <div align="left"></div> > > </body> > > </html> > > > > > > > > > > > > > > 'This is the info that needs posting > > ' <FORM METHOD="POST" ACTION="../../cgi-bin/wsendmail.exe" > name=sendmessage> > > ' <INPUT TYPE=hidden NAME="RCPT" Value="[EMAIL PROTECTED]"> > > ' <INPUT TYPE=hidden NAME="from" Value="[EMAIL PROTECTED]"> > > ' <INPUT TYPE=hidden NAME="Subject" Value="Telephone Message"> > > ' <INPUT TYPE=hidden NAME="Contents" Value="<%Response.Write Message%>"> > > > > > > > > > > > > > > > > > > :Addmessage.asp > > > > > > <% @LANGUAGE = VBSCRIPT %> > > <%option explicit%> > > <%response.buffer=true%> > > <!-- #INCLUDE FILE="../adovbs.inc" --> > > <!-- #INCLUDE FILE="../connection.asp" --> > > <!-- #INCLUDE FILE="permissions_login.asp" --> > > <% > > 'LOCAL VARIABLES > > dim objCon ' Connection object > > dim objCommand ' Command object > > dim objRS ' Recordset object > > dim intRows ' Number of matches found > > dim intGroup ' Group > > dim blnGotRows ' Flag indicating if anything was found > > dim blnGotRowsOther > > dim strRecordArrayWireEdit ' Array for holding Records > > dim strRecordArrayMain ' Array for holding Main Records > > dim strRecordArray > > dim strRecordArrayType > > dim intMaxCount ' Upper bound for loop > > dim intCounter ' Loop counter > > dim hidGroup > > > > ' FIRSTLY CHECK THE DATABASE FOR MATCHING DATA AND REDIRECT TO a "No > > Matches" PAGE IF NONE FOUND > > ' Create Connection > > Set objCon = Server.CreateObject( "ADODB.Connection" ) > > objCon.Open strConnection > > > > ' Define Command object > > Set objCommand = Server.CreateObject( "ADODB.Command" ) > > Set objCommand.ActiveConnection = objCon > > 'objCommand.CommandType = adcmdStoredProc > > objCommand.CommandText = "SELECT WireNo, Title FROM Wire;" > > > > ' Execute the Command object and store the return code > > objCommand.Execute > > > > ' Create the Recordset > > set objRS = Server.CreateObject( "ADODB.Recordset" ) > > objRS.CursorType = adOpenForwardOnly > > objRS.LockType = adLockReadOnly > > objRS.Open objCommand > > > > ' Immediately Clear the command object > > set objCommand = nothing > > > > > > ' Are then any Rows returned ? > > if objRS.EOF then > > blnGotRows = False > > else > > strRecordArrayWireEdit = objRS.Getrows > > blnGotRows = True > > end if > > > > ' Housekeeping > > objRS.close > > set objRS = nothing > > > > ' Define Command object > > Set objCommand = Server.CreateObject( "ADODB.Command" ) > > Set objCommand.ActiveConnection = objCon > > 'objCommand.CommandType = adcmdStoredProc > > objCommand.CommandText = "SELECT DocNo, DocTitle FROM DocRep;" > > > > If blnGotRows = False then Response.Redirect "../nomatches.htm" > > > > ' Execute the Command object and store the return code > > objCommand.Execute > > > > ' Create the Recordset > > set objRS = Server.CreateObject( "ADODB.Recordset" ) > > objRS.CursorType = adOpenForwardOnly > > objRS.LockType = adLockReadOnly > > objRS.Open objCommand > > > > ' Immediately Clear the command object > > set objCommand = nothing > > > > > > ' Are then any Rows returned ? > > if objRS.EOF then > > blnGotRows = False > > else > > strRecordArrayMain = objRS.Getrows > > blnGotRows = True > > end if > > > > ' Housekeeping > > objRS.close > > set objRS = nothing > > > > ' Define Command object > > Set objCommand = Server.CreateObject( "ADODB.Command" ) > > Set objCommand.ActiveConnection = objCon > > 'objCommand.CommandType = adcmdStoredProc > > objCommand.CommandText = "SELECT * FROM Catagory;" > > > > ' Execute the Command object and store the return code > > objCommand.Execute > > > > ' Create the Recordset > > set objRS = Server.CreateObject( "ADODB.Recordset" ) > > objRS.CursorType = adOpenForwardOnly > > objRS.LockType = adLockReadOnly > > objRS.Open objCommand > > > > ' Immediately Clear the command object > > set objCommand = nothing > > > > > > ' Are then any Rows returned ? > > if objRS.EOF then > > blnGotRows = False > > else > > strRecordArray = objRS.Getrows > > blnGotRows = True > > end if > > > > ' Housekeeping > > objRS.close > > set objRS = nothing > > objCon.close > > set objCon = nothing > > > > If blnGotRows = False then Response.Redirect "../nomatches.htm" > > > > %> > > > > <html> > > <head> > > <title>Administration</title> > > <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> > > <script language="JavaScript"> > > <!-- > > function MM_swapImgRestore() { //v3.0 > > var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) > > x.src=x.oSrc; > > } > > > > function MM_preloadImages() { //v3.0 > > var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array(); > > var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; > i<a.length; > > i++) > > if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; > d.MM_p[j++].src=a[i];}} > > } > > > > function MM_findObj(n, d) { //v3.0 > > var p,i,x; if(!d) d=document; > > if((p=n.indexOf("?"))>0&&parent.frames.length) { > > d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);} > > if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) > > x=d.forms[i][n]; > > for(i=0;!x&&d.layers&&i<d.layers.length;i++) > > x=MM_findObj(n,d.layers[i].document); return x; > > } > > > > function MM_swapImage() { //v3.0 > > var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; > > for(i=0;i<(a.length-2);i+=3) > > if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) > > x.oSrc=x.src; x.src=a[i+2];} > > } > > function validation() { > > if (formgroup.MessageFor.value == null || formgroup.MessageFor.value == > > ""){alert("Sorry, you must enter who you are passing the message on to") > > return > > } > > if (formgroup.From.value == null || formgroup.From.value == > > ""){alert("Sorry, you must enter who the message is From") > > return > > } > > if (formgroup.Time.value == null || formgroup.Time.value == > > ""){alert("Sorry, you must enter the Message Time") > > return > > } > > if (formgroup.Message.value == null || formgroup.Message.value == > > ""){alert("Sorry, you must enter the Message") > > return > > } > > > > formgroup.submit() > > } > > //--> > > </script> > > <script language="JavaScript"> > > function PressNumber(e) { > > var charCode = e.keyCode > > if ((charCode != 13 || charCode != 8) && (charCode < 48 || charCode > > > 57 )){ e.keyCode=0 > > } > > if (charCode == 13){ newtest() > > } > > return true > > } > > </script> > > <script language="JavaScript"> > > function PressQuote(e) { > > var charCode = e.keyCode > > if (charCode == 34){ e.keyCode=0 > > } > > return true > > } > > </script> > > </head> > > <table width="95%" border="0" cellpadding="3" cellspacing="0" > > align="center"> > > <tr valign="top"> > > <td width="95%"> > > </td> > > <td height="30"></td> > > </tr> > > </table> > > <table width="95%" border="0" cellspacing="0" cellpadding="3" > > align="center"> > > <tr valign="top"> > > <td colspan="4" height="424"> > > <form method="post" action="updaterecords.asp?InsertType=addmessage" > > name="formgroup"> > > <table width="100%" border="1" cellspacing="0" cellpadding="0" > > bordercolor="#000000"> > > <tr> > > <td><font face="Arial, Helvetica, sans-serif" size="3">Add a > > Message</font></td> > > </tr> > > <tr> > > <td> > > <table width="100%" border="0" cellspacing="0" > > cellpadding="5"> > > <tr bgcolor="#999999"> > > <td width="20%" valign="middle"> </td> > > <td valign="middle"> </td> > > </tr> > > > > <tr bgcolor="#999999"> > > <td> > > <div align="right"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF">For:</font></div> > > </td> > > <td valign="middle"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF"><b><font size="3"> > > <input type="text" name="MessageFor" size="40" > > maxlength="40"> > > </font></b></font></td> > > </tr> > > > > <tr bgcolor="#999999"> > > <td width="40%" valign="middle"> > > <div align="right"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF">From:</font></div> > > </td> > > <td><font face="Arial, Helvetica, sans-serif" size="2" > > color="#FFFFFF"><b><font size="3"> > > <input type="Text" name="From" size="40" > maxlength="60"> > > </font></b></font></td> > > > > <tr bgcolor="#999999"> > > <td width="40%" valign="middle"> > > <div align="right"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF">Time:</font></div> > > </td> > > <td><font face="Arial, Helvetica, sans-serif" size="2" > > color="#FFFFFF"><b><font size="3"> > > <input type="Number" name="Time" size="10" > > maxlength="10"> > > </font></b></font></td> > > > > <tr bgcolor="#999999"> > > <td width="40%" valign="middle"> > > <div align="right"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF">Message:</font></div> > > </td> > > <td><font face="Arial, Helvetica, sans-serif" size="2" > > color="#FFFFFF"><b><font size="3"> > > <textarea name="Message" cols="50" rows="5" > > onKeyPress="PressQuote(event)"></textarea> > > </font></b></font></td> > > > > <tr bgcolor="#999999"> > > <td width="20%" valign="middle"> > > <div align="right"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF"> > > </font></div> > > </td> > > <td valign="middle"> > > <div align="left"><font face="Arial, Helvetica, > > sans-serif" size="2" color="#FFFFFF"><b><font size="3"> > > <div align="Center"><img src="../media/continue.gif" > > width="88" height="26" onClick="validation()" name="continue1" > > onMouseOut="MM_swapImgRestore()" > > > onMouseOver="MM_swapImage('continue1','','../media/continue_f2.gif',1)"></fo > > nt></div> > > </td> > > </tr> > > </table> > > </td> > > </tr> > > </table> > > </form> > > > > <CENTER> > > <A HREF="changepass.asp" TARGET="MAIN-WINDOW" onMouseOver = "self.status = > > 'Change Your Password'; return true">Change Your Password</A><br></td> > > </body> > > </html> > > > > > > > > :exampleform.html > > > > > > <!-- Origin: file:E:\USR\JARLE\SRC\MSVC4\cgi\wsendmail\forms.htm !--> > > <HTML><TITLE>wSendmail CGI demo page</TITLE> > > <BODY BGCOLOR="White"> > > > > <H1 ALIGN=center>Demo page demonstrating wSendmail for Windows used in CGI > > mode</H1> > > > > <HR WIDTH=70% ALIGN=Center> > > > > <center> > > <TABLE WIDTH=70% ALIGN=center> > > <tr><td><FONT COLOR="red" FACE="ARIAL"><strong>NOTE:</strong> You will > have > > to manually edit the HTML source for this page, > > and the <font color="gray" face="courier">"\windows\wsendmail.ini"</font> > > file before > > these forms will work. Also, you must have a running HTTP server and > access > > to one or several Email addresses.</FONT> > > </td></tr> > > <tr><td><FONT COLOR="#004080" FACE="ARIAL">You can get the latest version > of > > wSendmail at</FONT> > > <a href="http://home.sol.no/jgaa/";>Jgaa's Internet</a> <FONT > COLOR="#004080" > > FACE="ARIAL">Look in the</font> > > <i>"Jgaa's Freeware"</i> <FONT COLOR="#004080" > FACE="ARIAL">section.</font> > > </TABLE></center> > > > > <HR WIDTH=70% ALIGN=Center> > > > > <H3><LEFT>This field is for your posive feedback</font></LEFT></H3> > > > > <!-- Replace the action with your cgi-bin http !--> > > > > <p><LEFT><FORM METHOD="POST" > > ACTION="http://jgaa.ldp.no/cgi-bin/wsendmail.exe";> > > > > <!-- There should *ALWAYS* be a topic !--> > > <INPUT TYPE=hidden NAME="subject" VALUE="Test Feedback"> > > > > <!-- This is the receiver of the emails sent from this form. !--> > > <!-- The "nick" must be defined in "\windows\wsendmail.ini" !--> > > <INPUT TYPE=hidden NAME="RCPT" VALUE="jgaa"> > > Positive feedback <P> > > > > <TEXTAREA NAME="Positive feedback" ROWS=10 COLS=60></TEXTAREA> <P> > > > > Possible improvements <P> > > > > <TEXTAREA NAME="Possible improvements" ROWS=10 COLS=60></TEXTAREA> <P> > > > > Please give your email address: > > <input NAME="from" size=40></input> <P> > > > > If you would like to receive more information, you can provide us with > your > > Fax number. > > > > <input NAME="fax" size=40></input> <P> > > > > <INPUT TYPE="submit" > > VALUE="Submit Feedback"> <INPUT TYPE="reset" VALUE="Clear Form">. > > </FORM> > > <HR WIDTH=70% ALIGN=Center> > > > > </CENTER> > > > > <H3>Demo of ordering form</H3> > > > > <BLOCKQUOTE><TABLE> > > > > <!-- Replace the action with your cgi-bin http !--> > > > > <FORM METHOD="POST" ACTION="http://jgaa.ldp.no/cgi-bin/wsendmail.exe";> > > <!-- There should *ALWAYS* be a topic !--> > > <INPUT TYPE=hidden NAME="subject" VALUE="Test Order"> > > > > <!-- This is the receiver of the emails sent from this form. !--> > > <!-- The "nick" must be defined in "\windows\wsendmail.ini" !--> > > <INPUT TYPE=hidden NAME="RCPT" VALUE="jgaa"> > > > > <TR><TD><B>Pricing:</B></TD><TD>7 days</TD><TD>6 days > > </TD><TD>Weekend</TD></TR> > > <TR><TD>1 mnd.</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="1 mnd - 7 > > dager">160,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="1 mnd - 6 > > days">130,-</TD><TD></TD><TD></TD></TR> > > <TR><TD>3 mnd.</TD><TD><INPUT CHECKED TYPE="radio" NAME="abtype" VALUE="3 > > mnd - 7 days">435,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="3 > mnd - > > 6 days">360,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="3 mnd - > > weekend (saturday - sunday)">209,-</TD><TD></TD></TR> > > <TR><TD>4 mnd.</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="4 mnd - 7 > > days">560,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="4 mnd - 6 > > days">470,-</TD><TD></TD><TD></TD></TR> > > <TR><TD>6 mnd.</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="6 mnd - 7 > > days">799,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="6 mnd - 6 > > days">670,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="6 mnd - > > weekend">395,-</TD></TR> > > <TR><TD>12 mnd.</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="12 mnd - > 7 > > days">1510,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="12 mnd - 6 > > days">1260,-</TD><TD><INPUT TYPE="radio" NAME="abtype" VALUE="12 mnd - > > weekend">770,-</TD></TR> > > </TABLE> > > > > <TABLE CELLSPACING=0 CELLPADDING=0> > > <TR><TD>Name:</TD><TD><INPUT TYPE="text" NAME="name" SIZE=40></TD></TR> > > <TR><TD>Address:</TD><TD><INPUT TYPE="text" NAME="address" > > SIZE=40></TD></TR> > > <TR><TD>Postal code:</TD><TD><INPUT TYPE="text" NAME="postal code" > > SIZE=40></TD></TR> > > <TR><TD>Floor:</TD><TD><INPUT TYPE="text" NAME="floor" SIZE=40></TD></TR> > > <TR><TD>Entrence:</TD><TD><INPUT TYPE="text" NAME="entrence" > > SIZE=40></TD></TR> > > <TR><TD>E-mail:</TD><TD><INPUT TYPE="text" NAME="from" SIZE=40></TD></TR> > > </TABLE><P> > > > > <INPUT TYPE="submit" VALUE="Order"><INPUT TYPE="reset" VALUE="Clear"> > > </form> > > > > <HR WIDTH=70% ALIGN=Center> > > > > <!-- Replace the action with your cgi-bin http !--> > > > > <FORM METHOD="POST" ACTION="http://jgaa.ldp.no/cgi-bin/wsendmail.exe";> > > <!-- There should *ALWAYS* be a topic !--> > > <INPUT TYPE=hidden NAME="subject" VALUE="Test Email"> > > > > <H3>Demo of mailing form</H3> > > > > <INPUT TYPE="radio" NAME="RCPT" VALUE="jgaa-at-telepost">Jgaa's official > > mail account > > <INPUT TYPE="radio" NAME="RCPT" VALUE="jgaa">Jgaa's internal mail account > > <INPUT TYPE="radio" NAME="RCPT" VALUE="jgaa-test">Jgaa's experimental mail > > account > > <p><font color="red">Note: If you don't click on one of the options, the > > message will fail, > > and the server error message will be forwarded to the confirmation > > sheet.</font><p> > > > > My Email Message:<BR> > > > > <TEXTAREA NAME="contents" ROWS=8 COLS=75></TEXTAREA><P> > > > > <TABLE CELLSPACING=0 CELLPADDING=0> > > <TR><TD>Name:</TD><TD><INPUT TYPE="text" NAME="name" SIZE=40></TD></TR> > > <TR><TD>Address:</TD><TD><INPUT TYPE="text" NAME="address" > > SIZE=40></TD></TR> > > <TR><TD>Postal code:</TD><TD><INPUT TYPE="text" NAME="postal code" > > SIZE=40></TD></TR> > > <TR><TD>Phone:</TD><TD><INPUT TYPE="text" NAME="phone" SIZE=40></TD></TR> > > <TR><TD>E-mail:</TD><TD><INPUT TYPE="text" NAME="from" SIZE=40></TD></TR> > > </TABLE><P> > > > > <INPUT TYPE="submit" VALUE="Send Email"><INPUT TYPE="reset" VALUE="Clear"> > > > > </FORM> > > > > <HR WIDTH=70% ALIGN=Center> > > > > <!-- Replace the action with your cgi-bin http !--> > > <FORM METHOD="POST" ACTION="http://jgaa.ldp.no/cgi-bin/wsendmail.exe";> > > > > <H3>Demo of generic mail Form</H3> > > <font color=red>This form require you to modify <font > > color=gray>wsendmail.ini</font> "Restrict Email=No"</font><p> > > <table><tr><td> > > <tr><td>To:</td><td> <INPUT NAME="RCPT" Value="Test" SIZE=40></td></tr> > > <tr><td>From:</td><td><INPUT TYPE="text" NAME="from" SIZE=40></td></tr> > > <tr><td>Subject:</td><td><INPUT TYPE="text" NAME="subject" > > SIZE=40></td></tr> > > <tr><td>Message: </td><td><TEXTAREA NAME="contents" ROWS=8 > > COLS=75></TEXTAREA></td><tr></table> > > <INPUT TYPE="submit" VALUE="Send Email"><INPUT TYPE="reset" VALUE="Clear"> > > > > </BODY> > > </HTML> > > > > > > --- > > You are currently subscribed to activeserverpages as: [EMAIL PROTECTED] > > To unsubscribe send a blank email to > %%email.unsub%% > > > > > --- > You are currently subscribed to activeserverpages as: > [EMAIL PROTECTED] > To unsubscribe send a blank email to > %%email.unsub%% > > > --- > You are currently subscribed to activeserverpages as: [EMAIL PROTECTED] > To unsubscribe send a blank email to %%email.unsub%% > --- You are currently subscribed to activeserverpages as: [email protected] To unsubscribe send a blank email to [EMAIL PROTECTED]
