Ok I have found out the problem and is now fixed, Old code snippit:

Res.Open "SELECT * FROM Computer WHERE ComputerName=" & Combo1.text, Con, adOpenDynamic

And this snippit is correct but ONLY if the input in Combo1.text is in number format.

New code snippit:

Res.Open "SELECT * FROM Computer WHERE ComputerName='" & Combo1.text & "'", Con, adOpenDynamic

This works if the input is in text format.