[Year 12 SofDev] Reading and Writing text data files in VB2010

Thu May 12 15:49:49 EST 2011

Well, you *could* but you'd have PSV (pipe separated values) instead of CSV
:-)

Most generic textual data is CSV (with double quotes)... I don't know why VB
can't accommodate them, even as an option.

On 12 May 2011 15:31, Margaret King Iaquinto <iaquinto at ozemail.com.au>wrote:

> Can you use the pipe symbol (|) as a delimiter in VBNEB? In PHP that works.
> Then the other commas don't get in the way.
>
> VK3CFI
>
> On Thu May 12 12:32 , 'ATKINSON-BUCK, Damien' sent:
>
>   No, I canâ€™t seem to find a way to do that, but as a very dodgyworkaround, edit the CSV file so that thereâ€™s a double comma separating
> each item and split on that, then you can keep a single comma inside some
> text
>
> Eg
>
> 1,,WE RUN THE NIGHT,,DJ Havana, Brown,,ISL/UMA
>
> Dim Values() As String = Split(strAlbumName, ",")
>
> Would split everything normally and allow a comma between Havana and Brown.
>
>
>
>
> Damien Atkinson-Buck
> Member of Academic Staff (Secondary)
>  ------------------------------
>
> [image: Blocked image] <http://myivanhoe.net/>
>
>
>
> PO BOX 91 The Ridgeway, Ivanhoe, Victoria 3079 Australia
> Telephone +61 3 9490 3848 Facsimile +61 3 9490 3490
> mailto:damien.atkinson-buck at ivanhoe.com.au
> http://myivanhoe.net
>
>
>
>
>
> From: Mark KELLY [mailto:kel at mckinnonsc.vic.edu.au]
> Sent: Thursday, 12 May 2011 11:19 AM
> To: Year 12 Software Development Teachers' Mailing List
> Subject: Re: [Year 12 SofDev] Reading and Writing text data files in
> VB2010
>
>
>
> I've just tested it, and Split() does not honour quotation marks: it reads
> them in with the rest of the text.
> So if a data item contained a comma, it would be seen as a delimiter  :-(
>
> On 12 May 2011 09:37, ATKINSON-BUCK, Damien <
> Damien.ATKINSON-BUCK at ivanhoe.com.au> wrote:
>
> Mark, thanks for another great tutorial. Building on Marks work might be
> what you need Trav
>
>
>
> One of the more common uses of reading a text file is to read various
> values of a CSV (comma separated values) file, where individual items (think
> fields of a flat file database) are read into an array for future
> processing. Visual Basic has a very nice easy way to do this using the Split
> function. Imagine that you have the above text file with the following data
> copied from this weekâ€™s Aria charts;
>
>
>
> 1,WE RUN THE NIGHT,DJ Havana Brown,ISL/UMA
>
> 2,FROM THE MUSIC,The Potbelleez,VIC/UMA
>
> 3,WHAT HAPPENED TO USJessica Mauboy Feat. Jay Sean,SME
>
> 4,DANCE WITH ME,Justice Crew Feat. Flo Rida,SME
>
> 5,FRIDAY TO SUNDAY,Justice Crew,SME
>
> 6,MAYBE,Sick Puppies,VIR/EMI
>
>
>
>         Dim TextFile As New System.IO.StreamReader("u:\albums.txt ")
>
>         Dim strAlbumName As String
>
>         strAlbumName = TextFile.ReadLine()
>
>         Do Until strAlbumName Is Nothing
>
>             'lstAlbums.Items.Add(strAlbumName)
>
>             Dim Values() As String = Split(strAlbumName, ",")
>
>             strAlbumName = TextFile.ReadLine()
>
>        ' Values(0) now contains first column value,
>
>        ' Values(1) contains second column, etc.
>
>         Loop
>
>         TextFile.Close()
>
>         TextFile.Dispose()
>
>
>
> Cheers
>
> Damien Atkinson-Buck
> Member of Academic Staff (Secondary)
>   ------------------------------
>
> <http://myivanhoe.net/>
>
>    <http://myivanhoe.net/>
>
> PO BOX 91 The Ridgeway, Ivanhoe, Victoria 3079 Australia
> Telephone +61 3 9490 3848 Facsimile +61 3 9490 3490
> mailto:damien.atkinson-buck at ivanhoe.com.au
> http://myivanhoe.net <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> From: Travis Parker [mailto:Travis.Parker at beaconhills.vic.edu.au]
> Sent: Thursday, 12 May 2011 9:26 AM <http://myivanhoe.net/>
>
>
> To: Year 12 Software Development Teachers' Mailing List<http://myivanhoe.net/>
>
> Subject: Re: [Year 12 SofDev] Reading and Writing text data files in
> VB2010 <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> Thanks for that Mark. I have been using something similar with my students,
> particularly as the SAC I have written includes reading from a text file (A
> prototype helpdesk, including type of job, computer, priority, etc) and
> creating a new text file with jobs for the techies in a prioritised order.<http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> One thing I was wondering though, does anyone have anything good on reading
> comma separated text files? All the programs I have gotten my students to
> create read them a line at a time, but I would ideally like to see something
> like this line - tim.cox, hardware, 12, ps40, 2 read into arrays. So I
> would have a â€œNameâ€ , â€œIssueâ€ , â€œComputer_Numberâ€ ,
> â€œRoom_Numberâ€ , â€œPriorityâ€ or something like that. Iâ€™m fine with the
> arrays, but how would I read it in word at a time (i.e. Between commasâ€
> rather than line at a time? <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> With many thanks for a first year SD newbieâ€¦â€¦ <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> Trav <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> From: sofdev-bounces at edulists.com.au [mailto:
> sofdev-bounces at edulists.com.au] On Behalf Of Mark KELLY
> Sent: Wednesday, 11 May 2011 12:45 PM
> To: Year 12 Software Development Teachers' Mailing List
> Subject: [Year 12 SofDev] Reading and Writing text data files in VB2010<http://myivanhoe.net/>
>
>   <http://myivanhoe.net/>
>
> Hi, you paragons of pedagogy.  I've been putting off teaching my kids how
> to read and write text data files in VB but having investigated today, it's
> not really more difficult than the days of VB6 with OPEN "file" FOR INPUT AS
> 1 ... INPUT #1, data.
>
> I've attached an adapted tutorial on reading and writing text files with a
> task involving reading and writing a preferences file (with solution).
>
> Once your kids can do data files, it greatly opens the scope for populating
> and playing with really large arrays and makes loops meaningful.
>
> I remember how excited I was when I first discovered text files decades ago
> - it was like finding mum's car keys.  My programming world blossomed from
> that point.
>
> --
> Mark Kelly
> Manager of ICT, Reporting, IT Learning Area
> McKinnon Secondary College
> McKinnon Rd McKinnon 3204, Victoria, Australia
> Direct line / Voicemail: +613 8520 9085, Fax +613 9578 9253
> kel at mckinnonsc.vic.edu.au
> VCE IT Lecture Notes: http://vceit.com
> Moderator: IT Applications Edulist
>
> Want a good time? Call 0112358. Ask for Mr Fibonacci.<http://myivanhoe.net/>
>
>
>
>
>
> Privacy, Virus and Copyright Warning
>
> The information contained in this electronic message (e-mail), and any
> files transmitted with it:
>
> * is intended for the named recipients only. If you have received this in
> error, please advise the sender and delete it and any copies immediately;
> * Any personal information in this email must be used in accordance with
> the Privacy Act 1988 and this always applies even if it has been sent to you
> in error.
> * represents the views of the sender and does not necessarily represent the
> views or formal advice of Ivanhoe Grammar School;
> * may be subject to Copyright, so no further use should be made of it
> without the author's permission.
>
> The School does not represent or warrant that the email or any files
> attached do not contain errors or are free from computer viruses or other
> defects nor does it accept responsibility for any loss or damage resulting
> directly or indirectly from the use of the email or any attached files.
> <http://myivanhoe.net/>
>
>
> _______________________________________________
> http://www.edulists.com.au - FAQ, Subscribe, Unsubscribe
> IT Software Development Mailing List kindly supported by
> http://www.vcaa.vic.edu.au - Victorian Curriculum and Assessment Authority
> and
> http://www.vcaa.vic.edu.au/vce/studies/infotech/softwaredevel3-4.html
> http://www.vitta.org.au  - VITTA Victorian Information Technology Teachers
> Association Inc <http://myivanhoe.net/>
>
>
>
>
> --
> Mark Kelly
> Manager of ICT, Reporting, IT Learning Area
> McKinnon Secondary College
> McKinnon Rd McKinnon 3204, Victoria, Australia
> Direct line / Voicemail: +613 8520 9085, Fax +613 9578 9253
> kel at mckinnonsc.vic.edu.au
> VCE IT Lecture Notes: http://vceit.com
> Moderator: IT Applications Edulist
>
> Want a good time? Call 0112358. Ask for Mr Fibonacci.<http://myivanhoe.net/>
>
>
>
>
> Privacy, Virus and Copyright Warning
>
> The information contained in this electronic message (e-mail), and any
> files transmitted with it:
>
> * is intended for the named recipients only. If you have received this in
> error, please advise the sender and delete it and any copies immediately;
> * Any personal information in this email must be used in accordance with
> the Privacy Act 1988 and this always applies even if it has been sent to you
> in error.
> * represents the views of the sender and does not necessarily represent the
> views or formal advice of Ivanhoe Grammar School;
> * may be subject to Copyright, so no further use should be made of it
> without the author's permission.
>
> The School does not represent or warrant that the email or any files
> attached do not contain errors or are free from computer viruses or other
> defects nor does it accept responsibility for any loss or damage resulting
> directly or indirectly from the use of the email or any attached files.
>
>
>
> _______________________________________________
> http://www.edulists.com.au - FAQ, Subscribe, Unsubscribe
> IT Software Development Mailing List kindly supported by
> http://www.vcaa.vic.edu.au - Victorian Curriculum and Assessment Authority
> and
> http://www.vcaa.vic.edu.au/vce/studies/infotech/softwaredevel3-4.html
> http://www.vitta.org.au  - VITTA Victorian Information Technology Teachers
> Association Inc
>

-- 
Mark Kelly
Manager of ICT, Reporting, IT Learning Area
McKinnon Secondary College
McKinnon Rd McKinnon 3204, Victoria, Australia
Direct line / Voicemail: +613 8520 9085, Fax +613 9578 9253
kel at mckinnonsc.vic.edu.au
VCE IT Lecture Notes: http://vceit.com
Moderator: IT Applications Edulist

Want a good time? Call 0112358. Ask for Mr Fibonacci.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.edulists.com.au/pipermail/sofdev/attachments/20110512/0432d0bc/attachment-0001.html 