I don't think that Option Base is available in the .Net languages. I did a
cursory search a while back and couldn't find any way to modify the base. I
think in the framework they decided that the lower bound of things was 0
(except when it isn't.)

-----Original Message-----
From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
Behalf Of Neiger, Bruce D
Sent: Tuesday, November 17, 2009 8:16 AM
To: helpwithvb@yahoogroups.com
Subject: RE: [helpwithvb] Re: More on Excel


iirc correctly:
Dim MyString() as String

declares a reference variable to an array with no dimensions.

Dim MyString(1) as String

is equivalent to Dim MyString(0 to 1) as String

meaning that there are indices for 0 and 1, which are indeed two elements,
but there is no index #2.

In .NET, all arrays are pretty much lowerbound 0-based, although I believe
you can force a non-zero... and every thing I read says you shouldn't
(alhtough I forget why).

________________________________

From: helpwithvb@yahoogroups.com on behalf of seecwriter
Sent: Mon 11/16/2009 3:31 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] Re: More on Excel




If I have two elements why does accessing the 2nd element throw a Null
pointer exception?

Also, if I just have the declaration "Dim MyString() as String" and try to
access MyString(0), that too will throw an exception. I don't have one
element.

--- In helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> ,
"Timothy Rupp" <tim.rupp@...> wrote:
>
> You ReDim. So now you have two elements and upper bound is correctly 1.
(You
> have elements 0 and 1.) If you break before ReDim, you should have upper
> bound of 0.
>
>
>
> Console.WriteLine writes a line to the console window. If you're not
running
> in console mode you won't see anything. I use console mode rather than
> Windows apps to test concepts and modules. No form overhead that way.
>
>
>
> From: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
[mailto:helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> ]
On
> Behalf Of seecwriter
> Sent: Monday, November 16, 2009 2:59 PM
> To: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
> Subject: [helpwithvb] Re: More on Excel
>
>
>
>
>
> Your example below works as you describe. GetUpperBound does return a 2
when
> there are 3-elements in the array.
>
> My case is slightly different.
>
> Dim MyStrings() as String
> Dim numStrings as Integer
>
> ReDim MyString(1)
>
> numStrings = MyString.GetUpperBound(0)
>
> Print numStrings in the Immediate Window and it will be 1. I contend it
> should be 0, unless I did something wrong.
>
> What I've done in my application is to subtract 1 from the result of
> GetUpperBound, and this seems to have solved my problem.
>
> (FYI...I don't know where Console.Writeline... is supposed to write, but
it
> doesn't show up on my screen.)
>
> --- In helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
<mailto:helpwithvb%40yahoogroups.com> ,
> "Timothy Rupp" <tim.rupp@> wrote:
> >
> > Where do you actually load the array?
> >
> >
> >
> > If you have an upper bound of 2 you have three elements f(0), f(1), and
> > f(2).
> >
> >
> >
> > Try it here:
> >
> >
> >
> > Sub Main()
> >
> >
> >
> > Dim myArray(2) As String
> >
> > myArray(0) = "string1"
> >
> > myArray(1) = "string2"
> >
> > myArray(2) = "string3"
> >
> >
> >
> > Dim uBound As Integer
> >
> > uBound = myArray.GetUpperBound(0)
> >
> >
> >
> > Console.WriteLine("myArray(0) = " & myArray(0).ToString)
> >
> > Console.WriteLine("myArray(1) = " & myArray(1).ToString)
> >
> > Console.WriteLine("myArray(2) = " & myArray(2).ToString)
> >
> > Console.WriteLine("UpperBound = " & uBound.ToString)
> >
> > Console.ReadLine()
> >
> >
> >
> > End Sub
> >
> >
> >
> > What is the exception you get?
> >
> >
> >
> >
> >
> >
> >
> > From: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
<mailto:helpwithvb%40yahoogroups.com>
> [mailto:helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
<mailto:helpwithvb%40yahoogroups.com> ]
> On
> > Behalf Of seecwriter
> > Sent: Friday, November 13, 2009 2:27 PM
> > To: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
<mailto:helpwithvb%40yahoogroups.com>
> > Subject: [helpwithvb] More on Excel
> >
> >
> >
> >
> >
> > Given a one-dimensional array of strings, f(), that has 2 strings.
> > Does it make sense that the Upperbound index is 2?
> >
> > Dim f() as String 'Assume 2-strings
> >
> > Dim index as Integer
> >
> > index = f.GetUpperBound(0) ' Index = 2
> >
> > I would have expected 1, giving me f(0) and f(1). But Nooooooo! It gives
> me
> > 2. And when I try to use f(2) it throws an exception. So really, the
value
> > returned by GetUpperBound is not the highest index of the array, its the
> > number of strings in the array. More false advertising.
> >
>

iirc correctly:
Dim MyString() as String

declares a reference variable to an array with no dimensions.

Dim MyString(1) as String

is equivalent to Dim MyString(0 to 1) as String

meaning that there are indices for 0 and 1, which are indeed two elements, but
there is no index #2.

In .NET, all arrays are pretty much lowerbound 0-based, although I believe you
can force a non-zero... and every thing I read says you shouldn't (alhtough I
forget why).

