Home > Error > Error # 3021 Was Generated By Adodb.recordset

Error # 3021 Was Generated By Adodb.recordset

How do I Avoid Error 3021: No Current Record P: 2 psdsen Please help me for the following program problem. Error 3021 - Please Help! Avoiding another lengthy round-trip to Oracle would be prefered. Was This Post Helpful? 0 Back to top MultiQuote Quote + Reply ← Previous Topic VB6 Next Topic → Page 1 of 1 Related VB TopicsbetaRun Time Error 5 :invalid click site

The problem is that Oracle can take 3 to 6 seconds to retrieve the single record depending on the network traffic through a small pipe. To start viewing messages, select the forum that you want to visit from the selection below. Public Sub SQL_Loop() Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Dim BucketName As String Dim rngExList As Range Set cn = New ADODB.Connection BucketName = "ProductA" Set rs = cn.Execute("Select It occurs on the line marked 'Error Here in the following snippet: If rset.BOF <> True Or rset.EOF <> True Then rset.MoveLast Do While rset.BOF <> True rset.Delete If rset.BOF <> http://www.vbforums.com/showthread.php?655576-RESOLVED-Error-3021-EOF-or-BOF-!!

more hot questions question feed lang-vb about us tour help blog chat data legal privacy policy work here advertising info mobile contact us feedback Technology Life / Arts Culture / Recreation In a select statement I am tyring to retrieve 1 record. I think some rewriting along the lines that David-W-Fenton suggests in his comment under the question will be necessary. –jjb May 14 '11 at 8:06 @jjb - David's answer the only thing I remember is that access does have a delay for new rows to be available over odbc/oledb... 0 Message Author Comment by:kbios2008-07-15 not immediately before the select

I enjoyed the exchange of ideas back and forth. without the password will be difficult :) 0 Message Author Comment by:kbios2008-07-14 that's why i put the password in the description line of gwi.mdb :) $kbios2 0 LVL Join Now For immediate help use Live now! Please write the error free program.

Browse other questions tagged ms-access vb6 ado dao or ask your own question. Three rings to rule them all How do hackers find the IP address of devices? Posted on 2008-07-14 Visual Basic Classic 1 Verified Solution 18 Comments 877 Views Last Modified: 2013-12-25 VB6 and Access using ADO to manipulate records. ADO Programmer's Reference ADO API Reference ADO Methods ADO Methods MoveFirst, MoveLast, MoveNext, and MovePrevious Methods (ADO) MoveFirst, MoveLast, MoveNext, and MovePrevious Methods (ADO) MoveFirst, MoveLast, MoveNext, and MovePrevious Methods (ADO)

An attempt to move forward when the EOF property is already True generates an error.In ADO 2.5 and later, when the Recordset has been filtered or sorted and the data of In this case, it will probably take an additional 3 to 6 seconds. more stack exchange communities company blog Stack Exchange Inbox Reputation and Badges sign up log in tour help Tour Start here for a quick overview of the site Help Center Detailed I'll give you a hint: because there's no current record.

So I whittled the code down as much as possible and the following snippet works fine on both Postgresql and Access, the 2 databases I tried it on, from VB6 using https://www.experts-exchange.com/questions/23563695/ADO-VB6-Error-3021-Even-with-1-record-in-recordset.html Ideally, I would like to create something in VBA to do this. In these earlier versions, changing the data of a current record in the sorted or filtered Recordset does not change the position of the current record, and MoveNext moves the cursor Normally, I'd ask you to do it yourself!

An attempt to move backward when the BOF property is already True generates an error. Your Answer draft saved draft discarded Sign up or log in Sign up using Google Sign up using Facebook Sign up using Email and Password Post as a guest Name By contrast, if the MOVEFIRST method is replaced with a MOVELAST then the (3021) error occurs on both databases. When you are already at the end of file position (in your case when rs_Data.EOF is true) you have gone past all active records, so you cannot execute a move to

I'm updating the tables from fields on an unbound form. My adviser wants to use my code for a spin-off, but I want to use it for my own company How do R and Python complement each other in data science? I need to search through all of their results to flag up those in a query that do not match the approved list..what is the best way to do this?I am navigate to this website It's most likely going to need an IP address, and a user/password combo.

Dev centers Windows Office Visual Studio Microsoft Azure More... I created a SQL query and go the exact same results. Is [](){} a valid lambda definition?

An attempt to move forward when the EOF property is already True generates an error.

  1. Do Until rs.EOF Formatting tags added by mark007 Reply With Quote 02-08-2007,03:17 PM #6 mdmackillop View Profile View Forum Posts View Blog Entries View Articles AdministratorVP-Knowledge Base VBAX Grand Master Joined
  2. BOF and EOF are TRUE.
  3. My error handler was working until all of a sudden this morning.
  4. now, what exactly do you reference? dbWhereCondition = "SELECT * FROM order_line WHERE order_num = '" & ordnum & "' AND line_num =" & ctrvar
  5. Basically when a user selects an item in the combo box I query the sql data using a linked table, but the recordset always comes back as read only so I
  6. You may have to register before you can post: click the register link above to proceed.
  7. Did Umbridge hold prejudices towards muggle-borns before the fall of the Ministry?
  8. I just didn't want to paste my company's login information.
  9. I do not have any forms linked to these tables.
  10. Privacy Policy Site Map Support Terms of Use 418,502 Members | 1,181 Online Join Now login Ask Question Home Questions Articles Browse Topics Latest Top Members FAQ home >

LEARN MORE Suggested Solutions Title # Comments Views Activity Detect VBA Font Colors 15 40 97d create a utf8 text file using vba 2 67 87d VB 6.0 printer how to This is different from the behavior in ADO 2.1 and earlier. Join Date Aug 2007 Location India Posts 2,158 Re: Error 3021 EOF or BOF !! ? Join them; it only takes a minute: Sign up vba - Run time error 3021 - EOF or BOF is true or the current record has been deleted up vote 0

Is the Recordset.EOF only suppose to be used with Table and Queries? Neither, actually, does the solution I thought I had. If you really want the last record to be the one displayed at end of file you will need to execute rs_Data.MoveFirst immediately before executing rs_Data.MoveLast. I've used late binding to make it more portable, but you can also reference the Active Data Object library to get access to the intellisense options.

View 2 Replies View Related Modules & VBA :: How To Extract Recordset From Subform Into Recordset Object Aug 14, 2015 Special situation: The SQL Server Linked Server across the country If the last record is the current record and you call the MoveNext method, ADO sets the current record to the position after the last record in the Recordset (EOF is View 1 Replies View Related ADO Recordset Help Dec 13, 2007 Hello,Having a problem with my recordset. Powered by W3.CSS.

i create a tmp_line table to contain the line item data. All Recordsets are declared as DAO and contain data... Unfortunately, rset.movenext does not seem to work, the same error is thrown. Tweet Thread Tools Show Printable Version Subscribe to this Thread… Display Linear Mode Switch to Hybrid Mode Switch to Threaded Mode Jul 19th, 2011,03:06 PM #1 Patoh View Profile View Forum