Hi,
i have code with error, but don't see why.
Dim db As DAO.Database
Dim strSql As String
strSql = "UPDATE Computers set [Network] = (select [Network] from Computers where (((Computers.[Serial]) = '" & Me.txtSerial & "'))) where ((([Serial]) = '" & Me.txtSerialNew & "'))"
Set db = CurrentDb...