________________________________

From: helpwithvb@yahoogroups.com on behalf of seecwriter
Sent: Mon 11/16/2009 3:31 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] Re: More on Excel




If I have two elements why does accessing the 2nd element throw a Null pointer
exception?

Also, if I just have the declaration "Dim MyString() as String" and try to
access MyString(0), that too will throw an exception. I don't have one element.

--- In helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> ,
"Timothy Rupp" <tim.rupp@...> wrote:
>
> You ReDim. So now you have two elements and upper bound is correctly 1. (You
> have elements 0 and 1.) If you break before ReDim, you should have upper
> bound of 0.
>
>
>
> Console.WriteLine writes a line to the console window. If you're not running
> in console mode you won't see anything. I use console mode rather than
> Windows apps to test concepts and modules. No form overhead that way.
>
>
>
> From: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> 
[mailto:helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> ] On
> Behalf Of seecwriter
> Sent: Monday, November 16, 2009 2:59 PM
> To: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
> Subject: [helpwithvb] Re: More on Excel
>
>
>
>
>
> Your example below works as you describe. GetUpperBound does return a 2 when
> there are 3-elements in the array.
>
> My case is slightly different.
>
> Dim MyStrings() as String
> Dim numStrings as Integer
>
> ReDim MyString(1)
>
> numStrings = MyString.GetUpperBound(0)
>
> Print numStrings in the Immediate Window and it will be 1. I contend it
> should be 0, unless I did something wrong.
>
> What I've done in my application is to subtract 1 from the result of
> GetUpperBound, and this seems to have solved my problem.
>
> (FYI...I don't know where Console.Writeline... is supposed to write, but it
> doesn't show up on my screen.)
>
> --- In helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> 
<mailto:helpwithvb%40yahoogroups.com> ,
> "Timothy Rupp" <tim.rupp@> wrote:
> >
> > Where do you actually load the array?
> >
> >
> >
> > If you have an upper bound of 2 you have three elements f(0), f(1), and
> > f(2).
> >
> >
> >
> > Try it here:
> >
> >
> >
> > Sub Main()
> >
> >
> >
> > Dim myArray(2) As String
> >
> > myArray(0) = "string1"
> >
> > myArray(1) = "string2"
> >
> > myArray(2) = "string3"
> >
> >
> >
> > Dim uBound As Integer
> >
> > uBound = myArray.GetUpperBound(0)
> >
> >
> >
> > Console.WriteLine("myArray(0) = " & myArray(0).ToString)
> >
> > Console.WriteLine("myArray(1) = " & myArray(1).ToString)
> >
> > Console.WriteLine("myArray(2) = " & myArray(2).ToString)
> >
> > Console.WriteLine("UpperBound = " & uBound.ToString)
> >
> > Console.ReadLine()
> >
> >
> >
> > End Sub
> >
> >
> >
> > What is the exception you get?
> >
> >
> >
> >
> >
> >
> >
> > From: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> 
<mailto:helpwithvb%40yahoogroups.com>
> [mailto:helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> 
<mailto:helpwithvb%40yahoogroups.com> ]
> On
> > Behalf Of seecwriter
> > Sent: Friday, November 13, 2009 2:27 PM
> > To: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> 
<mailto:helpwithvb%40yahoogroups.com>
> > Subject: [helpwithvb] More on Excel
> >
> >
> >
> >
> >
> > Given a one-dimensional array of strings, f(), that has 2 strings.
> > Does it make sense that the Upperbound index is 2?
> >
> > Dim f() as String 'Assume 2-strings
> >
> > Dim index as Integer
> >
> > index = f.GetUpperBound(0) ' Index = 2
> >
> > I would have expected 1, giving me f(0) and f(1). But Nooooooo! It gives
> me
> > 2. And when I try to use f(2) it throws an exception. So really, the value
> > returned by GetUpperBound is not the highest index of the array, its the
> > number of strings in the array. More false advertising.
> >
>

I will answer my own question. The constants for dot Net have been put into
enums, or the equivalent. So you have to qualify the constant with a longer
path.
For example, to use constant xlDiagonalDown, requires the following change:

XlBordersIndex.xlDiagonalDown

So, you're thinking problem solved. You'd be Wrong! It turns out that some of
the constant names used in VB6 and in Excel 2003 have been changed for the dot
Net version. Makes sense to me. NOT!

For example, in VB6 and in Excel 2003, to set the thickness of a cell's border
you could assign it either xlThin, xlThick, or xlNone. But in dot there these
constant names are not even used anymore. Instead there there is
xlLineStyleLineNone, and xlDash, xlDashDot, etc. But there is no xlThin or
xlThick. So what I did is, I got the integer value from VB6 and used that. Crude
but effective.


--- In helpwithvb@yahoogroups.com, "seecwriter" <seecwriter@...> wrote:
>
> Creating macros in Excel and then using the VBA code into my VB6 application
worked great.
> But when I move to .Net, the constants used (see below) in Excel are no longer
recognized.
> I did a search on MSDN for Excel VBA, and in the examples for Excel 2007, it
used some of the same constants. So am I missing an Import or something? This is
what I use:
>
> Imports Microsoft.Office.Interop
> Imports Microsoft.Office.Interop.Excel
>
> For example, in this line, xlNone and xlDiagonalDown are flagged as not
declared.
>
> oXL.Selection.Borders(xlDiagonalDown).LineStyle = xlNone
>
>
> Constants:
>
> xlNone
> xlCenter
> xlDiagonalDown
> xlDiagonalUp
> xlEdgeLeft
> xlContinuous
> xlThick
> xlThin
> xlAutomatic
> xlEdgeTop
> xlEdgeBottom
> xlEdgeRight
> xlInsideVertical
>

If I have two elements why does accessing the 2nd element throw a Null pointer
exception?

Also, if I just have the declaration "Dim MyString() as String" and try to
access MyString(0), that too will throw an exception. I don't have one element.

--- In helpwithvb@yahoogroups.com, "Timothy Rupp" <tim.rupp@...> wrote:
>
> You ReDim. So now you have two elements and upper bound is correctly 1. (You
> have elements 0 and 1.) If you break before ReDim, you should have upper
> bound of 0.
>
>
>
> Console.WriteLine writes a line to the console window. If you're not running
> in console mode you won't see anything. I use console mode rather than
> Windows apps to test concepts and modules. No form overhead that way.
>
>
>
> From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
> Behalf Of seecwriter
> Sent: Monday, November 16, 2009 2:59 PM
> To: helpwithvb@yahoogroups.com
> Subject: [helpwithvb] Re: More on Excel
>
>
>
>
>
> Your example below works as you describe. GetUpperBound does return a 2 when
> there are 3-elements in the array.
>
> My case is slightly different.
>
> Dim MyStrings() as String
> Dim numStrings as Integer
>
> ReDim MyString(1)
>
> numStrings = MyString.GetUpperBound(0)
>
> Print numStrings in the Immediate Window and it will be 1. I contend it
> should be 0, unless I did something wrong.
>
> What I've done in my application is to subtract 1 from the result of
> GetUpperBound, and this seems to have solved my problem.
>
> (FYI...I don't know where Console.Writeline... is supposed to write, but it
> doesn't show up on my screen.)
>
> --- In helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> ,
> "Timothy Rupp" <tim.rupp@> wrote:
> >
> > Where do you actually load the array?
> >
> >
> >
> > If you have an upper bound of 2 you have three elements f(0), f(1), and
> > f(2).
> >
> >
> >
> > Try it here:
> >
> >
> >
> > Sub Main()
> >
> >
> >
> > Dim myArray(2) As String
> >
> > myArray(0) = "string1"
> >
> > myArray(1) = "string2"
> >
> > myArray(2) = "string3"
> >
> >
> >
> > Dim uBound As Integer
> >
> > uBound = myArray.GetUpperBound(0)
> >
> >
> >
> > Console.WriteLine("myArray(0) = " & myArray(0).ToString)
> >
> > Console.WriteLine("myArray(1) = " & myArray(1).ToString)
> >
> > Console.WriteLine("myArray(2) = " & myArray(2).ToString)
> >
> > Console.WriteLine("UpperBound = " & uBound.ToString)
> >
> > Console.ReadLine()
> >
> >
> >
> > End Sub
> >
> >
> >
> > What is the exception you get?
> >
> >
> >
> >
> >
> >
> >
> > From: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
> [mailto:helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com> ]
> On
> > Behalf Of seecwriter
> > Sent: Friday, November 13, 2009 2:27 PM
> > To: helpwithvb@yahoogroups.com <mailto:helpwithvb%40yahoogroups.com>
> > Subject: [helpwithvb] More on Excel
> >
> >
> >
> >
> >
> > Given a one-dimensional array of strings, f(), that has 2 strings.
> > Does it make sense that the Upperbound index is 2?
> >
> > Dim f() as String 'Assume 2-strings
> >
> > Dim index as Integer
> >
> > index = f.GetUpperBound(0) ' Index = 2
> >
> > I would have expected 1, giving me f(0) and f(1). But Nooooooo! It gives
> me
> > 2. And when I try to use f(2) it throws an exception. So really, the value
> > returned by GetUpperBound is not the highest index of the array, its the
> > number of strings in the array. More false advertising.
> >
>

Your example below works as you describe. GetUpperBound does return a 2 when
there are 3-elements in the array.

My case is slightly different.

Dim MyStrings() as String
Dim numStrings as Integer

ReDim MyString(1)

numStrings = MyString.GetUpperBound(0)

Print numStrings in the Immediate Window and it will be 1. I contend it should
be 0, unless I did something wrong.

What I've done in my application is to subtract 1 from the result of
GetUpperBound, and this seems to have solved my problem.

(FYI...I don't know where Console.Writeline... is supposed to write, but it
doesn't show up on my screen.)


--- In helpwithvb@yahoogroups.com, "Timothy Rupp" <tim.rupp@...> wrote:
>
> Where do you actually load the array?
>
>
>
> If you have an upper bound of 2 you have three elements f(0), f(1), and
> f(2).
>
>
>
> Try it here:
>
>
>
> Sub Main()
>
>
>
>         Dim myArray(2) As String
>
>         myArray(0) = "string1"
>
>         myArray(1) = "string2"
>
>         myArray(2) = "string3"
>
>
>
>         Dim uBound As Integer
>
>         uBound = myArray.GetUpperBound(0)
>
>
>
>         Console.WriteLine("myArray(0) = " & myArray(0).ToString)
>
>         Console.WriteLine("myArray(1) = " & myArray(1).ToString)
>
>         Console.WriteLine("myArray(2) = " & myArray(2).ToString)
>
>         Console.WriteLine("UpperBound = " & uBound.ToString)
>
>         Console.ReadLine()
>
>
>
>     End Sub
>
>
>
> What is the exception you get?
>
>
>
>
>
>
>
> From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
> Behalf Of seecwriter
> Sent: Friday, November 13, 2009 2:27 PM
> To: helpwithvb@yahoogroups.com
> Subject: [helpwithvb] More on Excel
>
>
>
>
>
> Given a one-dimensional array of strings, f(), that has 2 strings.
> Does it make sense that the Upperbound index is 2?
>
> Dim f() as String 'Assume 2-strings
>
> Dim index as Integer
>
> index = f.GetUpperBound(0) ' Index = 2
>
> I would have expected 1, giving me f(0) and f(1). But Nooooooo! It gives me
> 2. And when I try to use f(2) it throws an exception. So really, the value
> returned by GetUpperBound is not the highest index of the array, its the
> number of strings in the array. More false advertising.
>

This is just, pretty much,
an FYI for me as I re-watch Tiger  :)

This threw me a curve-ball when
I first looked at the lines of code.

Not being that familiar with the many
ways we can do things in the improved
new language(s) of Net, I began to suspect
that there was a new thingie...

Imports System.DimensionArray.ReadMyMind

>> Dim f() as String 'Assume 2-strings

No, I don't think so.
The array is dynamic, and can be sized using ReDim.

ReDim f(1) As String

..would now give us an array with 2 elements.

Dim f(2) as String

This line of code creates a string array
whose dimensions are zero to two, or 3 elements.

In this case, GetUpperBound() would properly give us '2'

http://www.vb-helper.com/howto_net_declare_arrays.html

This is interesting:
http://www.vb-helper.com/tip_net_empty_array.html

<quote>

In VB .NET, you cannot use an array's properties and
methods until you instantiate it. For example, the
following code declares an array.

The two Debug.WriteLine statements that follow
fail because the array has not been created.

     Dim values() As Integer
     Debug.WriteLine(values.Length)
     Debug.WriteLine(values.GetLowerBound(0))

You can see if the array is Nothing
to tell if it has been created yet.

Sometimes, however, the code would be more consistent
if you could use Length, GetLowerBound, and GetUpperBound
to loop over the empty array. You can do that if you use
the following statement to allocate the array
with no items in it.

     Dim values(-1) As Integer

Now the array exists, Length returns 0,
GetLowerBound returns 0, and GetUpperBound returns -1.

</quote>

Good Fun this dot Net, and the more I poke around
it certainly does seem to make a great many tasks
much easier than what we had to do in Classic VB-6.

________________________________

From: helpwithvb@yahoogroups.com
On Behalf Of seecwriter
Sent: Friday, November 13, 2009 2:27 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] More on Excel


Given a one-dimensional array of strings,
f(), that has 2 strings.

Does it make sense that the Upperbound index is 2 ?

Dim f() as String 'Assume 2-strings

Dim index as Integer

index = f.GetUpperBound(0) ' Index = 2

I would have expected 1, giving me f(0) and f(1).
But Nooooooo! It gives me 2. And when I try to use f(2)
it throws an exception. So really, the value returned by
GetUpperBound is not the highest index of the array,
its the number of strings in the array.

More false advertising.

..
.

Given a one-dimensional array of strings, f(), that has 2 strings.
Does it make sense that the Upperbound index is 2?

Dim f() as String     'Assume 2-strings

Dim index as Integer

index = f.GetUpperBound(0)  ' Index = 2

I would have expected 1, giving me f(0) and f(1). But Nooooooo! It gives me 2.
And when I try to use f(2) it throws an exception. So really, the value returned
by GetUpperBound is not the highest index of the array, its the number of
strings in the array. More false advertising.

Creating macros in Excel and then using the VBA code into my VB6 application
worked great.
But when I move to .Net, the constants used (see below) in Excel are no longer
recognized.
I did a search on MSDN for Excel VBA, and in the examples for Excel 2007, it
used some of the same constants. So am I missing an Import or something? This is
what I use:

Imports Microsoft.Office.Interop
Imports Microsoft.Office.Interop.Excel

For example, in this line, xlNone and xlDiagonalDown are flagged as not
declared.

oXL.Selection.Borders(xlDiagonalDown).LineStyle = xlNone


Constants:

xlNone
xlCenter
xlDiagonalDown
xlDiagonalUp
xlEdgeLeft
xlContinuous
xlThick
xlThin
xlAutomatic
xlEdgeTop
xlEdgeBottom
xlEdgeRight
xlInsideVertical

I'm thinking about writing a cell phone application that would, via blue tooth,
upload something like a text file to a pc, which could then be imported into an
application that I am in the early stages of designing.      I'm not sure which
language to use.  I've never done a cell phone application before.  I'm
wondering if I used c# or vb for  the mobile application, if I wouldn't be
limiting myself to only smart phones.  I assume that most every phone, including
smart phones, support java.  Also, wondering if anyone has a good site or info.
to share on writing mobile applications.

----- Original Message -----

From: Timothy Rupp

To: helpwithvb@yahoogroups.com

Sent: Tuesday, November 10, 2009 11:47 PM

Subject: RE: [helpwithvb] ole db code

 

The DataReader is a stream device. It reads the entire data table. If you were having the results written to the console window you would be able to see all the records written there.

If you have a text box, you will only see the last record that has been read.

From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On Behalf Of Bryan Schulz
Sent: Wednesday, November 11, 2009 12:18 AM
To: helpwithvb@yahoogroups.com
Subject: Re: [helpwithvb] ole db code

 

ok,

then how do you specify which record is retrieved?

i have a table with name, company, and phone and four records in the table.

the last record is displayed in text boxes when i run;

Private Sub cmdGetName_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdGetName.Click

Dim cnLine As String = String.Empty

Dim strColName As String = String.Empty

cnLine = "Provider=Microsoft.Jet.OLEDB.4.0;"

cnLine = cnLine & " Data Source=C:\rolodex.mdb;"

'provider to be used when working with access database

cn = New OleDbConnection(cnLine)

cn.Open()

cmd = New OleDbCommand("select * from rol_list", cn)

dr = cmd.ExecuteReader

strColName = dr.Getname(1)

MessageBox.Show("column name is: " & strColName)

'expected name field was reported

While dr.Read()

' loading data into TextBoxes by column index

txtRolName.Text = dr(1)

TxtRolCompany.Text = dr(2)

TxtRolPhone.Text = dr(3)

End While

dr.Close()

cn.Close()

End Sub

also, what is the correct syntax to use DR.NextResult?

Bryan Schulz

----- Original Message -----

From: Timothy Rupp

To: helpwithvb@yahoogroups.com

Sent: Tuesday, November 10, 2009 10:30 PM

Subject: RE: [helpwithvb] ole db code

 

The DataReader is a different animal. It is a forward-only stream of data rows from a data source.

You need to call the ExecuteReader method of the OleDbCommand object.

From MSDN:

Public Sub ReadMyData(myConnString As String)

    Dim mySelectQuery As String = "SELECT OrderID, CustomerID FROM Orders"

    Dim myConnection As New OleDbConnection(myConnString)

    Dim myCommand As New OleDbCommand(mySelectQuery, myConnection)

    myConnection.Open()

    Dim myReader As OleDbDataReader

    myReader = myCommand.ExecuteReader()

    ' Always call Read before accessing data.

    While myReader.Read()

        Console.WriteLine(myReader.GetInt32(0).ToString() + ", " _

           + myReader.GetString(1))

    End While

    ' always call Close when done reading.

    myReader.Close()

    ' Close the connection when done with it.

    myConnection.Close()

End Sub

From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On Behalf Of Bryan Schulz
Sent: Tuesday, November 10, 2009 10:33 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] ole db code

 

