error 448 - database name is longer than 11 characters

[Jasper Recto]

I have a little program that opens a progress database and runs a report.

Dim Path As Object
Dim Report As Object
Path = "d:\ReportBuilder\VendorShipping.p"
Report = Shell("""V:\PROGRESS\bin\prowin32.exe"" """ & Path & """", 1)

When it tries to run I get this error:

Error
**Your database name is longer than 11 characters.(448)

Any ideas on what this might be?

Thanks,
Jasper

 

[jmonty]

I'm not sure but I think maybe it's getting confused with
all of the quote marks. Or maybe it's because you have the
fields defined as objects. The Shell function requires a
string. And try using a second string variable:

Dim Path As String
Dim strApp as String
Dim Report As Object

Path = "d:\ReportBuilder\VendorShipping.p"
strApp = "V:\PROGRESS\bin\prowin32.exe " & Path
Report = Shell(strApp, 1)

 

[Brendan Reynolds \(MVP\)]

Well, I don't know what 'Progress' is, but on the face of things it would
appear that it has a limitation of 11 characters in a database name, and
your database name is 14 characters long.

Or am I missing something?