Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Making PHDBase work under ExecScript()
Message
From
09/07/2007 20:44:00
 
General information
Forum:
Visual FoxPro
Category:
Third party products
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01238479
Message ID:
01238758
Views:
26
>Most likely the FLL is not being found or you don't have permissions to read it... If you're using COM interop you will be running in the context of the IIS worker process and your paths and locations for files etc. will be all out of whack.
>
>You're probably missing the error message because of the Execscript wrapping.

I have adjusted the design to use a stored procedure, as recommended, and only issue one ExecuteNonQuery() command.

Basically, the main lines of the method are like this:
                ' Execute the commands
                loCommand.CommandType = CommandType.StoredProcedure
                loCommand.CommandText = "ExecScript"
                loCommand.Parameters.Add("myScript", OleDbType.Char).Value = loStringBuilderHeaderList.ToString
                loCommand.ExecuteNonQuery()
I still have the same result. There is a complaint on the PHD() line. Here is the exact message followed by the list of commands:
File 'phd.prg' does not exist.

EXECSCRIPT("SET SAFETY OFF")
EXECSCRIPT("SET EXCLUSIVE OFF")
EXECSCRIPT("CLOSE ALL")
EXECSCRIPT("USE d:\www\foxpro\Thread IN 0")
EXECSCRIPT("SELECT Thread")
EXECSCRIPT("SET LIBRARY TO D:\WWW\PHDBASE ADDITIVE")
EXECSCRIPT("PHD('MSGLEVEL NONE')")
EXECSCRIPT("PHD('IXAUTO OFF')")
EXECSCRIPT("USE d:\www\foxpro\Thread IN 0")
EXECSCRIPT("SELECT Thread")
EXECSCRIPT("SEEK 1238754 ORDER TAG Numero")
EXECSCRIPT("SCATTER MEMVAR MEMO")
EXECSCRIPT("USE (d:\www\foxpro\THR2007.DBF) IN 0")
EXECSCRIPT("SELECT(THR2007)")
EXECSCRIPT("APPEND BLANK")
EXECSCRIPT("GATHER MEMVAR MEMO")
EXECSCRIPT("PHD('IXADD')")
EXECSCRIPT("USE IN (THR2007)")
The path to PHDBase is specified. But, the error comes from the next line.
Michel Fournier
Level Extreme Inc.
Designer, architect, owner of the Level Extreme Platform
Subscribe to the site at https://www.levelextreme.com/Home/DataEntry?Activator=55&NoStore=303
Subscription benefits https://www.levelextreme.com/Home/ViewPage?Activator=7&ID=52
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform