I tried to be a good citizen and modified the query to use a temp table of ids that would get updated: 0 to get around the safe update check, or even set SQL_SAFE_UPDATE=0, then I've lost the 'check' on my query.I might as well just turn off the option permanently.
So for instance if the textbox control was set to "Wyntile", the field name should be set to that, but for some reason a different value shows up instead, example="Apples". Update 'update the current area for the Job Route job Route. Update 'success message Msg Box Text31 " has been moved from " Curr Area " to " new Area "." 'requery the listboxes Dim select Paras As String select Paras = "SELECT [a].[Job_Number] as [Job Number], [a].[Description], [a].[Person_In_Charge] as [Person in Charge], [a].[Area] " & _ " FROM [To_Do] As [a];" list Remove Jobs. So I was thinking that something is wrong in the ODBC connection/My SQL table, but when I checked the table in phpmyadmin for the most part that table follows a similar format of other mysql tables used in Access. Is there a known issue of ODBC having stability issues in connection?
Here is the code: Private Sub move Job2_Click() 'get the job number Job Num = Text31 Curr Area = DLookup("[Area]", "[To_Do]", "[Job_Number] =""" & Job Num & """") area1 = DLookup("[Area1]", "[Job Route]", "[Job Number] =""" & Job Num & """") area2 = DLookup("[Area2]", "[Job Route]", "[Job Number] =""" & Job Num & """") area3 = DLookup("[Area3]", "[Job Route]", "[Job Number] =""" & Job Num & """") area4 = DLookup("[Area4]", "[Job Route]", "[Job Number] =""" & Job Num & """") 'get what the current area is Current = DLookup("[Current]", "[Job Route]", "[Job Number] =""" & Job Num & """") 'if the current area is the first area then check to make sure there is a second 'if so, then set the new area to it If Current = 1 Then If area2 = "---" Then Msg Box area1 " was the last area in the route. Find First "[Job Number]=""" Text31 """" job Route. Also to note, the person who had told me this issue runs on an old Windows XP version, where once before on that computer there were known issues of the defined OBDC ANSI 5.3 Driver instance completely disappearing from Access' Data Source list before. That time, apparently the driver instance later re-appeared again magically in the D. Why is the value changed to something completely different on update? Private Sub move Job2_Click() Dim qdef As Query Def Dim select Paras As String ' UPDATE JOIN QUERY Set qdef = Current Db.
Stack Exchange network consists of 175 Q&A communities including Stack Overflow, the largest, most trusted online community for developers to learn, share their knowledge, and build their careers.
Visit Stack Exchange Database Administrators Stack Exchange is a question and answer site for database professionals who wish to improve their database skills and learn from others in the community. Sign up to join this community I am trying to understand how to UPDATE multiple rows with different values and I just don't get it.
The job cannot be moved." Exit Sub End If new Area = area4 Else Msg Box area4 " was the last area in the route. Recordset Set db Job Numbers = Current Db Set rst Job = db Job Numbers.