Not sure what is that you are facing problem with this as there is no mention about that. But I could see that you don't use WHERE clause in UPDATE statement, that would result in updating all the rows with the given data.
Code:
Function updateSql(strcard,strlocation,strid,strport)
strsql = "update Instr_ID set (card = ' "& cardvalue &" ', location = ' "& name &" ', ID = ' "& instvalue &" ', port = ' "& portvalue &" ') WHERE PC_Name_Column = PC_Name_Value"
objconn.Execute(strsql)
End Function
Hope that helps.
Cheers!
_________________________
- Vijay G
Strive for Perfection