lcmdbconc="Driver={Microsoft Access Driver (*.mdb)};Dbq=" + Access文件名 + ";Pwd=" Accesshandle=Sqlstringconnect(lcmdbconc) IF Accesshandle>0 THEN ... else ... endif