老是出现“不能操作一个关闭的数据库”的错误，为什么？

provider:='Provider=Microsoft.Jet.OLEDB.4.0;';
  datasource:='Data Source='+extractfilepath(application.ExeName)+'\data\RSMIS.mdb;';
  DataM1.ADOCon1.ConnectionString:=provider+datasource;
  DataM1.ADOCon1.Connected:=true;
  DataM1.ADOCon1.LoginPrompt:=false;

  DataM1.ADOTable2.Connection:=DataM1.ADOCon1;
  DataM1.ADOTable1.TableName:='user';
  DataM1.ADOTable1.Open;

  results:=DataM1.ADOTable1.Lookup('userName',edit1.text,'password');

8 个解决方案