Forms :: OLE Server Error From List Box Update

Jun 2, 2014

I have a form which uses a list box to select which record to display. The code is all generated by Access during form design. It is a method I have used numerous times inthe past in various database without problem (even in the current database I am developing).But for some reason on this one form I get the following error;-

"The expression After Update you entered as the property setting produced the ollowing error; A problem occurred while database was communication with OLE Server or Active X Control".

View Replies


Forms :: Error Occurred While Sending Data To OLE Server

May 12, 2013

I want to make a bar chart in form with X-axis: [WEEK], Y-axis: [TTL NO] and each bar separated by [FINAL CHECK] liked below which [WEEK] linked to filter in form to choose required period.However, error occurrs and 2 error message boxes as below.

1. The Microsoft Jet database engine does not recognize '[Forms].[Menu].[FM_WK]' as a valid field name or express.
2. An error occurred while sending data to the OLE server (the application used to create the object).

View 1 Replies View Related

General :: Populate List Box With Event After Update In Combo Box - Run Time Error 13

Sep 9, 2013

I am trying to populate a list box with an event after update in a combo box. I can get the formula to work using 2 criteria, the problem is i nee to add a third criteria. When I try to add it I get the run-time 13 error.

Here is the code I am trying to use:

Private Sub cboStatusRFQ_AfterUpdate()
Me.cboSupplier.RowSource = "SELECT DISTINCT [Consolidated_Master_Req_Pool.RFQ Contact] " & _
"FROM Consolidated_Master_Req_Pool " & _
"WHERE consolidated_master_req_pool.Complete = FALSE AND [Consolidated_Master_Req_Pool.RFQ Supplier] = '" & Nz(cboStatusRFQ.Value) & "'" And "[cosolidated_master_req_pool.Status] = '" & "[SUPPLIER_RFQ FOLLOW-UP]" & "'" & _
"ORDER BY [Consolidated_Master_Req_Pool.RFQ Contact];"
Me.cboSupplier = Null
End Sub

View 2 Replies View Related

Forms :: How To Update Fields Based On List Box Selection

Apr 8, 2014

I'm building a customer form using a list box of summary customer info on the left side of the form (CustId and Names) and customer details on the right hand side. I want the details shown on the right to be those for the customer selected in the list box on the left. I'm having problems getting the details to update when a different record in the list box is selected or clicked.

I originally set the data source for the detail records to the base customer table but couldn't work out how to update them when the list box was clicked!

I then tried creating a query with the select clause conditional on the list box (CustId = Me.qryContactDetails) and set the data control source for the detail record to the query (=[qryContactDetails]![FirstName]). The query works as expected but the field in the form just shows '#Name?'.

I tried adding a field requery on the List31_Click() event using Me.[FieldName].ReQuery but that didn't seem to change anything

View 5 Replies View Related

Forms :: Filtered Drop Down List Returning Error Once Status Changes

Mar 8, 2013

I have a table with a list of Students. While the academic year is in progress those students are in an "Active" status. Once the year is finished those students are moved into (hopefully) a "Passed" status or some other status that is not considered "Active".

Throughout the rest of the database I have many forms that refer to the Student Listing. As an example we have a Test so we select the Student performing the test using a Drop Down List and go from there.

I have set search criteria to the Drop Down List via the Combo Box's Query to only display active students and it works fine during the Academic Year. However if I have to review a test from a previous year then the Student Drop Down List no longer displays the name but their ID# (Primary Key) because the Student's status has now changed and no longer meets the query criteria.

Is there a way to use the Filter/Search Criteria to chose from a listing of Active Students but once selected it will display the Student name regardless of their status?

View 2 Replies View Related

Forms :: Update Subform - Recordset Error

Sep 14, 2013

How it works: You search for a User, and then you search for a Serial.Now, what if I want to edit the table? (inside the subform, the results). I added an openRecordSet, and Parameters, but I still get the error saying that Recordset cannot be updated.Why? I opened and sent parameters but still fails.

View 2 Replies View Related

Forms :: Update And Save Button Code Is Getting Error

Aug 24, 2014


Private Sub Save_Click()
If IsNull(cboEmpName) Then
MsgBox "Please Select Employee Name"
End If
If Me.txtNoofDaysWorked.Value = "0" Then
MsgBox "Please Enter No of Worked Days"


View 1 Replies View Related

MS Access 2000 Error On Novel Server. Please Help! Thanks

Jan 25, 2005

Good morning,

We keep having this error message when a group of our users try to open a MS Access 2000 application resides on a Netware server.
"The Microsoft Jet database engine could not find the object 'MSysDb'. Make sure the object exists and that you spell its name and the path name correctly." Have any one seen this error before? How to solve it please! Please advice.

