Report snapshot was not created - not enough disk space

[oystercracker]

DoCmd.OutputTo acOutputReport,"rptPending","d:\Archive" produces a runtime error 2024: The report snapshot was not created because you don't have enough free disk space for temporary work files. The report is very small and available disk space is at least 10Gigs. TIA for any help.

 

[oystercracker]

OK. Dumb. I thought Access would use file name the report name as a file name. Sometimes I get tripped up by doing what Access does by itself! Just learn it, I guess.

 

[Jimbonz]

I guess you figured out the answer yourself - but what was it? I have the same error message and symptoms but can't figure out what you did!

 

[smedvid]

Anyone get an answer on this... I just hit it also! tia, Steve

Steve Medvid
"IT Consultant & Web Master"

http://www.saveourfarm.com

Chester County, PA Residents
Please Show Your Support...

 

[CosmoKramer]

Steve,

You didn't post an example of your code, but in oystercracker's code (s)he left out a comma for the outputformat argument. From what I remember the arguments are optional, but you have to include the commas.

Also,

http://support.microsoft.com/default.aspx?scid=kb;en-us;226526

Hoc nomen meum verum non est.

 

[smedvid]

Here is code... What is strange is that this has worked fine for months... and no changes have been made. any help is appreciated. Steve

...
'a hardcoded array list is not the prefernce however there was difficulty
'in iterating the report collection in the remote database
ReportList(0) = "FAS133 Bucket Price Sensitivity"
ReportList(1) = "FAS133 Bucket Price Sensitivity by Dur"
ReportList(2) = "FAS133 Bucket Price Sensitivity Report"
ReportList(3) = "FAS133_Bucket_Summary"
ReportList(4) = "FAS133_Bucket_Summary_Down"
ReportList(5) = "FAS133_Bucket_Summary_up"
'the following report does not work in the out-of-the-box version of ANT - Reason unknown 04/04/2002
'ReportList(6) = "FAS133_PriceSensitivity"
ReportList(7) = "Hedge_Allocation_Summary"
ReportList(8) = "Hedge_Correlation_Test"
ReportList(9) = "TrancheShockDetail_Price_Sensitivity"

ArchiveFldr = ConcatArchiveFolder(Period, HedgeEnd, Strata, OtherDescp)
'get a handle on the remote database object
ReportDBName = AppGlobal.GetApplicPath("LIVE_ANT&quot & "user\FAS133_Report.mdb"
Set appAccess = CreateObject("Access.Application.9&quot
appAccess.OpenCurrentDatabase ReportDBName

'iterate the array and output each report in the remote db to snapshot format and save into the archive directory

For r = 0 To UBound(ReportList)

If ReportList(r) <> &quot;&quot; Then

HERE IS WHERE CODE FAILS WITH ERROR 2024!

appAccess.DoCmd.OutputTo acOutputReport, ReportList(r), acFormatSNP, _
AppGlobal.GetApplicPath(&quot;ARCHIVE_ANT&quot & ArchiveFldr & &quot;\&quot; & ReportList(r) & &quot;.snp&quot;, False
End If

Next r

Steve Medvid
&quot;IT Consultant & Web Master&quot;

http://www.saveourfarm.com

Chester County, PA Residents
Please Show Your Support...