Object reference not set to an instance of an object

[Sheikha]

Hi:

i get this message quite often. below is part of the code which gives the error. can u find anything wrong?

Dim ac, desc As String

ac = e.Item.Cells(0).Text
desc = e.Item.Cells(1).Text

Dim sqlselect As String
Dim conn1 As New OleDb.OleDbConnection("Provider=MSDAORA.1;Password=eas;User ID=eas;Data Source=WETST920.world")

sqlselect = "select * from subarea where upper (code) ='" & UCase(ac) & "' "

Dim del As New OleDb.OleDbCommand(sqlselect, conn1)
conn1.Open()
del.ExecuteNonQuery()
conn1.Close()

dscmd.SelectCommand.CommandText = sqlselect
dscmd.Fill(ds, sqlselect)

the error comes at
dscmd.SelectCommand.CommandText = sqlselect
why??

thanks

[Edneeis]

Where is dscmd declared at? You must create an instance of it before using it.

Dim dscmd As New Dataset()

[Sheikha]

I defined them as:

Public dscmd As New OleDb.OleDbDataAdapter()
Public ds As New DataSet()

[mar_zim]

Originally posted by Sheikha
I defined them as:

Public dscmd As New OleDb.OleDbDataAdapter()
Public ds As New DataSet()

try to do like this:

Public dscmd As OleDb.OleDbDataAdapter
 
dscmd = New OleDb.OleDbDataAdapter("select * from subarea where upper (code) ='" & UCase(ac) & "' ",conn1)

[Edneeis]

You are referencing the SelectCommand of the DataAdapter before it is set to anything. Try:

'instead of this
dscmd.SelectCommand.CommandText = sqlselect
 
'use this
dscmd.SelectCommand=del

Also there is no need to Execute this command before the fill since it doesn't do anything and gets executed again during the fill. So you can remove this:

conn1.Open()
del.ExecuteNonQuery()
conn1.Close()

[Sheikha]

thanks... it works...