Thank you very much,

View 4 Replies View Related

Adobe - Bound Object - OLE Server Error

Jul 13, 2006

I have the strangest error.

I have used a OLE Bound Object, so I could create a link to some .PDF files. Everything works great, and I was ready to roll it out to the users (boy will they be excited), when I noticed a silly error I could not get rid of.

After closing the .PDF file (which opened correctly) I get an error that reads:


The operationon on the Acrobat Document object failed.

The OLE server may not be registered

To Register the OLE server, reinstall it.

I have searched the internet, this message board and the Microsoft website, and have come up with little. I believe it might be a .dll error, but the only thing close I could find regarded MS Access 95/98. This is an MS Access 200 DB. I get the error on both a Microsoft 2000 machine AND a Microsoft XP machine.

I tried to use "On Error Resume Next" but to no luck.

If anyone has any ideas, I would appreciate the help/suggestions.

Thank you,

TJ Bernard

View 5 Replies View Related

Error: Communicating With OLE Server Or ActiveX Control

Nov 18, 2006

I just installed Office 2007 and I get this error whenever I start MS Access 2007.
"A problem occured while Microsoft Office Access was communicating with the OLE server or ActiveX Control"

What could it be? I don't have any antivirus appz or such that could interfere, and my Windows XP+SP2 is updated daily.

View 12 Replies View Related

ODBC Error In Query (client/server SQLServer)

Nov 6, 2007

I have a problem with my query which works fine prior to upsizing to SQL Server. Now I have an Access Front-end with SQL Server (2005) back-end client/server setup. This problem has bugged me for over one full day and I can't find anything that seems to solve it.

The error that comes up is this:

