All rights reserved. Any advice would be highly appreciate! I edited the question to reflect that. please tell me with what values you have a problem. 0 Message Author Comment by:kbios2008-07-14 When I run the program eof and bof return true (they shouldn't). click site
check your recordset. The first time it happened for me was when I built a site for a large wine importer here in Sweden. I just wish I hadn't assumed that all the move methods would result in similar problems ms-access vb6 ado dao share|improve this question edited Jun 19 '11 at 12:10 asked May It did its job well for many years too until I have tried to move from DAO to ADO. –jjb May 14 '11 at 8:02 @David At the time
current community chat Stack Overflow Meta Stack Overflow your communities Sign up or log in to customize your list. Browse other questions tagged excel ms-access vba or ask your own question. Do While rset.EOF <> True rset.Delete rset.MoveFirst Loop After the deletion of the final record EOF and BOF still remain false but you won't get an error calling the MOVEFIRST method.
Go to Solution 18 Comments LVL 142 Overall: Level 142 Visual Basic Classic 32 Message Active today Expert Comment by:Guy Hengel [angelIII / a3]2008-07-14 can you show more details like How can I get the 3021 error to go away? 0 Question by:kbios Facebook Twitter LinkedIn Google LVL 142 Active today Best Solution byGuy Hengel [angelIII / a3] does the code, 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 now, what exactly do you reference? dbWhereCondition = "SELECT * FROM order_line WHERE order_num = '" & ordnum & "' AND line_num =" & ctrvar
Good luck! –rskar May 16 '11 at 19:25 I made a small discovery related to this question which might be of interest to you and edited the question accordingly We are happy to advise and support you with specific issues, so please feel free to post again if we can be of more assistance. In one stored procedure, I forgot to write SET NOCOUNT ON. http://stackoverflow.com/questions/7664151/error-3021-no-current-record-has-been-found-query-data-from-access-to-excel so I too would have used ST01010000225 as an order_num and 1 as the line_num.
Our new SQL Server Forums are live! 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 on my end i have to wait before processing. It got me wondering how to hook into built-in ribbon events in Office.
Copyright 1999-2016 by Refsnes Data. https://msdn.microsoft.com/en-us/library/ms677527(v=vs.85).aspx Heres all my Code Code: Dim db_file As String 'Name of DataBase Dim SQLstmt As String 'SQL Statement String(s) Dim cn As ADODB.Connection 'Connect to the Main ADO Data Type Dim 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 Join Date Aug 2007 Location India Posts 2,158 Re: Error 3021 EOF or BOF !! ?
Post Reply Tweet Forum Jump -- Select Forum -- Getting Started Using ProductCart Customizing ProductCart Search Engine Optimization Suggestions Release Log/Just In Section New Features Using BTO Customizing BTO Make sure the URL is typed correctly adErrWriteFile 3004 -2146825284 0x800A0BBC Failed when writing to file adWrnSecurityDialog 3717 -2146824571 0x800A0E85 Not in use adWrnSecurityDialogHeader 3718 -2146824570 0x800A0E86 Not in use ❮ Never happend to me after that.Peter LarssonHelsingborg, SwedenOK...I got the point. Register Help Remember Me?
Is it feasible to make sure your flight would not be a codeshare in advance? What's its name? In future, please provide those pieces of information when you ask us to troubleshoot an error. navigate to this website What's the last character in a file?
When I tried this 'solution' all the records were already deleted from the table, therefore the entire block was bypassed and so no error was thrown. 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) Join Now For immediate help use Live now!
Examples might be simplified to improve reading and basic understanding. All Forums SQL Server 2000 Forums SQL Server Development (2000) Either BOF or EOF is True ...........Error Reply to Topic Printer Friendly Author Topic Swati Jain Posting Yak Master India Unfortunately, rset.movenext does not seem to work, the same error is thrown. Subscribe to our monthly newsletter for tech news and trends Membership How it Works Gigs Live Careers Plans and Pricing For Business Become an Expert Resource Center About Us Who We
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 BUT if I insert a msgbox, and then continue with the process I can access the 1 record in the oldbRecordset. In a select statement I am tyring to retrieve 1 record. On the recordset I used, the RecordCount property was updated after a delete.
If rset.BOF <> True Or rset.EOF <> True Then rset.MoveLast Do While rset.BOF <> True rset.Delete If rset.BOF <> True Or rset.EOF <> True Then End If If rset.BOF <> True If the first record is the current record and you call the MovePrevious method, ADO sets the current record to the position before the first record in the Recordset (BOF is see this thread Seenu If this post is useful, pls don't forget to Rate this post. Runtime Error: 3021 execution error '3021' Error 3021 description problem Error 3021 no current record access 2000 Browse more Microsoft Access / VBA Questions on Bytes Question stats viewed: 13069 replies:
I might be interested in talking about a spa cover. ADO Tutorial Variable types SP6 for VB6, MsFlexGrid fast fill, Sorting Algorithms Reply With Quote Jul 21st, 2011,01:38 PM #4 Patoh View Profile View Forum Posts Thread Starter Lively Member Join My main problem is everytym i execute a command with the record sets. Syntax lngErrorNumber=objErr.Number Example <% for each objErr in objConn.Errors response.write("
") response.write("Description: ") response.write(objErr.Description & "
") response.write("Help context: ") response.write(objErr.HelpContext & "
") response.write("Help file: ") response.write(objErr.HelpFile & "
") response.write("Native error: ") response.write(objErr.NativeError
Once I find the record and process the fields I will not need to do .MoveNext or any other navigation. 0 Message Author Comment by:kbios2008-07-14 database file sent gwi.mdb 0 Then I got the error when first using Set rs = rs.NextRecordset() and then Do Until rs.Eof block. Join our community for more solutions or to ask questions. are u moving pointer properly (if recordset is not empty)?
Read More » REPORT ERROR PRINT PAGE FORUM ABOUT × Your Suggestion: Your E-mail: Page address: Description: Submit × Thank You For Helping Us!