dataadapter running slow on fill

[michelleHEC]

I really need help. I cannot figure out why my code is hanging on the fill. It never used to. Here is my code.
any help will be extremely appreciated.
Me.daNet.Fill(Me.DsNet) 'here is where it is hanging

t = Me.DsNet.Tables("Nettrack")
Dim myrow As DataRow
myrow = t.NewRow()
myrow("ReqDate") = strReqDate
myrow("ReqTime") = strReqTime
myrow("IP") = strIP
myrow("URL") = strURL
t.Rows.Add(myrow)

pdsIR = Me.DsNet.GetChanges(DataRowState.Added)

If Not pdsIR Is Nothing Then
Me.daNet.Update(pdsIR)

End If

Me.DsNet.AcceptChanges()
DsNet.Clear()
pdsIR.Clear()

 

[michelleHEC]

I figured it out. I used the top operator in my sql statement and set it to top 1. now it is running much faster.