Run-time error '3146':
ODBC--call failed.
[Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near '='. (#102)

The line that's producing the error is a DoCmd.RunSQL "SELECT tblPBC..." The full statement is below. I can't seem to see anything wrong w/ my syntax below....

View 5 Replies View Related

Error While Changing The Web From Windows 2000 Server To XP Professional

Sep 9, 2004

If the web server is windows 2000 server.there no problem.
If I am changing it to Windows xp professtional.I am
Getting the following error
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0xa34 Thread 0xeb0 DBC 0x1052ed4 Jet'.

While opening a connection to access data base.
How to solve it?

Thanks in advance

View 3 Replies View Related

General :: Code Error When Load Data From Server

Jun 5, 2014

Im using ms access 2010 and this program compatible with previously ms access.the error show is type mismatch (error 13) on


Set rbs = CurrentDb.OpenRecordset("SELECT MSysObjects.Name" _
& " FROM MSysObjects WHERE MSysObjects.Type= 1 And MSysObjects.Flags=0" _
& " and MSysObjects.Name='" & n_tb & "'")

View 2 Replies View Related

General :: Upsizing Access Database To SQL Server Error

Nov 4, 2013

I am trying to upsize the access database to sql server ,i have an odbc connection and when I try to move the tables,all the data is moving except one table "tblproductinfo" . I have attached the table data and error.

View 1 Replies View Related

How To Get Full Permission:Add, Delete, Update, Edit In The SQL Server Database

Jul 26, 2007

I wrote the following statements to update a SQL server database:

Dim MyDb As Database
Dim MyRs As Recordset

Set MyDb = DBEngine.Workspaces(0).OpenDatabase("AMD", dbDriverPrompt, False, "ODBC;DATABASE=AMD;DSN=Remote")

Set MyRs = MyDb.OpenRecordset("SELECT AllAttendanceEvents.* FROM AllAttendanceEvents ORDER BY AllAttendanceEvents.EntryTime DESC")


While Not MyRs.EOF
MyVal = MyRs!EntryTime
Debug.Print MyVal
MyRs!Ix = 50099

When it execute the red line statement, it generates the error:Cannot update. Database or object is read-only.

This error is generated isnpite that I already checked the boxes: SELECT, INSERT, UPDATE, DELETE in the Permissions page of the tables?

Please advise.

View 3 Replies View Related

Wierd Prob: Cannot Update SQL Server Text-fields For Some Records, But Can For Others

Feb 22, 2005


I have a very strange problem:

I have a table linked to an SQL Server table in my MS Access 2000 Application containing 5 text-fields (SQL Server Type, in Access seen as MEMO-fields) and several other fields (in total about 140 fields). Updating any field works fine except for some records. In those records I can only edit the non-text-fields in my application. When I try to edit one of the text-fields I get a error message telling me that another user has edited the record and i have to discard my changes.

The strange thing is that this problem only crops up for some records. (1 in a 100 or so) All other records work fine.

Does anyone know what happens here? And how this can be fixed?


View 3 Replies View Related

Modules & VBA :: Update Data In A Bunch Of Tables Of SQL Server Database

Apr 25, 2014

I need to update data in a bunch of tables of a sql server database. The database has 300 tables which I have linked via odbc. I'm hoping there is a simple way, using vba, to loop through my linked sql server tables and determine which of them are views as opposed to tables.

View 1 Replies View Related

Modules & VBA :: Invalid Column Error In SQL Server ODBC Where Clause

Jun 26, 2014

Connecting Access FE to SQL SERVER BE Connection is fine. I can open and close it and other queries work fine. I have only one problem with the SQL in one query

With rstRPT
If FirstRecord = True Then
.Open "SELECT Min([" & SourceTbl & "].[3Order ID]) AS MinOf3OrderID " & _


why it wants to see the variable as a column name?

View 1 Replies View Related

Modules & VBA :: Update Access Table From SQL Server Table Source

Jun 17, 2013

I have created a code below to test whether I can run a query and retrieve a data from an SQL server table. And so far I can return the result using a messagebox. but somehow I just don't know how to use this connection to update the table inside this access file. Basically I want to use this as a front end file. then when the form is open it will automatically update the table inside this access file and load the data to the combo box as a list.


Option Compare Database
Sub LocalServerConn_Test()
Set conn = New adodb.Connection
Set rst = New adodb.Recordset


View 4 Replies View Related

List Box Update

Oct 31, 2005


I am creating an input form to assign an engineer to a project for x days.

The form consists of two Text Boxes for the Engineer Code and Project Name. I also have a Multi Select List Box which is linked to a table. The Table contains two fields ID-Autonumber and Date-ShortDate. This table contains all dates for the next three years.

I ideally want the user to select the Engineer Code and Project and the desired dates the engineer is to be assigned and add these to another table.

I have tried the following code but while the two Text Boxes update fine and the number of selected dates are added the dates themselves are not.

Can anyone see where I am going wrong and guide me in the right direction

Private Sub Command4_Click()
On Error GoTo Err_Command4_Click

Dim db As ADODB.Connection
Dim r As ADODB.Recordset
Set db = CurrentProject.Connection
Set r = New ADODB.Recordset

Dim var As Variant

r.Open "tblIM", db, adOpenStatic, adLockPessimistic

For Each var In Me.List0.ItemsSelected
r.Fields("Date") = Me.List0.Value
r.Fields("EngineerCode") = Me.EngineerCode.Value
r.Fields("Project") = Me.Project.Value
Next var

Exit Sub

MsgBox Err.Number & " - " & Err.Description
Resume Exit_Command4_Click

End Sub



View 4 Replies View Related

List Box Error

Feb 9, 2005

hello, I am using a list box to select different time from. when the time is selected in the list box it appears in another text box with other information. when all information is inputed, I click ok and the info is saved. the main form is a calendar that is created from a query. when i click on the day to see the event the time is not saved. if i type in the time then it saves. this is the code im using in the after update event:

Forms!frmNewSample!txtAppointmentTime = Me.List22.Value

I also tried the control source for the text box that i am sending the value to, still the times do not save.
I think it would be better if someone could see what i am trying to do. the program is 3 mb, so i can not attatch it. Any help would be very much appriciated.

View 1 Replies View Related

Value List Error

Jan 5, 2006

Morning Folks,

The code below pulls up a list of PDF files from a shared drive on a server. For some reason it all of a sudden has stopped pulling all the PDF files.

Error # 1The following error as occurred: The setting for this property is too long

Private Sub Form_Load()

Const strPath As String = "\a70nbcbs2data2smrt_dskGroup TrackingHotDocs Changes"
Dim fs, folder, file, folderCollection
Dim strValueList As String
Dim strFileName As String

On Error GoTo Handle_Error

Set fs = CreateObject("Scripting.FileSystemObject")
Set folder = fs.GetFolder(strPath)
Set folderCollection = folder.Files

For Each file In folderCollection
strValueList = strValueList & Left(file.Name, Len(file.Name) - 4) & ";"

Me.lstPDFFiles.RowSourceType = "Value List"
Me.lstPDFFiles.RowSource = strValueList

Exit Sub

MsgBox "The following error has occurred: " & Err.Description
Exit Sub

End Sub

The numbers before PDF file is the date. For some odd reason it has stopped pulling everything past 02/24/2005. The code below is the list that is populated in to the list box.

Is there a maximum to a list box? Is that what is going on? If so what do you suggest we do?

20040110Maternity;20041202PhantomB;20041202Phantom BEmail;20041206PharmacyCC;20041206PharmacyCCEmail; 20041207BlueCard;20041207BlueCardEmail;20041208Fir stPlace;20041209AnniversaryDate;20041209Anniversar yDateEmail;20041210Reimbursement;20041210Reimburse mentEmail;20041210SecondaryClaims;20041216Drug;200 41216DrugEmail;20041216GynExam;20041216GynExamEmai l;20041216NonStandard;20041216NonStandardEmail;200 41217InpatientRehab;20041217InpatientRehabEmail;20 0502022TierDrugEmail;20050202ASO2TierDrug;20050202 ASOCataract;20050202ASOCataractEmail;20050202ASOPr eauth;20050210DentalAmendments;20050210DentalAmend mentsEmail;20050214DigitalMammography;20050214Digi talMammographyEmail;20050218DentalAmendments;20050 218DentalAmendmentsEmail;20050224DigitalMammograph y;20050224DigitalMammographyEmail;

View 14 Replies View Related

Error In Not In List

Nov 6, 2006

I have the following cod to add a staff numberif this is not present in a combo box,all works perfectly when a staff number is not present, it opens me the form to add the staff list but once I have added the staff num and goback to my main form and try to type the staff number just added it keep opening the not in list event, I then have to close the form and then reopen it.
I know it is something to do with the requery function, but can somebody tell me were I shoul put it and the correct VB instruction

Private Sub StaffNumber_NotInList(NewData As String, Response As Integer)
On Error GoTo Err_StaffNumber_NotInList

If MsgBox(" STAFF NUM NOT IN LIST " & vbCrLf & " Do you want to edit staff list? ", vbYesNo) = vbYes Then
Response = acDataErrContinue
DoCmd.OpenForm "frmstafflist", , , , acFormAdd
Forms!frmstafflist.StaffNumber = NewData
Response = acDataErrContinue
End If

Exit Sub

MsgBox Err.Description, , " db1"
Resume Exit_StaffNumber_NotInList
End Sub

View 6 Replies View Related

List Box To Update A Table

Aug 19, 2005


I have a list box which is bound to a field in a table - however, when I select a value (which comes from a lookup query) it is not writing the value to the table, which is basically making my database useless!

I've also tried using an update query using the following code (before trying this I made the list box unbound):

UPDATE tblgroup SET tblgroup.Price = [Forms]![frmMain].[lstPrice].[value]
WHERE (((tblgroup.Group)=[forms]![frmMain].[txtGroup].[value]));

Any help would be greatly appreciated, cheers.

View 9 Replies View Related

List/Subform Update

Mar 28, 2006

I have a private sub on a subform called txtsearchstring_change.

The txtsearchstring box is = to the client_id on the main form.

Basically when the user clicks on the next record button (which is on the main form) it should update the txtsearchstring_change on the subform and then display the new results in the list box.

Im not to sure how to do this. I understand im calling a sub from another form, so i did try a public not a private sub. And i have added on the next and previous button - txtsearchstring_change.

Thanks for any help.

View 2 Replies View Related

Not On List And After Update Conflict

Jun 7, 2006

I will try and describe my issues as best I can.
I have a NotOnList Event on a Combo box.

Dim strSQL As String
Dim i As Integer
Dim Msg As String

'Exit this sub if the combo box is cleared
If NewData = "" Then Exit Sub

Msg = "'" & NewData & "' is not currently in the list." & vbCr & vbCr
Msg = Msg & "Do you want to add it?"

i = MsgBox(Msg, vbQuestion + vbYesNo, "Unknown Problem...")
If i = vbYes Then
strSQL = "Insert Into TroubleShootingGuideTBL([Problem]) values ('" & NewData & "')"
CurrentDb.Execute strSQL, dbFailOnError
Response = acDataErrAdded
Response = acDataErrContinue
End If

This worked just fine until I added an AfterUpdate Event used for Cascading Combo Boxes.

On Error Resume Next
Problem.RowSource = "SELECT DISTINCT TroubleShootingGuideTBL.Problem " & _
"FROM TroubleShootingGuideTBL " & _
"WHERE TroubleShootingGuideTBL.SystemGroup = '" & SystemGroup.Value & "' " & _
"ORDER BY TroubleShootingGuideTBL.Problem;"

When I add something that is not current in the recordsource for the combo I still get the msg box:
"is not on the list, Do you want to add it? click yes or no.
I click yes and then I now get this error:
"The text you entered isn't an item in the list. Select an item from the list or enter text that matches one of the listed items"

As I said earlier the NotOnListEvent worked just great until I added the AfterUpdate Event. Any suggestions for me? Thanks in advance

The Source Table is updating but the Table the Form populates is not updating.

Please help. This is driving me crazy. and thanks!

View 2 Replies View Related

Copyrights 2005-15, All rights reserved