Gustav Brock
gustav at cactus.dk
Tue Jun 1 11:40:16 CDT 2004
Hi Ron > My code does look like your example. .. Well, yes, but Binary and Output is not the same. /gustav > I have the following: > intFileDesc = FreeFile 'Get a free file descriptor > Open strOutfile For Binary As #intFileDesc 'Open the output file for writing > While Not rst.EOF 'Loop until end of recordset > Print #intFileDesc, strOutput 'Print output string to file > And still no output! I don't think the 'Binary' would be an issue. > Regards, > Ron > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock > Sent: Tuesday, June 01, 2004 12:13 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Trouble with Seth's I/O in lieu of transfertext: > Hi Ron > If your code looks something like this: > intFreeFile = FreeFile > Open strPrintFile For Output As #intFreeFile > Print #intFreeFile, strPrint > it should work. > /gustav >> To all who use Seth's code for 'File I/O in VB', >> I really like the control that Seth's code provides, however, I'm >> having trouble writing to the output file. I have verified the output >> string being built from the recordset but the following line of code >> fails (drops out of the module without executing remaining code and >> without an error being raised). >> 'Print #intFileDesc, stroutput 'Print output string to file' >> Am I missing something here? Any ideas? >> TIA as always, >> Ron Moore