hi,

i am experimenting with adding and retrieving data from an access 4.0 database with ole strings.

Imports System.Data.OleDb

Dim cn As OleDbConnection

Dim cmd As OleDbCommand

Dim dr As OleDbDataReader

i think i read you can use;

dr.NextResult()

to move to the next record

i am used to ado and using the conn.fields("employee name"), conn.movenext to move around and this stuff is greek so how do you specify the field, move next, move previous with this style?

Bryan Schulz

 

----- Original Message -----

From: Timothy Rupp

To: helpwithvb@yahoogroups.com

Sent: Tuesday, November 10, 2009 11:19 PM

Subject: RE: [helpwithvb] ole db code

 

Bryan,

Many of your questions could be answered by a quick check of the Properties and Methods of the Class that you are attempting to use.

Take for instance your question on the dr.NextResult method. The Framework Class Library for the OleDbDataReader Methods shows  “Advances the data reader to the next result, when reading the results of batch SQL statements.” It should be apparent that since you are not working with SQL batches that this method would not be applicable.

Likewise a scan of the methods reveal no way to read previous records and only the Read command that advances the reader to the next record. From this it could be correctly concluded that the OleDbDataReader class is not a random access way of accessing your data.

Take advantage of the tools that are available to you as it will lessen your efforts and smooth the way.

