使用VB6.0连接SQLSever2005数据库的源代码