Is Access installed on the server where you are trying to compact the database?
If not, the com object 'Access.Application' may not be registered which would cause this sort of problem. If it is installed, can you get the following code to work? <cfobject action="create" class="Access.Application" name="objTest" type="COM"> <cfoutput>#isObject(objTest)#</cfoutput> It should output 'Yes' if all is well. FYI, the code in cf_compact works fine on CFMX. Spike > -----Original Message----- > From: Giles Roadnight [mailto:[EMAIL PROTECTED]] > Sent: 02 October 2002 15:30 > To: [EMAIL PROTECTED] > Subject: Re: [ cf-dev ] Re: cfCompact > > > Sorry, CF version 4.5 > > ----- Original Message ----- > From: "Justin MacCarthy" <[EMAIL PROTECTED]> > To: <[EMAIL PROTECTED]> > Sent: Wednesday, October 02, 2002 2:23 PM > Subject: RE: [ cf-dev ] Re: cfCompact > > > > What version of cf? COM in MX is different. Try running a windows > scripting > > host script that calls the COM. > > Justin > > > -----Original Message----- > > > From: Robertson-Ravo, Neil (REC) > > > [mailto:[EMAIL PROTECTED]] > > > Sent: 02 October 2002 14:08 > > > To: '[EMAIL PROTECTED]' > > > Subject: RE: [ cf-dev ] Re: cfCompact > > > > > > > > > which version? > > > > > > -----Original Message----- > > > From: Giles Roadnight [mailto:[EMAIL PROTECTED]] > > > Sent: 02 October 2002 14:01 > > > To: [EMAIL PROTECTED] > > > Subject: Re: [ cf-dev ] Re: cfCompact > > > > > > > > > Yes it is Access. Sorry, didn't realise we don't do attachments. > > > Here is the > > > code: > > > > > > <!--- Check the attributes ---> > > > <cfscript> > > > // Default error variable > > > caller.error=0; > > > > > > //Check the database attribute > > > if (not IsDefined("attributes.database")) > > > caller.error=caller.error+1; // No database attribute present else > > > { > > > if (not FileExists(attributes.database)) > > > caller.error=caller.error+2; // Database attribute does > not point to a > > > valid database > > > path=GetDirectoryFromPath(attributes.database); > > > success=0; > > > while (success IS 0) > > > { > > > attributes.tempdatabase=path & randrange(1000,9999) & ".mdb"; > > > if (not FileExists(attributes.tempdatabase)) > > > success=1; // We have a non-existing filename > > > } > > > } > > > > > > //Check the backupdatabase attribute > > > if (IsDefined("attributes.backup")) > > > if (FileExists(attributes.backupdatabase)) > > > caller.error=caller.error+4; // Backupdatabase already exists > > > </cfscript> > > > > > > <cfif not caller.error> > > > <cfif IsDefined("attributes.backupdatabase")> > > > <cffile action="COPY" source="#attributes.database#" > > > destination="#attributes.backupdatabase#"> > > > </cfif> > > > > > > <!--- Connect to/Create the object ---> > > > <cftry> > > > <cfobject type="COM" action="CONNECT" name="objaccess" > > > class="Access.Application"> <cfcatch type="Any"> > > > <cfset request.comerror = cfcatch.message> > > > <cfset caller.error = 10> > > > <cfobject type="COM" action="CREATE" name="objaccess" > > > class="Access.Application"> > > > </cfcatch> > > > </cftry> > > > > > > <!--- Compact the database to a temporary datbase ---> <cftry> > > > <cfscript> > > > objDBEngine = objaccess.DBEngine; > > > temp = objDBEngine.CompactDatabase("#attributes.database#", > > > "#attributes.tempdatabase#"); > > > </cfscript> > > > <cfcatch type="Any"> > > > <cfset request.comerror = cfcatch.message> > > > <cfif cfcatch.message is ""> > > > <cfset request.comerror = cfcatch.detail> > > > </cfif> > > > <cfset caller.error = 10> > > > </cfcatch> > > > </cftry> > > > > > > <!--- Delete the old database and rename the temporary > database ---> > > > <cfif FileExists(attributes.tempdatabase)> > > > <cffile action="DELETE" file="#attributes.database#"> <cffile > > > action="RENAME" source="#attributes.tempdatabase#" > > > destination="#attributes.database#"> > > > </cfif> > > > > > > </cfif> > > > > > > ----- Original Message ----- > > > From: "Robertson-Ravo, Neil (REC)" > <[EMAIL PROTECTED]> > > > To: <[EMAIL PROTECTED]> > > > Sent: Wednesday, October 02, 2002 1:56 PM > > > Subject: RE: [ cf-dev ] Re: cfCompact > > > > > > > > > > Oh, I gather this is Access yeah? :-) > > > > > > > > -----Original Message----- > > > > From: Giles Roadnight [mailto:[EMAIL PROTECTED]] > > > > Sent: 02 October 2002 13:55 > > > > To: [EMAIL PROTECTED] > > > > Subject: [ cf-dev ] Re: cfCompact > > > > > > > > > > > > Here is the code: > > > > > > > > <CF_COMPACT > > > > DATABASE="#request.dataroot##attributes.database#" > > > > > > > > > BACKUPDATABASE="#request.dataroot##request.destinationFilename#"> > > > > > > > > I have attached the template too. > > > > > > > > > > > > -- > > > > ** Archive: > > > > http://www.mail-archive.com/dev%40lists.cfdeveloper.co.uk/ > > > > > > > > To unsubscribe, e-mail: [EMAIL PROTECTED] > > > > For additional commands, e-mail: > [EMAIL PROTECTED] > > > > For human help, e-mail: [EMAIL PROTECTED] > > > > > > > > > > > > > -- > > > ** Archive: > > > http://www.mail-archive.com/dev%40lists.cfdeveloper.co.uk/ > > > > > > To unsubscribe, e-mail: [EMAIL PROTECTED] > > > For additional commands, e-mail: [EMAIL PROTECTED] > > > For human help, e-mail: [EMAIL PROTECTED] > > > > > > -- > > > ** Archive: > > > http://www.mail-archive.com/dev%40lists.cfdeveloper.co.uk/ > > > > > > To unsubscribe, e-mail: [EMAIL PROTECTED] > > > For additional commands, e-mail: [EMAIL PROTECTED] > > > For human help, e-mail: [EMAIL PROTECTED] > > > > > > > > > > > > > > > -- > > ** Archive: > http://www.mail-archive.com/dev%> 40lists.cfdeveloper.co.uk/ > > > > > To unsubscribe, e-mail: > [EMAIL PROTECTED] > > For additional commands, e-mail: > [EMAIL PROTECTED] For > > human help, e-mail: [EMAIL PROTECTED] > > > > > -- > ** Archive: http://www.mail-archive.com/dev%40lists.cfdeveloper.co.uk/ > > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: > [EMAIL PROTECTED] For human help, e-mail: > [EMAIL PROTECTED] > > -- ** Archive: http://www.mail-archive.com/dev%40lists.cfdeveloper.co.uk/ To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] For human help, e-mail: [EMAIL PROTECTED]
