[Year 12 SofDev] write command for PDA

[Shane Dawson]

The following allows you to save item from a listbox to a text file.


Private Sub SaveToolStripMenuItem_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles SaveToolStripMenuItem.Click
        'Create the filename for saving from the meter number and the
current date
        FileName = ClientMeterNumber(ClientNo) & "_" &
Microsoft.VisualBasic.DateAndTime.Day(Today()) & "_" & Month(Today()) &
"_" & Year(Today()) & ".txt"

        'Get the number of items to be saved
        Listcount = lstDataInput.Items.Count
        'Set up for saving of data
        Using WriteData As StreamWriter = File.CreateText(FileName)
            I = 0
            Do While I < Listcount
                WriteData.WriteLine(lstDataInput.Items.Item(I))
                I = I + 1
            Loop
        End Using 


Shane Dawson
Timetabler and Database Administrator
135 Aphrasia Street,
Newtown 3220
Ph: (03) 5226 8141
Mb: 0425 710 328
email: shaned at sjc.vic.edu.au

-----Original Message-----
From: sofdev-bounces at edulists.com.au
[mailto:sofdev-bounces at edulists.com.au] On Behalf Of Hanger, Elizabeth A
Sent: Tuesday, 27 May 2008 4:29 PM
To: Year 12 Software Development Teachers' Mailing List
Subject: [Year 12 SofDev] write command for PDA

Does anyone know how to create and write to a text file using Visual
Basic.net on a CE5 device (Treo Palm)  
 
thanks

Liz Hanger
Apollo Bay P-12 College

Important - This email and any attachments may be confidential. If
received in error, please contact us and delete all copies. Before
opening or using attachments check them for viruses and defects.
Regardless of any loss, damage or consequence, whether caused by the
negligence of the sender or not, resulting directly or indirectly from
the use of any attached files our liability is limited to resupplying
any affected attachments. Any representations or opinions expressed are
those of the individual sender, and not necessarily those of the
Department of Education and Early Childhood Development.

_______________________________________________
http://www.edulists.com.au
IT Software Development Mailing List kindly supported by
http://www.vcaa.vic.edu.au - Victorian Curriculum and Assessment
Authority and
http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html  -
VITTA Victorian Information Technology Teachers Association Inc

This email and any attachments may be confidential.  You must not disclose or use the information in this email if you are not the intended recipient.  If you have received this email in error, please notify us immediately and delete the email and all copies. The School does not guarantee that this email is virus or error free.  Any attached files are provided and may only be used on the basis that the user assumes all responsibility for any loss, damage or consequence resulting directly or indirectly from the use of any attached files, whether caused by the negligence of the sender or not.  The content and opinions in this email are not necessarily those of the School.