/tr

From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On Behalf Of Bryan Schulz
Sent: Tuesday, November 10, 2009 10:33 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] ole db code

 

hi,

i am experimenting with adding and retrieving data from an access 4.0 database with ole strings.

Imports System.Data.OleDb

Dim cn As OleDbConnection

Dim cmd As OleDbCommand

Dim dr As OleDbDataReader

i think i read you can use;

dr.NextResult()

to move to the next record

i am used to ado and using the conn.fields("employee name"), conn.movenext to move around and this stuff is greek so how do you specify the field, move next, move previous with this style?

Bryan Schulz

----- Original Message -----

From: Timothy Rupp

To: helpwithvb@yahoogroups.com

Sent: Tuesday, November 10, 2009 10:30 PM

Subject: RE: [helpwithvb] ole db code

 

The DataReader is a different animal. It is a forward-only stream of data rows from a data source.

You need to call the ExecuteReader method of the OleDbCommand object.

From MSDN:

Public Sub ReadMyData(myConnString As String)

    Dim mySelectQuery As String = "SELECT OrderID, CustomerID FROM Orders"

    Dim myConnection As New OleDbConnection(myConnString)

    Dim myCommand As New OleDbCommand(mySelectQuery, myConnection)

    myConnection.Open()

    Dim myReader As OleDbDataReader

    myReader = myCommand.ExecuteReader()

    ' Always call Read before accessing data.

    While myReader.Read()

        Console.WriteLine(myReader.GetInt32(0).ToString() + ", " _

           + myReader.GetString(1))

    End While

    ' always call Close when done reading.

    myReader.Close()

    ' Close the connection when done with it.

    myConnection.Close()

