View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Larry[_14_] Larry[_14_] is offline
external usenet poster
 
Posts: 15
Default FIND CURRENT DIRECTORY

Find Current Directory:

On a CD I have 4 files. AUTORUN.INF, EXCEL1.VBS, SETUP.ICO, and
INSTALL.XLS. The code is shown below.
When I insert the CD, I want the CD to automatically open and then
automatically open INSTALL.XLS.
When I insert the CD, this error message appears: €˜Install.xls could not be
found.
Question: How do I show in the code that the Install.xls file is on the CD?
What code do I need to add to EXCEL1.VBS to show the CD Current Directory ?
See Below:

1. AUTORUN.INF
[AutoRun]
OPEN=EXCEL1.VBS
OPEN=SETUP.ICO


2. EXCEL1.VBS
Dim objXL
Set objXL = WScript.CreateObject("Excel.Application")
objXL.Visible = TRUE
objXL.Workbooks.open("Install.xls")


3. SETUP.ICO

4. INSTALL.XLS

--
Larry