No sé cmo se llamará el recordset que tenés y que tra los datos del usuario (ni el campo en cuestión), pero yo los llamé rs_de_datos_del_usuario y campo_en_cuestion para el ejemplo. Modificalo con los datos reales y debería funcionar:
Código:
<option value="<%=rs_categoria("id_categoria_user")%>"<% if CInt(rs_categoria("id_categoria_user")) = CInt(rs_de_datos_del_usuario("campo_en_cuestion")) then response.write " selected=""selected""" %>><%="("&rs_categoria("categoria")&") "&rs_categoria("descripcion_c")%></option>