End Sub

From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On Behalf Of Bryan Schulz
Sent: Tuesday, November 10, 2009 10:33 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] ole db code

 

hi,

i am experimenting with adding and retrieving data from an access 4.0 database with ole strings.

Imports System.Data.OleDb

Dim cn As OleDbConnection

Dim cmd As OleDbCommand

Dim dr As OleDbDataReader

i think i read you can use;

dr.NextResult()

to move to the next record

i am used to ado and using the conn.fields("employee name"), conn.movenext to move around and this stuff is greek so how do you specify the field, move next, move previous with this style?

Bryan Schulz

Yes i want to know just how we can develop drivers
Sent from my Nokia phone
-----Original Message-----
From: Tim Lewis
Sent:  11/11/2009 9:08:04 am
Subject:  RE: [helpwithvb] Developing drivers in vb6

The Nokia PC Suite already does that well, and is free.  Is this just for the
learning experience?



From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On Behalf
Of Kishore
Sent: Tuesday, November 10, 2009 10:26 PM
To: helpwithvb@yahoogroups.com
Subject: [helpwithvb] Developing drivers in vb6





Although there are drivers and software for nokia phone to connect to a pc. I
want to develop a driver software for my nokia phone such that a pc can identify
the phone and transfer data and retrieve data from the cell phone. Is it
possible by vb6

