excel vba runtime error 3021 Des Moines New Mexico

Address 400 Hill St, Raton, NM 87740
Phone (719) 497-9730
Website Link http://www.bitsnbytes.biz
Hours

excel vba runtime error 3021 Des Moines, New Mexico

If it's got records, a MoveFirst will never fail. Sign Up Now! To start viewing messages, select the forum that you want to visit from the selection below. What are "desires of the flesh"?

But why, since I'm on a current > record. One thing that is true though is that .RecordCount will always be greater than zero if there are records. Join them; it only takes a minute: Sign up Run time error 3021- no current record up vote 1 down vote favorite 1 I want to link the result of a The mortgage company is trying to force us to make repairs after an insurance claim (KevinC's) Triangular DeciDigits Sequence Players stopping other player actions My CEO wants permanent access to every

Register To Reply 12-16-2011,06:02 AM #3 romperstomper View Profile View Forum Posts Visit Homepage Forum Guru Join Date 11-04-2008 Location A1 MS-Off Ver Most Posts 12,299 Re: Runtime error 3021 Either Navigating down, of course, checking EOF is required. If the Recordset is empty, then you'll need to verify your SQL statement as described by @GregHNZ in his comment above. As Navion hinted, also be sure to learn the meaning of .BOF and .EOF.

Register To Reply 12-16-2011,07:49 AM #5 Kyle123 View Profile View Forum Posts Visit Homepage Forum Guru Join Date 03-10-2010 Location Leeds MS-Off Ver 2013 Win7 Posts 5,869 Re: Runtime error 3021 Is it possible to have a planet unsuitable for agriculture? I will have to recheck.... Reply With Quote Oct 20th, 2014,05:46 PM #23 Navion View Profile View Forum Posts Fanatic Member Join Date Jan 2006 Posts 557 Re: Run-Time Error '3021' No Current Record Found Funny

Novice? dao360.chm Reply With Quote Oct 20th, 2014,04:25 PM #8 Navion View Profile View Forum Posts Fanatic Member Join Date Jan 2006 Posts 557 Re: Run-Time Error '3021' No Current Record Found I'm marking this thread resolved now. Meyers-Jouan Top Best Answer 0 Mark this reply as the best answer?(Choose carefully, this can't be changed) Yes | No Saving...

you can get the value of a field by its index number instead of a literal msgbox rsCtrlRec.Fields(0) will return the value for the first field in the table, no matter Thanks again Rana Irfan Ahmad @ U.A.E., Sharja Top For discussions on Visual Basic for Access please visit the Visual Basic – General Discussions group. Does chilli get milder with cooking? Reply With Quote Oct 20th, 2014,05:00 PM #13 vb6coder14 View Profile View Forum Posts Thread Starter Hyperactive Member Join Date Oct 2014 Posts 261 Re: Run-Time Error '3021' No Current Record

The Visual Basic for Access group is no longer active. It's actually the only major bug in the DAO that I'm aware of. Per MSDN: "A call to either MoveFirst or MoveLast when the Recordset is empty (both BOF and EOF are True) generates an error." To avoid that situation, my general iteration of Taffycat posted Oct 15, 2016 at 9:19 AM WCG Stats Saturday 15 October 2016 WCG Stats posted Oct 15, 2016 at 8:00 AM Review round up - 14 October 2016 Becky

About Us PC Review is a computing review website with helpful tech support forums staffed by PC experts. Martin Walke replied Jul 28, 2011 Hi, The best way to do this is to first concatenate the FAC fields for each DN and then update the MML table. Code: With r If MailType <> "3" Then Do Until MailType = "3" And Location = "Lubbock" .MoveNext Loop If MailType = "3" And Location = "Lubbock" Then Do Call SendMail(r, Browse other questions tagged vba ms-access ms-access-2010 or ask your own question.

Run Time Error 3021 , No current Record VBA Irfan Rana asked Jul 27, 2011 | Replies (6) I have two tables, One is a Data "LST_ SS" and other is Call SendMail(r, d) End If ' Moves to the next record. .MoveNext ' Loop through this process until there are no more records. I was getting problem to concatenate my rows, that is why i uses MIcrosoft access. Can Communism become a stable economic strategy?

Here i am trying to get rid of it. Bored? In that case (through whatever btree or indexing method it internally uses), it comes nowhere close to actually "touching" and counting all the records to do a .MoveLast. The sharing of .BAS (or other) files in multiple .VBP project is a monumentally bad idea in my opinion.

Still not sure why it threw that error message but placing a value of 0 in the null fields corrected the problem then I added a default value of "0" to asked 2 years ago viewed 15871 times active 1 year ago Linked 2 error code 3021 either bof or eof is true or the current record has been deleted 1 Error It opens the recordset, loops through the records until it finds a person that matches BOTH criteria, sends the e-mail, and continues to loop through and sending messages to the appropriate As Michael said, you don't need to keep opening the DB, use just one connection thus: Private Sub cmdMML_Click() Dim rsList As Recordset, rsData As Recordset, rsMML As Recordset Dim SQLStr

Solve problems - It's Free Create your account in seconds E-mail address is taken If this is your account,sign in here Email address Username Between 5 and 30 characters. A recordset, depending on type & sql provider, can have an initial value of -1 if I recall correctly Insomnia is just a byproduct of, "It can't be done" Newbie? Michael S. The time now is 04:12 AM. {{offlineMessage}} Store Store home Devices Microsoft Surface PCs & tablets Xbox Virtual reality Accessories Windows phone Software Office Windows Additional software Apps All apps Windows

Steele Jun 15, 2009 Loading... Isn't that more expensive than an elevated system? Have you tried the same query in the db directly? I used to debug a much more complicated query than yours and this is the way that I've done.

Register Privacy Policy Terms and Rules Help Popular Sections Tech Support Forums Articles Archives Connect With Us Twitter Log-in Register Contact Us Forum software by XenForo™ ©2010-2016 XenForo Ltd. This program is designed to send e-mails to appropriate people (determined by their field office location and "Mail Type"). Thanks GEM, I will try this WEND also Regard, Ashfaque View Public Profile Find More Posts by Ashfaque

« Previous Thread | Next Thread » Private Sub cmdMML_Click() DoCmd.OpenQuery "qryDISTINCT", acViewNormal Dim rsList As Recordset Dim rsDBList As Database Dim rsData As Recordset Dim rsDBData As Database Dim rsMML As Recordset Dim rsDBMML As Database Set

Reply With Quote Oct 20th, 2014,11:24 PM #31 Navion View Profile View Forum Posts Fanatic Member Join Date Jan 2006 Posts 557 Re: Run-Time Error '3021' No Current Record Found Originally The END IF was required to place at very end of code lines. And what about "double-click"? How?

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