Golom-- thanks again. I made DB a global variable but I am still getting an error 3048. Here is the revised code. I don't see where a database is being opened and not closed. Thanks for the help!!
Dim ParmQD As QueryDef
Dim ParmRS As Recordset
Dim SQL1 As String
On Error...
Golom,
Thank you... is there a way to keep the recordset usable? I want to see if a record exists in the record set. If so edit the record if not, then add to the recordset. As soon as I close it I lose that ability.
I am using VB6 with Access 2000. I am opening as DAO and reading records from a file. As I find the student record it performs the following lookup to locate records in a bound data control recordset. What is happening though is the code as is produces and error 3420 (Object invalid or not set)...
I have been racking my brain on this one for days now. I have searched the posting but still can not find a solution.
I am using VB6 with Access 2000 to do a lookup to a DAO recordset using Findfirst. As long as the record exists everything works great. If the record is not in the recordset...
thanks for the reply. Yes, if I open the db on the server manually it does compact. Is this the problem? Do I just need to access the db directly at some point to get it to compact on close?
I have an Access database that sits on the server. On the local side sits an Access database which is linked to the server database. I only open the local database to retreive data. I have the server database set to compact on close yet when the application ends the server database will not...
Hello,
I have a VB6 SP5 application which has a bound data control field. I want to pasword protect an Access 2000 database. I would like to use the connect property to supply a password. My connect property field looks like:
Access 2000;pwd=<password>;
When I run the application I...
I have done additional searching and found that AddNew works in an older version of my code. The code is doing the exact same thing. Does any one know what setting could be changed that would cause error 3426 to occur. Please help!!
ArtieChoke
I am using a DAO recordset. The odd thing is that this error is only occuring on one of the 5 tables I am adding to. If I skip this code and use AddNew on another table in the database the AddNew works fine.
In response to the article, I did see that and tried a test for BOF and EOF...
Thanks for the reply:
I placed the Edit in as a workaround suggested from MS knowledge base. It was not there originally. With or without I still get the 3426 error.
I have read MS Knowledge base and tried their workaround. I continue to get the same error. I can do an AddNew and Update on a different table in the same manner, just not this one table. This is why I can't seem to figure out if it's a setting or what else would cause this error.
It appears this error is present for VB4. I am running VB6. The odd thing is that this has worked for two years and suddenly this error appears. Is there some other setting that I am missing. I have check Microsoft and tried an explicit test for EOF and BOF but am still getting the error. This...
I am using a bound data control from VB6 SP5 that is linked to an Access 2000 table. I am trying to add a new student record using the following code:
stdDisp.student.Recordset.AddNew
stdDisp.student.Recordset.Edit
stdDisp.student.Recordset!ID = Val(stud_id$)...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.