Sent from my Nokia phone

Although there are drivers and software for nokia phone to connect to a pc. I
want to develop a driver software for my nokia phone such that a pc can identify
the phone and transfer data and retrieve data from the cell phone. Is it
possible by vb6

Sent from my Nokia phone

Timothy Rupp wrote:
> I don't ever recall hearing this. During cleanup I always used to set ADO
> recordsets = Nothing. Perhaps Adelle has a perspective on this well in
> hand...listening Adelle?

Provided the recordset is declared locally and there are no other
variables outside that scope (i.e. global variables or byref arguments
to that routine) that refer to the recordset, it *will* go away by
itself whether you set it to nothing or not.

Furthermore, if there *are* global references to that recordset, setting
your local reference to nothing at the end of the routine will have no
effect.

As for harm, the only downside of redundantly setting something to
nothing are a couple of extra cpu instructions.

It is more important to ".Close" things that have a "Close" method.

The existence of a "Close" method on an object is a signal that the
developers weren't sure they could guarantee complete cleanup when the
last reference is cleared (whether done manually or not).

A common reason is a cyclic reference between objects, where "Close"
clears the object's internal references that would otherwise prevent it
from disappearing.

I recall this as being a particular issue with DAO objects, and I
suspect there are corners of ADO where this crops up, but I am unaware
of them by not using them.

