[AccessD] Dialog Box for Creating .txt tables

...we work in different worlds ...I can't imagine an environment where 
anyone but me can get to the code ...I'd be serving hard time for mass 
maiming, I would.

William

--------------------------------------------------
From: "Max Wanadoo" <max.wanadoo at gmail.com>
Sent: Wednesday, March 18, 2009 12:58 PM
To: "Access Developers discussion and problem solving" 
<accessd at databaseadvisors.com>
Subject: Re: [AccessD] Dialog Box for Creating .txt tables

> I don't use the RT William, just a mdb or mde.
> Worth remembering though
> Thanks
> Max
>
>
> On 3/18/09, William Hindman <wdhindman at dejpolsystems.com> wrote:
>>
>> Max
>>
>> ...afaik the FSO doesn't work in a runtime environment ...if you've got 
>> it
>> working in an A2k3 runtime I'd love to hear how.
>>
>> William
>>
>> --------------------------------------------------
>> From: "Max Wanadoo" <max.wanadoo at gmail.com>
>> Sent: Tuesday, March 17, 2009 8:19 PM
>> To: "Access Developers discussion and problem solving"
>> <accessd at databaseadvisors.com>
>> Subject: Re: [AccessD] Dialog Box for Creating .txt tables
>>
>>
>> > You can also use the FileSystem objects to do this. Just set a 
>> > Reference
>> > to,
>> > oh dear,what was it now...oh yes, I think it was MS Office 200x.
>> >
>> > Works better then this (oldish) example.
>> >
>> > Max
>> > ps. Getting late now and it is Paddy's day so the ref may be worng!
>> >
>> > On Tue, Mar 17, 2009 at 10:02 PM, Rocky Smolin at Beach Access Software 
>> > <
>> > rockysmolin at bchacc.com> wrote:
>> >
>> >> I was just doing this Bud.  I use the code from the Access Developer's
>> >> Handbook - just what you want:
>> >>
>> >>        lngFlags = adhOFN_HIDEREADONLY Or _
>> >>         adhOFN_HIDEREADONLY Or adhOFN_NOCHANGEDIR
>> >>
>> >>        varFileName = adhCommonFileOpenSave( _
>> >>            OpenFile:=False, _
>> >>            Filter:=strFilter, _
>> >>            flags:=lngFlags, _
>> >>            DialogTitle:="Enter File Name and Location for Mail List 
>> >> File
>> >> Export")
>> >>
>> >>            varFileName = adhTrimNull(varFileName)
>> >>
>> >>    intReply = MsgBox("Ready To Export Mailing List " & txtMailingList 
>> >> _
>> >>        & " to " & varFileName & ". OK to continue", vbYesNo)
>> >>    If intReply <> vbYes Then
>> >>        MsgBox "Export Aborted.", vbExclamation
>> >>        Exit Sub
>> >>    Else
>> >>        'DoCmd.TransferSpreadsheet acExportDelim, ,
>> >> "qryExportMailingList",
>> >> varFileName, True
>> >>        DoCmd.TransferSpreadsheet acExportDelim, 
>> >> acSpreadsheetTypeExcel9,
>> >> "qryExportMailingList", varFileName, True
>> >>
>> >>        MsgBox "Mail List Exported.", vbExclamation
>> >>    End If
>> >>
>> >>
>> >> Of course, my transfer is failing but the file name ends up in the var
>> >> just
>> >> fine.
>> >>
>> >> Rocky Smolin
>> >> Beach Access Software
>> >> 858-259-4334
>> >> www.e-z-mrp.com
>> >> www.bchacc.com
>> >>
>> >>
>> >>
>> >> -----Original Message-----
>> >> From: accessd-bounces at databaseadvisors.com
>> >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bud Goss
>> >> Sent: Tuesday, March 17, 2009 2:45 PM
>> >> To: Access Group
>> >> Subject: [AccessD] Dialog Box for Creating .txt tables
>> >>
>> >> I have an Access application that creates a text (.txt) table using
>> >> DoCmd.TransferText.
>> >>
>> >> In this application, I would like to display a windows dialog box
>> showing
>> >> “Save in;” and “File name:” that would allow the user to navigate to 
>> >> the
>> >> directory where the table would be located and designate file name to 
>> >> be
>> >> used.
>> >> (Similar to the dialog box that you see when you do a file save as in
>> >> Microsoft word etc.)
>> >>
>> >> Is it possible to do this in Access?
>> >>
>> >> If so, would some one tell me where I can find information and 
>> >> examples.
>> >> --
>> >> AccessD mailing list
>> >> AccessD at databaseadvisors.com
>> >> http://databaseadvisors.com/mailman/listinfo/accessd
>> >> Website: http://www.databaseadvisors.com
>> >>
>> >>
>> >> --
>> >> AccessD mailing list
>> >> AccessD at databaseadvisors.com
>> >> http://databaseadvisors.com/mailman/listinfo/accessd
>> >> Website: http://www.databaseadvisors.com
>> >>
>>
>> > --
>>
>> > AccessD mailing list
>> > AccessD at databaseadvisors.com
>> > http://databaseadvisors.com/mailman/listinfo/accessd
>> > Website: http://www.databaseadvisors.com
>> >
>>
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>