123 Eng

Engineering the engineers™


Latest Jobs   Forum Map

 


Home

Source Codes

Engineering Colleges

BE Students

Training  Reports (updated)

Seminar Reports (updated

Placement Papers (updated)

Forums

   Computer Science / IT

   Electronics

   Electrical

   Mechanical

   Chemical

   Civil

   CAT / MBA

   GMAT / Foreign MBA

Latest Jobs

Engineering Jobs / Technical Jobs

Management Jobs

Sitemap

About-Us

Terms of use

Displaying  Source Code(s)  
 

 
parseoneline

--------------------------------------------------------------------------------

Description : This subroutine takes in a long string, parses out one line at a time, and then calls a process routine to handle the line of text.

Sub parseoneline(list)
pos=1
pos2=0
ln=Len(list)
While pos<ln
pos2=InStr(pos,list,vbCrLf)
thisline=Mid(list,pos,pos2-pos)
pos=pos2+2
process oneline
Wend
End Sub
Sub process(oneline)
'do whatever you want with the line; use
' for mailing list, etc.
'example: sendmailto oneline,message
End Sub

 

Contribute content or training reports / feedback / Comments
job placement papers
All rights reserved copyright 123ENG