数据源连接模块

方便大家使用数据连接'====自定义函数:连接数据源===='DBClass=1无密码的Access数据源连接，ConnStr=mdb文件的完整路径。'DBClass=2SQLServer方式连接，ConnStr没有用'要使用SetSQLDef先设置SQL服务器变量'DBClass=3无密码的Excle数据源连接，ConnStr=xls文件的完整路径。&