commit filename to memory for use with all forms

04-15-2003, 12:35 PM

ljmb34

Newcomer

Join Date: Apr 2003

Posts: 18

commit filename to memory for use with all forms

Q: I have a Form1 which opens FileName "Example.xls" an Excel file to input. I minimize Form1 and open Form2, however FileName "Example.xls" only resides on Form1. How do I automatically associate Form2 with FileName on Form1 which is the already openend Excel File for input. My thoughts are with the open common dialog box. As all i am trying to perform is: On Form1 the Open dialog Box container is set to "Example.xls" Ie: dlgFileops.Filename = "Example.xls", so on Form2 the dlgFileops.Filename = "Example.xls" automatically without input from user.

Any input on the subject would be appreciated.

04-15-2003, 12:37 PM

Iceplug

MetaCenturion

Retired Moderator
* Guru *

Join Date: Aug 2001

Location: California, USA

Posts: 16,583

Declare the filename Public in a regular module (.BAS)
or reference it from your form like this:
Form1.CmDlg.Filename

__________________

Iceplug, USN
Quadrill 1 Quadrill 2 (full) Quadrill 3 JumpCross .NET Website is ALIVE! - DL Platform Tour for VB.NET! Posting Guidelines Hint: Specify your location in your user cp profile if you want compassion!

04-15-2003, 12:39 PM

VBJoe

Village VB Idiot

* Expert *

Join Date: Jan 2003

Location: Idaho

Posts: 1,850

As long as you haven't Unloaded Form1, you can call it like this from Form2:

Code:

Private Sub Form_Load()
    Dim Form2FileName As String
    Form2FileName = Form1.CmDlg.FileName
    'Do whatever here with the file
End Sub

04-15-2003, 12:46 PM

VBDude

Centurion

Join Date: Jun 2001

Location: New York

Posts: 114

or if you want to be able to access the file name from any form (whether it's loaded or not), try something like this:

'in form1:
open app.path &"\filename.tmp" for output as #1
print #1, FILENAME 'this would be the "Example.xls"
close #1

'then to get the file name:
dim filename as string
open app.path & "\filename.tmp" for input as #1
line input #1, filename 'this variable now has the name of the file you want
close #1

__________________
nothing's really wrong... it's just not quite right

04-15-2003, 01:00 PM

ljmb34

Newcomer

Join Date: Apr 2003

Posts: 18

I was head there but VBJoe had what I was looking for

Quote:
Originally Posted by VBDude
or if you want to be able to access the file name from any form (whether it's loaded or not), try something like this:

'in form1:
open app.path &"\filename.tmp" for output as #1
print #1, FILENAME 'this would be the "Example.xls"
close #1

'then to get the file name:
dim filename as string
open app.path & "\filename.tmp" for input as #1
line input #1, filename 'this variable now has the name of the file you want
close #1

Your above example was going to be my last hope so to speak, however I was concerned on keeping the whole program a simple container with the only inputs directed on Excel.

VBJoe had what I was looking for. A simple call routine. It works great!

Thanks go to all who help out newbies...

I was also looking at class modules vs standard modules but I havn't got a clue on how to figure them out. My thought was to write the filename to memory and not to a physical file. However, I knew it was there, what I could not figure out was how to access it.

Thanks for your ideas...