[Year 12 SofDev] U3O2 and U4O1 Janno's Paella Barn

Adrian Janson janson.adrian.a at edumail.vic.gov.au
Tue Aug 4 15:31:28 EST 2009


Hi Mike,

 

I have been working my way through my emails - so apologies.  I just
realized - you are using an earlier version of my code for this - as
currency managers no longer exist and a lot of this code has changed.  I
have attached one of my Movie database programs (I have many versions of
these at different stages).  You should be able to check out the code in
here - let me know if you have trouble opening it.

 

(I am sending this again - as my edumail account knocked me back as I had an
exe file as an attachment! - I have put it on my site here:

http://www.adrianjanson.com.au/index.php?option=com_docman
<http://www.adrianjanson.com.au/index.php?option=com_docman&task=doc_downloa
d&gid=54&Itemid=4> &task=doc_download&gid=54&Itemid=4

 

 

Cheers,

Adrian

 

From: sofdev-bounces at edulists.com.au [mailto:sofdev-bounces at edulists.com.au]
On Behalf Of Jolly, Michael D
Sent: Monday, 3 August 2009 10:52 AM
To: Year 12 Software Development Teachers' Mailing List
Subject: RE: [Year 12 SofDev] U3O2 and U4O1 Janno's Paella Barn

 

Adrian, I did as you suggested and almost everything is working. Thanks.

I am trying to duplicate Chapter 13 of your book - database example 1.

I have all the code 'clean' except for the 'record update' section which I
am at a loss to fix.

Here is my setup code.

Public Class frmMovies

    Dim cmMovies As CurrencyManager

 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

        'TODO: This line of code loads data into the
'Movies2003DataSet.Movies' table. You can move, or remove it, as needed.

        Me.MoviesTableAdapter.Fill(Me.Movies2003DataSet.Movies)

        MoviesTableAdapter.Fill(Movies2003DataSet.Movies)

        cmMovies = CType(BindingContext(MoviesBindingSource, "Movies"),
CurrencyManager)

        AddHandler cmMovies.ItemChanged, AddressOf cmMovies_ItemChanged

        AddHandler cmMovies.PositionChanged, AddressOf
cmMovies_PositionChanged

        DisplayPosition()

    End Sub

 

.and here is my 'update' sub-routine.

  Private Sub UpdateDb()

        If MoviesBindingSource.HasChanges Then

            Dim NumberChanged As Integer

            NumberChanged = MoviesTableAdapter.Update(MoviesBindingSource,
"Movies")

        End If

    End Sub

 

.the first line of the 'update' If, has a syntax error of 'HasChanges is not
a member of 'System.Windows.Forms.BindingSource'',

Also, the expression following the = sign gives a syntax error of 'Overload
resolution failed because no accessible 'Update' accepts this number of
arguments.'

I actually managed to debug a lot of other ares of code, but this update sub
has me stumped - any help appreciated muchly!

 

From: sofdev-bounces at edulists.com.au [mailto:sofdev-bounces at edulists.com.au]
On Behalf Of Janson, Adrian A
Sent: Thursday, 30 July 2009 9:22 PM
To: Year 12 Software Development Teachers' Mailing List
Subject: RE: [Year 12 SofDev] U3O2 and U4O1 Janno's Paella Barn

 

Hi Mike,

 

You may have solved this issue already - if not, I can help you out!  There
is no need to place the ole adapters on the form (as you would have with
previous versions of VB.Net).  Simply add a new data connection (you can
find a tab for this underneath the solution explorer) - or under the View
menu.  A wizard will pop up that will guide you through the connection
process and then VB.Net will add the table adapter, etc.

 

Hope this helps - and if not - let me know and I can elaborate further.

 

Cheers,

Adrian

 

  _____  

From: sofdev-bounces at edulists.com.au on behalf of Jolly, Michael D
Sent: Thu 30/07/2009 2:14 PM
To: Year 12 Software Development Teachers' Mailing List
Subject: RE: [Year 12 SofDev] U3O2 and U4O1 Janno's Paella Barn

I think I meant U4O1! One of those days!

 

From: sofdev-bounces at edulists.com.au [mailto:sofdev-bounces at edulists.com.au]
On Behalf Of Jolly, Michael D
Sent: Thursday, 30 July 2009 12:15 PM
To: Year 12 Software Development Teachers' Mailing List
Subject: RE: [Year 12 SofDev] U3O2 and U4O1 Janno's Paella Barn

 

Adrian, (and others), you may have some advice for me.

I am coming to the business end of U4O2 and wanted to get the kids up to
speed on using VB .NET to access Access!

I was looking at the  instructions in your book(Chap.13) and I am stuck. We
are using VB 2005 Express Edition and when I or my students look in the
Toolbox under the Data section, we do not get the ole adapters.

I was wondering if anyone out there has a script for calling DB's from VB
.NET without using the adapters as clearly 'Express' means you don't get
everything, but there must be a way to do these database calls.

Help.

Mike Jolly

IT Manager

Kyneton Secondary College 

 

From: sofdev-bounces at edulists.com.au [mailto:sofdev-bounces at edulists.com.au]
On Behalf Of Adrian Janson
Sent: Friday, 24 July 2009 10:07 AM
To: 'Year 12 Software Development Teachers' Mailing List'
Subject: [Year 12 SofDev] U3O2 and U4O1 Janno's Paella Barn

 

Hi everyone,

 

I have posted some new items to my site that some of you might be interested
in.

 

My U3O2 2009 suggested solutions (Janno's Paella Barn)

http://www.adrianjanson.com.au/index.php?option=com_docman
<http://www.adrianjanson.com.au/index.php?option=com_docman&task=doc_downloa
d&gid=52&Itemid=4> &task=doc_download&gid=52&Itemid=4

 

My U4O1 2009 assessment criteria sheet

http://www.adrianjanson.com.au/index.php?option=com_docman
<http://www.adrianjanson.com.au/index.php?option=com_docman&task=doc_downloa
d&gid=51&Itemid=4> &task=doc_download&gid=51&Itemid=4

 

My U4O1 Janno's Paella Barn

http://www.adrianjanson.com.au/index.php?option=com_docman
<http://www.adrianjanson.com.au/index.php?option=com_docman&task=doc_downloa
d&gid=53&Itemid=4> &task=doc_download&gid=53&Itemid=4

 

Cheers,

Adrian

 

Adrian Janson, 

VITTA President

Director of ICT, 

Melbourne High School, 

Forrest Hill, South Yarra 3141 Australia.

Phone: 03 9826 0711 International: +61 3 9826 0711

Fax: 03 9826 8767 International: +61 3 9826 8767

E-mail:  <mailto:janson.adrian.a at edumail.vic.gov.au>
janson.adrian.a at edumail.vic.gov.au

School WWW:  <http://www.mhs.vic.edu.au/> http://www.mhs.vic.edu.au

My WWW:  <http://www.adrianjanson.com.au/> http://www.adrianjanson.com.au

Blog:  <http://jansona.edublogs.org/> http://jansona.edublogs.org

Delicious: http://delicious.com/adrianjanson/

 

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  <http://www.edulists.com.au/> IT Software
Development Mailing List kindly supported by 
http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html
<http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html%20%20>
- Victorian Curriculum and Assessment Authority and 
http://www.vitta.org.au  <http://www.vitta.org.au/> - VITTA Victorian
Information Technology Teachers Association Inc

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  <http://www.edulists.com.au/> IT Software
Development Mailing List kindly supported by 
http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html
<http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html%20%20>
- Victorian Curriculum and Assessment Authority and 
http://www.vitta.org.au  <http://www.vitta.org.au/> - VITTA Victorian
Information Technology Teachers Association Inc

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  <http://www.edulists.com.au/> IT Software
Development Mailing List kindly supported by 
http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html -
Victorian Curriculum and Assessment Authority and 
http://www.vitta.org.au  <http://www.vitta.org.au/> - VITTA Victorian
Information Technology Teachers Association Inc 

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  <http://www.edulists.com.au> IT Software
Development Mailing List kindly supported by 
http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html
<http://www.vitta.org.au/vce/studies/infotech/softwaredevel3-4.html%20%20>
- Victorian Curriculum and Assessment Authority and 
http://www.vitta.org.au  <http://www.vitta.org.au> - VITTA Victorian
Information Technology Teachers Association Inc


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.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.edulists.com.au/pipermail/sofdev/attachments/20090804/7a31f0b5/attachment-0001.html


More information about the sofdev mailing list