Adelle.

Way back when, I was taught that if you did not set it to nothing it was
still hanging around thus causing a memory leak.
I do not know if this is the case, I have never tested it.

All you automation guru's out there set us straight!


At 05:21 AM 11/10/2009, you wrote:

>I had closed the recordset as rs.close but is it necessary to set rs to
>nothing  because i never did that and didnt face a problem for that
>
>Sent from my Nokia phone
>-----Original Message-----
>From: Kenneth Danner
>Sent:  10/11/2009 3:43:24 pm
>Subject:  RE: [helpwithvb] Recordset in vb6
>
>
>I would like to know this also.... I to always close up and set to nothing....
>I've not seen any problem, but who's to say there were not any that I have
>not seen.
>
>
>TimeToExit:
>
>      '------------ Close the Connection --------------
>      rs.Close
>      cn.Close
>
>      Set rs = Nothing
>      Set cn = Nothing
>
>      Close
>      Err.Clear
>      Screen.MousePointer = 0
>      Exit Sub
>
>
>At 08:26 PM 11/9/2009, you wrote:
>
> >I don't ever recall hearing this. During cleanup I always used to set ADO
> >recordsets = Nothing. Perhaps Adelle has a perspective on this well in
> >hand...listening Adelle?
> >
> >/tr
> >
> >-----Original Message-----
> >From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
> >Behalf Of Neiger, Bruce D
> >Sent: Monday, November 09, 2009 3:26 PM
> >To: helpwithvb@yahoogroups.com
> >Subject: RE: [helpwithvb] Recordset in vb6
> >
> >I recall this as well... but, for the life of me, I cannot recall why it can
> >be potentially harmful to set the rs to Nothing explicitly...
> >If the variable is the only reference, the object gets destroyed, but the
> >variable stays in scope.
> >If the variable is NOT the only reference, the object sticks around... but
> >only until the end of routine, when the variables go away and any remaining
> >references become meaningless or also go away.
> >
> >I guess I am curious as to the possible harm.
> >
> >-BDN
> >
> >________________________________
> >
> >From: helpwithvb@yahoogroups.com on behalf of Steve Manser
> >Sent: Sun 11/8/2009 10:58 AM
> >To: helpwithvb@yahoogroups.com
> >Subject: RE: [helpwithvb] Recordset in vb6
> >
> >
> >...
> >
> >In fact, I seem to also recall that we can really mess-up the well brewed
> >stew if we try
> >'to be good programmers', and write code to set the Recordsets to Nothing at
> >the end of the
> >sub-routine, because at the end of the sub-routine the ADO RS will go out of
> >scope, and will die naturally.
> >
> >We don't have to do anything, even if we think otherwise, or have a desire
> >to do more than we should.
> >
> >
> >
> >
> >
> >
> >
> >
> >------------------------------------
> >
> >Yahoo! Groups Links
> >
> >
> >
>
>
>
>------------------------------------
>
>Yahoo! Groups Links
>
>
>

I had closed the recordset as rs.close but is it necessary to set rs to nothing 
because i never did that and didnt face a problem for that

Sent from my Nokia phone
-----Original Message-----
From: Kenneth Danner
Sent:  10/11/2009 3:43:24 pm
Subject:  RE: [helpwithvb] Recordset in vb6


I would like to know this also.... I to always close up and set to nothing....
I've not seen any problem, but who's to say there were not any that I have
not seen.


TimeToExit:

      '------------ Close the Connection --------------
      rs.Close
      cn.Close

      Set rs = Nothing
      Set cn = Nothing

      Close
      Err.Clear
      Screen.MousePointer = 0
      Exit Sub


At 08:26 PM 11/9/2009, you wrote:

