conn.C
这句是什么意思?
userName = rs.fields("user_name").value

我也没细看，你原来没在SQL语句里显示user_name，呵呵。
.Fields是Recordset的缺省属性，加上了这个，程序速度更快。