[AccessD] Trouble with Seth's I/O in lieu of transfertext:

Gustav,

My code does look like your example.  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

-- 
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com