Solved

Reading data from textarea line by line - need to loop

Posted on 2007-11-13
3
691 Views
Last Modified: 2008-02-01
I'm writing a script in VBScript for a classic ASP application (NOT ASP.NET), and I hope someone here has succeeded in this.

What I'm doing involves a form which posts to a script which will take the data and compose/send an email using CDONTS (it's on a Win2K server, IIS 5.0). The idea is to be able to paste a list of email addresses separated by \n into the textarea.  When the form is submitted, the handling script uses a Do While... Loop to extract the first line (email address) from the textarea, compose and send an email message, and then loop to the second line, compose and send a message, loop, etc. until it reaches the end.

I have this successfully working using a text file on the server containing the email addresses using the FileScriptingObject in ASP (opening the file for reading using OpenAsTextStream) instead of the textarea method, and it works fine.  There's nothing wrong with the script itself at this point, other that that I can't figure out how to extract the contents of the textarea one line at a time so that I can use the Do While... Loop.

I know I could make it a two step process by writing the contents of the textarea to a text file on the server, and then using the OpenAsTextStream method to call it back into the script.  It just seems like I should be able to do this without having to write to a file.

Any ideas?  I'm probably missing something obvious, but 20 pages of a Google search didn't give me anything.
0
Comment
Question by:mallowguy
3 Comments
 
LVL 82

Expert Comment

by:hielo
ID: 20277952
<%@language="javascript"%>
<% //This is hielo.asp



if( "undefined" != String(Request("emailList")) )
{
      var addresses = String(Request("emailList"));
      addresses = addresses.split("\n");

      var emailObj = null;

      for(var i=0; i < addresses.length; ++i)
      {
            if(addresses[i].indexOf("@") > -1)
            {
                  var emailObj = Server.CreateObject("CDONTS.NewMail");
                  emailObj.To = addresses[i];
                  emailObj.From="you@yourdomain.com";
                  emailObj.Body="Test";
                  emailObj.BodyFormat=0;//0=HTML;1=plaintext
                  emailObj.send();
                  emailObj=null;
            }
      }
}
%>


Your form will need the following textarea:
<form action="hielo.asp" method="post">
      <textarea name="emailList"></textarea>
      <input type="submit" name="send" value="Submit"/>
</form>
0
 
LVL 4

Accepted Solution

by:
swinslow earned 125 total points
ID: 20281593
On the page that is processing your form (SendMail.asp or whatever)

  'Your send to form field
  SendToList = Request("SendTo")
  'Chr(13) is a line break
  SendToArrr = Split(SentToList,chr(13))
  For x = 0 to UBound(SendToArr)
     'All your mail sending code
     'The SendTo address will be
     'SendToArr(x)
  Next
0
 

Author Comment

by:mallowguy
ID: 20282070
Thanks to swinslow... hit on exactly what I was looking for.  I figured that splitting with the newline and writing the texarea contents to an array was going to be the answer, but for some reason it just wasn't clicking for me.
0

Featured Post

Windows Server 2016: All you need to know

Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A theme is a collection of property settings that allow you to define the look of pages and controls, and then apply the look consistently across pages in an application. Themes can be made up of a set of elements: skins, style sheets, images, and o…
Entering time in Microsoft Access can be difficult. An input mask often bothers users more than helping them and won't catch all typing errors. This article shows how to create a textbox for 24-hour time input with full validation politely catching …
This is Part 3 in a 3-part series on Experts Exchange to discuss error handling in VBA code written for Excel. Part 1 of this series discussed basic error handling code using VBA. http://www.experts-exchange.com/videos/1478/Excel-Error-Handlin…
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question