loop dosent work

[prasadalone]

Check below mentioned code output of my following sql query is 2 records but while looping(tobjreader.Read) through it shows only one record please help me


sqlsel="select count(*),membership,sum(amount) from MisData where month(paymrecddate)= " & pmnth & " and year(paymrecddate)=" & curyear & " group by membership "

Bcon.open
bcmd = New SqlCommand(sqlsel, Bcon)
tobjreader = bcmd.ExecuteReader
tobjReader.Read()

If tobjreader.HasRows = true Then
dim val1
dim val2
dim val3
while tobjreader.Read()
val1=tobjreader(1)
val2=tobjreader(0)
val3=tobjreader(2)
response.write("Adding")
response.write("<Br>"
insertdata(val1,val2,val3)
end while
end if

 

[ca8msm]

             Bcon.open
             bcmd = New SqlCommand(sqlsel, Bcon)
             tobjreader = bcmd.ExecuteReader
             [b]tobjReader.Read()[/b]

That's because the above line has already read the first row.


____________________________________________________________

Need help finding an answer?

Try the Search Facility or read FAQ222-2244 on how to get better results.

 

[prasadalone]

thank thank thank you very much