>I don't ever recall hearing this. During cleanup I always used to set ADO
>recordsets = Nothing. Perhaps Adelle has a perspective on this well in
>hand...listening Adelle?
>
>/tr
>
>-----Original Message-----
>From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
>Behalf Of Neiger, Bruce D
>Sent: Monday, November 09, 2009 3:26 PM
>To: helpwithvb@yahoogroups.com
>Subject: RE: [helpwithvb] Recordset in vb6
>
>I recall this as well... but, for the life of me, I cannot recall why it can
>be potentially harmful to set the rs to Nothing explicitly...
>If the variable is the only reference, the object gets destroyed, but the
>variable stays in scope.
>If the variable is NOT the only reference, the object sticks around... but
>only until the end of routine, when the variables go away and any remaining
>references become meaningless or also go away.
>
>I guess I am curious as to the possible harm.
>
>-BDN
>
>________________________________
>
>From: helpwithvb@yahoogroups.com on behalf of Steve Manser
>Sent: Sun 11/8/2009 10:58 AM
>To: helpwithvb@yahoogroups.com
>Subject: RE: [helpwithvb] Recordset in vb6
>
>
>...
>
>In fact, I seem to also recall that we can really mess-up the well brewed
>stew if we try
>'to be good programmers', and write code to set the Recordsets to Nothing at
>the end of the
>sub-routine, because at the end of the sub-routine the ADO RS will go out of
>scope, and will die naturally.
>
>We don't have to do anything, even if we think otherwise, or have a desire
>to do more than we should.
>
>
>
>
>
>
>
>
>------------------------------------
>
>Yahoo! Groups Links
>
>
>

I would like to know this also.... I to always close up and set to nothing....
I've not seen any problem, but who's to say there were not any that I have
not seen.


TimeToExit:

      '------------ Close the Connection --------------
      rs.Close
      cn.Close

      Set rs = Nothing
      Set cn = Nothing

      Close
      Err.Clear
      Screen.MousePointer = 0
      Exit Sub


At 08:26 PM 11/9/2009, you wrote:

>I don't ever recall hearing this. During cleanup I always used to set ADO
>recordsets = Nothing. Perhaps Adelle has a perspective on this well in
>hand...listening Adelle?
>
>/tr
>
>-----Original Message-----
>From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
>Behalf Of Neiger, Bruce D
>Sent: Monday, November 09, 2009 3:26 PM
>To: helpwithvb@yahoogroups.com
>Subject: RE: [helpwithvb] Recordset in vb6
>
>I recall this as well... but, for the life of me, I cannot recall why it can
>be potentially harmful to set the rs to Nothing explicitly...
>If the variable is the only reference, the object gets destroyed, but the
>variable stays in scope.
>If the variable is NOT the only reference, the object sticks around... but
>only until the end of routine, when the variables go away and any remaining
>references become meaningless or also go away.
>
>I guess I am curious as to the possible harm.
>
>-BDN
>
>________________________________
>
>From: helpwithvb@yahoogroups.com on behalf of Steve Manser
>Sent: Sun 11/8/2009 10:58 AM
>To: helpwithvb@yahoogroups.com
>Subject: RE: [helpwithvb] Recordset in vb6
>
>
>...
>
>In fact, I seem to also recall that we can really mess-up the well brewed
>stew if we try
>'to be good programmers', and write code to set the Recordsets to Nothing at
>the end of the
>sub-routine, because at the end of the sub-routine the ADO RS will go out of
>scope, and will die naturally.
>
>We don't have to do anything, even if we think otherwise, or have a desire
>to do more than we should.
>
>
>
>
>
>
>
>
>------------------------------------
>
>Yahoo! Groups Links
>
>
>

I don't ever recall hearing this. During cleanup I always used to set ADO
recordsets = Nothing. Perhaps Adelle has a perspective on this well in
hand...listening Adelle?

/tr

-----Original Message-----
From: helpwithvb@yahoogroups.com [mailto:helpwithvb@yahoogroups.com] On
Behalf Of Neiger, Bruce D
Sent: Monday, November 09, 2009 3:26 PM
To: helpwithvb@yahoogroups.com
Subject: RE: [helpwithvb] Recordset in vb6

I recall this as well... but, for the life of me, I cannot recall why it can
be potentially harmful to set the rs to Nothing explicitly...
If the variable is the only reference, the object gets destroyed, but the
variable stays in scope.
If the variable is NOT the only reference, the object sticks around... but
only until the end of routine, when the variables go away and any remaining
references become meaningless or also go away.

I guess I am curious as to the possible harm.

-BDN

________________________________

From: helpwithvb@yahoogroups.com on behalf of Steve Manser
Sent: Sun 11/8/2009 10:58 AM
To: helpwithvb@yahoogroups.com
Subject: RE: [helpwithvb] Recordset in vb6


...

In fact, I seem to also recall that we can really mess-up the well brewed
stew if we try
'to be good programmers', and write code to set the Recordsets to Nothing at
the end of the
sub-routine, because at the end of the sub-routine the ADO RS will go out of
scope, and will die naturally.

We don't have to do anything, even if we think otherwise, or have a desire
to do more than we should.