Results 1 to 9 of 9

Thread: [RESOLVED] Run time error 3021

Threaded View

  1. Dec 30th, 2007, 10:28 PM #1
    matrik02
    matrik02 is offline

    Thread Starter
    Frenzied Member
    Join Date
    Feb 2007
    Location
    Malaysia
    Posts
    1,370

    Resolved [RESOLVED] Run time error 3021

    Why I got this error message?


    Code:
    Private Sub ListView6_ItemClick(ByVal item As MSComctlLib.ListItem)

tablesys.Close
tablesys.Open "Select ID,Plot,Kod from yieldraster", consys, adOpenDynamic, adLockOptimistic
tablesys.MoveFirst
tablesys.Move CLng(item.Index - 1)
getID = tablesys.Fields("id").Value
Text19.Text = tablesys.Fields("Plot").Value & ""
Text20.Text = tablesys.Fields("Kod").Value & ""


End Sub
    Attached Images Attached Images  
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width