🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: adobe.photoshop.scripting
Article #2055

Re: Open dialog for text file

#2055
From: matthewrubino
Date: Fri, 18 Jun 2004 20:01
17 lines
1298 bytes
Okay,
Here's what I've got so far. A little test script to find out if I get a string output that I can use as a variable:
' Set the application to run the script in Photoshop
Dim appRef
Set appRef = CreateObject( "Photoshop.Application" )

' Open a dialog to prompt user to select a text file
  Dim strFile
  Dim objShell
  Set objShell = CreateObject("Shell.Application")
  Dim objBFF
  Set objBFF = objShell.BrowseForFolder(&H0,"Open File",&H4031,&H0011)
MsgBox("The file is: " & objBFF)

I'm using the Shell object to create the dialog box, but I continue to get the error "The system cannot find the specified file".

What am I doing wrong?
Technical Details
Message-ID: <3bb4a774.5@webx.la2eafNXanI>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news.glorb.com!npeer.de.kpn-eurorings.net!feed.news.schlund.de!schlund.de!newsfeed01.sul.t-online.de!t-online.de!webx
References: <3bb4a774.-1@webx.la2eafNXanI>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f5839,9f372316bd6d2809
X-Google-Attributes: gidf5839,public
From: matthewrubino@adobeforums.com
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!news.glorb.com!npeer.de.kpn-eurorings.net!feed.news.schlund.de!schlund.de!newsfeed01.sul.t-online.de!t-online.de!webx
Newsgroups: adobe.photoshop.scripting
Subject: Re: Open dialog for text file
Message-ID: <3bb4a774.5@webx.la2eafNXanI>
Date: Fri, 18 Jun 2004 13:01:54 -0700
References: <3bb4a774.-1@webx.la2eafNXanI>
Lines: 19
MIME-Version: 1.0
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 8bit