This method will close (clear) the current MVResultSet
Namespace: rocketsoftware.MVSP
Assembly: RocketMVSP (in RocketMVSP.dll)
Syntax
Remarks
Copy Code
Dim returncode as boolean
Dim mvsp as new rocketsoftware.MVSP.Pick
Dim txt as string
returncode = mvsp.Connect("localhost",9000,"dm","")
If returncode = True then
returncode = mvsp.Logto("MVDEMO","")
If returncode = True then
mvsp.ExecuteQuery("QUERY", "CUSTOMERS", "", "", "CONTACTNAME CITY", "")
While mvsp.MVResultSetNext = True
If mvsp.MVResultSetGetRow = 5 then
mvsp.MVResultSetClose()
Else
txt = mvsp.MVResultSetGetCurrentRow
ListBox1.Items.Add(mvspf.Extract(txt, 1))
ListBox2.Items.Add(mvspf.Extract(txt, 2))
End if
End While
End if
End if
returncode = mvsp.CloseConnection()