Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Making PHDBase work under ExecScript()
Message
 
À
09/07/2007 20:44:00
Information générale
Forum:
Visual FoxPro
Catégorie:
Produits tierce partie
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Divers
Thread ID:
01238479
Message ID:
01239032
Vues:
22
You're doig this in a stored procedure?

I don't think the OleDb provider supports FLL library access. You need to use COM if you want to do this sort of thing.

+++ Rick ---

>>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.
+++ Rick ---

West Wind Technologies
Maui, Hawaii

west-wind.com/
West Wind Message Board
Rick's Web Log
Markdown Monster
---
Making waves on the Web

Where do you want to surf today?
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform