竹林逸轩

摘要： {--- SQLDMO ---}//主要使用SQLDMO//检查是否已安装SQLtry SQLServer := CreateOleObject('SQLDMO.SQLServer');except RaiseException('您还没有安装SQL数据库.'#13#13'(Error ''' + GetExceptionMessage + ''' occurred)');end;//连接SQLSQLServer := CreateOleObject('SQLDMO.SQLServer 阅读全文