www.atoutfox.org

ms chart

renrobi — Wed, 01 Jul 2009 01:56:37 GMT

Vous trouverez ci-joint un fichier zip contenant tout de la fabrication a l'impression du graph vous n'avez qu'� l'ajuster selon vos besoins, ce qui devrait �tre assez facile en principle vous n'avez changer le fichier lecture.dbf dans le dataenvironment de la forme graph

Outlook.h

eddymaue — Fri, 19 Jun 2009 01:56:37 GMT

Bon ben j'ai trouv� �a par hasard sur mon disque c:

Calcul et verification d'un code EAN

Gregory Adam — Sat, 06 Jun 2009 01:56:37 GMT

http://en.wikipedia.org/wiki/European_Article_Number

Calcul et verification de codes EAN - 8, 13, 18, ...
Pas de verification de la longueur de la clef

CMD avec ShellExecute

eddymaue — Wed, 03 Jun 2009 01:56:37 GMT

En fin je viens lire un bel article sur la CMD et toutes les commandes pass�es � la CMD, doivent l'etre ainsi. En tout cas ca fonctionne bien si on a qu'une ou deux commandes � passer.
Dans le cas contraire ou plusieurs commandes sont n�cessaires, l'emploit de d'un fichier avec extension BAT (Windows 98 et moins obligatoire) et CMD pour Win2k et plus.
L'extension CMD est fortement recommand�. Si jamais par erreur vous tentiez d'ex�cuter un fichier.cmd sur Win98, ca ne fonctionnera pas.Pourquoi ? simplement qu'il y a de nouvelles
commandes depuis la Win2k.

Et avec Api ShellExecute c'est nikel

m_ShellExecute("CMD","/c net start MonService")
m_ShellExecute("CMD","/c net stop MonService")

* L'ex�cution de cette commande place la listes des services d�marr�s de windows dans un fichier
m_ShellExecute("CMD","/c net start >c:\ListService.txt")

l'option /c est importante pour que CMD.EXE se ferme automatiquement si non on a des chances d'accumuler des processus CMD.EXE et finir par avoir un plantage du � un manque de m�moire

un autre point int�ressant, on peut passer plusieurs commandes, il s'agit de les s�par�es par &&. Avec vfp il faut utiliser chr(38)+chr(38) si non on va avoir des commentaires non d�sir�.

* En gros je pourrais �crire

m_ShellExecute("CMD" ;
, [/s/c pause ];
+Chr(38)+Chr(38)+[cd "C:\Program Files\Microsoft Visual FoxPro 9"];
+Chr(38)+Chr(38)+[dir *.* >c:\mvpdir.txt] ;
+Chr(38)+Chr(38)+[pause];
+Chr(38)+Chr(38)+[cd "c:\"])

Et que font c'est commanedes
une pause
cd "C:\Program Files\Microsoft Visual FoxPro 9"
place le Dir *.* dans c:\mvpdir.txt
pause
cd c:\

Les memes commandes dans un fichier.cmd donnerait
Set Confirm Off
Set Safety Off
TEXT TO cmdTxt TEXTMERGE NOSHOW
PAUSE
cd "C:\Program Files\Microsoft Visual FoxPro 9"
dir *.* >c:\mvpdir2.txt
PAUSE
cd c:\
EndText
StrToFile(cmdTxt,"c:\fichier.CMD")

* Encore une fois l'emploit des ("") n'est utile que s'il y a des espaces dans la commande � passer
* et n�cessairement passer /s avec la commande du Shell

m_ShellExecute("c:\fichier.cmd","") && CMD a disparut, le shell par l'extension sait ce que sait
m_ShellExecute("NotePad.exe","c:\mvpdir2.txt",1)

Des options utiles :
/s autorise le double quotes dans les commande. Utile s'il
y a des espaces dans un chemin
cd "C:\Program Files\Microsoft Visual FoxPro 9"
/c force la femeture de la tache apr�s ex�cution des commandes
/k maintient la t�che ouverte apr�s ex�cution des commandes
il faut passer la commande Exit pour fermer la tache
si non avec le parametre SW_HIDE dans le ShellExecute
va accumuler les CMDs comme tache de fond
dans le TaskManager

Des liens
http://www.ss64.com/nt/cmd.html
http://www.zebulon.fr/dossiers/63-invite-de-commandes-cmd.html

voil� c'est tout

Procedure m_ShellExecute
Lparameters lcFILE,lcChaine,lnSW

lnSW = iif(Vartype(lnSW)=="N",lnSW,0)

* lnSW = 0 --> sw_hide
* lnSW = 1 --> sw_normal

Declare Integer ShellExecute In shell32.Dll ;
Integer hndWin, ;
STRING cAction, ;
STRING cFileName, ;
STRING cParams, ;
STRING cDir, ;
INTEGER nShowWin
=ShellExecute(0,"Open",lcFILE,lcChaine,"",lnSW)
Endproc

a+ Eddy

P.S. pis en plus on a pas de fenetre qui flash

cdo.h

Gregory Adam — Tue, 02 Jun 2009 01:56:37 GMT

Cdo.h

PREMIERS PAS AVEC MAPIX DEPUIS VFP

aumeric — Sun, 31 May 2009 01:56:37 GMT

Bonjour � toutes et � tous
A la demande de lemrabot, voici un projet qui vous permettra de d�marrer avec l'ocx de map info
Lemrabot, je ne l'ai pas document� car je suis tr�s pris par roland garros, mais lors de ma prochaine mission en mauritanie, nous en reparlerons plus longuement, et comme vous �tes un bon d�veloppeur, vous allez vite vous y retrouver.

Bonne journ�e � toutes et � tous
Cordialement
Aumeric

RegexPatternBuilder class en C#

Gregory Adam — Wed, 27 May 2009 01:56:37 GMT

La meme chose que http://www.atoutfox.com/articles.asp?ACTION=FCONSULTER&ID=0000000695

Il faut aussi le Topological Sort en C# - http://www.atoutfox.com/articles.asp?ACTION=FCONSULTER&ID=0000000526

Il y a un exemple dans le code source

Enlever // de la ligne suivante + F5 (contient un static void Main()) qui montre l'exemple

// #define LOGIC_TEST // comment for production, uncomment for test sample

//-----------------------------------------------------------------------

MAJ 2009/05/28
Accepte des definitions d'une ligne : exemple dans la section de code

//-----------------------------------------------------------------------

RegExPatternHelper class

Gregory Adam — Sat, 23 May 2009 01:56:37 GMT

RegexPatternHelper

Le but de cette classe est de faciliter la cr�ation de Patterns
Il est assez difficile d’�crire un pattern qui accepte une date. Si on ajoute (1) qu’on accepte les ann�es en 2 et en 4 positions, (2) que le s�parateur peut �tre / ou -, (3) qu’on va valider au maximum les dates, cela devient assez difficile
Mais si on pouvait d�finir des pi�ces qu’on va r�utiliser, cela devient un peu plus facile
Il faut aussi t�l�charger le Topological Sort :
http://www.atoutfox.com/articles.asp?ACTION=FCONSULTER&ID=0000000645

Il faut mettre RegexPatternHelper.prg dans le repertoire 'Prog' et l'ajouter a Set Proc

Voir
(1) L’exemple
(2) La docu dans RegexPatternHelper.prg en haut

Comment est-ce que ca marche ?

>> Regarder la definition dans le code. Html ne fait pas un bon travail si je l'inclus ici
(1) On commence d’abord par mettre les lignes de la d�finition dans une collection. La clef sera la partie gauche de la ligne (eg ddmmyyyy_slash ) et le contenu sera la partie droite (eg \b(\/\d{4})\b )

(2) Puis on parcourt toutes les d�finitions pour en extraire les d�finitions d�pendantes (eg ddmm_slash d�pend de ddmm_29_slash, ddmm_30_slash et de ddmm_31_slash
(3) Puis on fait un tri (topological sort) qui va retourner un ordre d’�valuation. Eg, il faut �valuer ddmm_29_slash, ddmm_30_slash et ddmm_31_slash avant d’�valuer ddmm_slash.
(4) Ayant obtenu un ordre d’�valuation on va traiter la collection dans cet ordre. Le traitement est simple, juste remplacer la d�finition. L’astuce est de le faire dans le bon ordre.

Ps : il est possible de mettre les d�finitions courantes dans un champ memo d’une table incluse dans le projet

RegexPattern pour une date europeenne

Gregory Adam — Fri, 22 May 2009 01:56:37 GMT

Pattern pour reconnaitre des dates europeennes
format: dd/mm/yyyy ou dd-mm-yyyy

Ne prend pas de dates invalides, eg 31/11/2008
Quant au mois de fevrier, prend max 29/02

voir - un peu moins artisanal
http://www.atoutfox.com/articles.asp?ACTION=FCONSULTER&ID=0000000695

Comment montrer un PDF dans une forme Foxpro

Mike Gagnon — Tue, 19 May 2009 01:56:37 GMT

Ce code inclus la v�rification de la pr�sence de l'activex Adobe Acrobat Reader avant de rouler la forme.

GetPath

eddymaue — Sun, 17 May 2009 01:56:37 GMT

Salut � tous,

Au fil des annn�es j'ai souvent et je dirais trop souvent essay� des exemples dont les liasons
entre fichiers �taient erratiques. J'ai compris le pourquoi quand Gregory m'a r�pondu
( voir http://www.atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000690)

Si je mets mes forms dans un repertoire X
Si je mets mes prog de ce projet dans un repertoire Y
Si je mets mes prog communs a tous les projets dans un repertoire Z
Comment - le load du form saura-t-il ou se trouve gridcompanion.prg ?

Bien je vais r�pondre � cette question. L� ou tu l'as mis Greg ;o)

Ce qui m'am�ne aussi � r�aliser que Sys(16) est mal compris et que son utilisation n'est pas ad�quatement bien utils�.

Sys(16) retourne trois types d'indications diff�rents. Enfin c'est du texte qu'il retourne.

1er cas -- dans un fichier.prg on aura
e:\owner\eddy\visual foxpro projects\essaisgetpath\program1.fxp

en gros l'emplacement du fichier compiler.

2ieme -- dans une procedure d'un programme on aura
procedure testsys16 e:\owner\eddy\visual foxpro projects\essaisgetpath\program1.fxp

on y retrouve le mot procedure + le nom de la procedure et enfin le fichier compil�
avec son emplacement sur le disque

3ieme -- dans une classe comme un formulaire ou un objet aura ce qui suis
procedure sys16obj.load e:\owner\eddy\visual foxpro projects\essaisgetpath\program1.fxp

dans la procedure d'un objet s'ajoute le nom de l'objet + le nom de la procedure ainsi que le
nom etl'emplacement du fichier contenant l'objet ex�cut�

Dans ces trois cas on a un point commun et c'est le double points ':' qui s�pare le chemin du
disque local

Faut donc simplement �liminer ce qu'il y a avant le disque local pour trouver ce que l'on veut.
Soit le chemin du fichier ex�cut� sur le disque de notre ordi.

Quand je charge un exemple que soit sur Atoutfox ou ailleurs, je ne commence pas � modifier l'emplacement
de ces fichiers. Je d�zippe le tout et le place dans un dossier sp�cial. Enfin j'isole le tout pour qu'il n'y
ait pas d'interraction avec mes fichiers de travail.

Donc encore un fois si je reprends l'exemple de Greg ci-haut cit�, je vais dans le load du formulaire et
j'ajoute les lignes suivantes ;

* Auteur Eddy Maue ;o)
Local lcGetPath && le chemin de ce fichier
lcGetPath = JustPath(Substr(Sys(16),At(":",Sys(16))-1))

Set Procedure To (m.lcGetPath+'\gridcompanion.prg') ADDITIVE

vous l'aurez compris j'obtiens ainsi le chemin ou j'ai plac� le formulaire dans lcGetPath et ne reste plus qu'� lier le
fichier de procedure gridcompanion.prg pour que l'exemple soit enti�rement fonctionnel

la valeur, chez moi, de lcGetPath est

e:\owner\eddy\visual foxpro projects\exemple\gregory adam\mouseenterforgrid

comme tous les fichiers de l'exemple sont dans ce r�pertoire il ne reste qu'� ex�cut�er la commande SET PROCEDURE TO

Le code livr� ci-bas ins�rera GetPath dans intellisence et tout ce qui reste � faire c'est de tapper Getpath pour avoir

* Auteur Eddy Maue ;o)
Local lcGetPath && le chemin de ce fichier
lcGetPath = JustPath(Substr(Sys(16),At(":",Sys(16))-1))

Voil� c'est tout simple

Pour finir un p'tit rafra�chissement sur l� resolution dynamique de recherches de fichiers
dans les r�pertoires.

set default to c:\MesProjetsVFP\RacineDeMonProjet

c'est ici qu'on fixe l'origine de tout ce qui suit. Enfin presque
c'est le point de r�f�rence de l'�x�cutable ou de recherche
des fichiers de Vfp

on y placera nos sous-r�pertoires utiles � notre projet

Tout au long du d�veloppement de l'application si on veut
�viter d'�crire le sous-r�pertoire ou sont nos fichiers, on utilise
le SET PATH TO

set path to data;forms;progs;....
permet de r�soudre pour Vfp la recherche de fichiers dans les sous r�pertoires du projet
cibl�s par set default to.

le Set Path TO permet l'emploit de .\ et ..\ pour pouvoir ce d�placer � d'autres niveaux de
l'arbre du disque cibl� par SET DEFAULT TO

on peut des lors �crire
set Path to ..\commun\class additive

se qui permetera la recherche de fichiers sur des r�pertoires de
de niveaux inf�rieurs � notre projet sans qu'on est besoin de constamement
�crire le chemin complet. Dans ce cas ci le dossier commun est sur
le meme niveau que le r�pertoire du projet

travailler sur le meme r�pertoire cibli� par SET DEFA TO
.\Data\Matable

au final la structure d'un projet peut ressembler � ceci

c:\MesProjetsVFP
\Commun
\headers
\class
\progs
\RacineDeMonProjet
\Data
\Forms
\progs
\reports
\headers
\class
\labels
\docs
\autres

Seul l'inclusion des fichiers d'ent�tes (*.h) ne sont pas soumis � ces r�gles.
Pourquoi ?. Parce que les fichiers d'ent�tes sont pr�compil�s et donc SET DEFAULTO
et SET PATH ne sont pas utiles il faut donc localiser et situer dans l'arbre
l'emplacement du fichier.h del� l'importance de comprendre la
m�canique de .\ et ..\

Ce n'est pas important de savoir ou sont localis� nos fichiers si on se rapporte �
l� racine du disque. L'important c'est de savoir � quel niveau en dessous ou au dessus
sont localis�s les fichiers d'ent�tes que nous voulons inclure � un projet ou � un fichier.

Partons d'une racine connue

e:\TousMesProjetsVFP\

Exemple :
.\commun\class
.\commun\headers
.\MonProjet
.\Data
.\prgs
.\headers
....

ce qui ce traduit par

e:\TousMesProjetsVFP\commun\class
e:\TousMesProjetsVFP\commun\headers
e:\TousMesProjetsVFP\MonProjet
e:\TousMesProjetsVFP\MonProjet\Data
e:\TousMesProjetsVFP\MonProjet\prgs
e:\TousMesProjetsVFP\MonProjet\headers
e:\TousMesProjetsVFP\MonProjet\ ....

C'est l� une des forces de Vfp, on a pas besoin de conna�tre la racine
d'un projet ou d'un fichier. On a seulement besoin de conna�tre son
emplacement relatif.

Dans un programme je pourrais avoir � inclure des fichiers d'ent�tes localis�s
aux emplacements suivants :
.\commun\headers\edition.h
.\commun\headers\treeview.h
.\MonProjet.h
.\headers\un.h
.\\headers\deux.h

La solution toute simple est de faire toute les liasions dans un seul fichier d'ent�te
soit celui � la racine du projet. C'est mon choix et le votre peut etre diff�rent.
Mais au final, nous aurons le m�me r�sultat.

Des lors le set default et le set path ne servent � rien ici.
tout ce passe � partir du r�pertoire h�te du fichier.h

L'exemple ici suppose que MonProjet.h est dans le r�pertoire h�te
du projet

*Fichier MonProjet.h

#include ..\commun\headers\edition.h
#include ..\commun\headers\treeview.h
#include .\headers\un.h
#include .\headers\deux.h

Pour atteindre Edition.h, l'emploit de ..\ permet de remonter d'un
niveau et reste qu'� situer Edition.h avec l'ajout des r�pertoires
commun\headers

Un autre exemple, plutot de placer MonProjet.h dans le
r�pertoire h�te du projet. Pla�ons le dans le r�pertoire Headers
du projet

.\MonProjet\headers\MonProjet.h

ce qui nous donne dans MonProjet.h

#include ..\..\commun\headers\edition.h
#include ..\..\commun\headers\treeview.h
#include un.h
#include deux.h

Dans votres prochain exemple que vous soumetterez vous n'aurez plus de problemes
si vous suivez c'est regles de bases.

Si je joins plusieux fichiers dans un exemple � proposer j'agis comme suivant :

je pr�sume que vous enregistrerez mon exemple dans un r�pertoire qui lui est propre
j'�vite d'affecter SET DEFAULT TO et SET PATH TO. Si je ne peux faire autrement,
je les sauve dans des variables et je restore � la fin de l'exemple.

Pour les ent�tes � inclure ca passe exactement comme d�crit plus haut.

Pour tout autres types de fichiers il faut savoir ou notre fichier principal est localis� sur
le disque.

Et c'est l� que GetPaht est utile

Define Class TestGetPaph As Form

Procedure Load

* Auteur Eddy Maue ;o)
Local lcGetPath && le chemin de ce fichier
lcGetPath = Justpath(Substr(Sys(16),At(":",Sys(16))-1))

Set Procedure To (m.lcGetPath+'\gridcompanion.prg') Additive

Use (m.lcGetPath+"\Matable") In 0
Do (m.lcGetPath+"\MonFichier.prg")

Endproc

EndDefine

Bon ca peut devenir r�barbatif de sur employ� GetPath si on a beaucoup de fichiers
( forms,progs,tables et autres )

Define Class TestGetPath As Form
p_cPath = ""
p_cDefault = ""

Procedure Load

With Thisform

.p_cPath = Set("Path")
.p_cDefault = Set("Default")

Endwith

* Auteur Eddy Maue ;o)
Local lcGetPath && le chemin de ce fichier
lcGetPath = Justpath(Substr(Sys(16),At(":",Sys(16))-1))

Set Default To (m.lcGetPath)
Set Path To Data;Class

#include .\MonFichier.h

* ici le code utile pour la suite de l'exemple

Endproc

Procedure Destroy

With This

Set Default To (.p_cDefault)
Set Path To (.p_cPath)

Endwith
Endproc

Enddefine

A+ Eddy Maue

Coloriser un objet asp.net a partir de couleur rvb.

Olivier Hamou — Tue, 12 May 2009 01:56:37 GMT

Quand on a besoin de coloriser des objets en asp.net par programmation.

Alors je livre l'astuce qui en foxpro est d'une simplicit�, mais j'ai du cherch� en .net

Pour asp.net on a deux moyens.

D�tecter 'MouseEnter' dans une cellule d'une grille

Gregory Adam — Mon, 11 May 2009 01:56:37 GMT

D�tecter ‘MouseEnter’ dans une cellule d’une grille
Permet d’appeler une m�thode ou une fonction quand la souris survole les lignes d’une colonne sp�cifi�e
Il suffit d’ajouter un objet au parent de la grille (voir fonction GridCompanion_Add() )
Apres, on peut sp�cifier la colonne + Expression de champ + m�thode/fonction a appeler quand la souris change de cellule dans la colonne en question.
L’expression de champ ne doit pas �tre �gale au ControlSource de la colonne, mais il n’y a rien qui l’emp�che.
Exemple de code – voir aussi l’exemple – vers la fin de grid1.init()
local CompanionObj

do case
case !GridCompanion_Add(GridObjectReference, @m.CompanionObj)
&& error
case !m.CompanionObj.ColumnMouseWatcher_Add( ;
ControlSourceOfColumnToWatch, ;
FieldExpression, ;
FormMethod ;
)
&& error

endcase

GridObjectReference: = r�f�rence de la grille, eg m.this ou thisform.Grid1
CompanionObj: la r�f�rence du compagnon est retourn�e et peut �tre utilis�e ensuite pour ajouter des colonnes a ‘surveiller’
ControlSourceOfColumnToWatch: le controlSource de la colonne � ‘surveiller’. Puisqu’il n’est pas toujours facile de passer le num�ro de colonne ou le nom de la colonne, le controlSource suffit.
FieldExpression: par exemple le controlSource de cette colonne, le controlSource d’un champ du RecordSource de la grille, ou toute autre expression (eg Table1.Montant / 2)
FormMethod: nom d’une m�thode du form, ou nom d’une fonction. Cette m�thode/fonction sera appel�e avec la FieldExpression correspondante ( eg eval(Table1.Montant / 2) )

Quand on lance l'exemple il faut regarder le contenu des textbox en haut quand on survole les boutons de commande avec la souris.
Une colonne surveill�e peut �tre supprim�e de la ‘surveillance’ : voir ColumnMouseWatcher_Remove(ControlSourceOfColumnToWatch)

Comment est-ce que cela marche ?
Une expression DynamicFontShadow est ajout�e � la colonne. Quand cette expression est �valu�e, la FieldExpression �valu�e est ajout�e � une collection (par colonne)
Les clauses dynamiques sont �valu�es de gauche � droite et de haut en bas.
Pour garder le contenu de la collection synchronis� avec ce qui est affich� dans la grille, il faut, a certains moments (�v�nements) supprimer le contenu de la collection et remplir la collection par �pres. Une fa�on de remplir le contenu de la collection est de forcer l’�valuation de la clause DynamicFontShadow. Ceci se fait en modifiant la hauteur de la grille (j’ajoute 1 a la hauteur, la prochaine fois -1, …)
Il y a assez de BindEvent()

Quelques outils autour du gestionnaire de projet

Jean � Grenoble — Tue, 28 Apr 2009 01:56:37 GMT

Lorsqu'on ouvre un projet on instancie (sans le savoir ?) une classe "projecthook". Cette classe peut �tre sous-class�e. On peut donc lui ajouter des propri�t�s et des m�thodes utilisables dans tous nos projets. Et cette sous-classe peut aussi �tre elle-m�me sous-class�e pour �tre personnalis�e avec chaque projet (du classique quoi !).

Je vous montre donc comment indiquer qu'un projet d�pend d'une autre classe que le projecthook de base et un exemple de ce qui peut se faire comme outils compl�mentaires : liste de toutes les forms du projet avec leur param�trage concernant l'environnement de donn�es et liste de toutes les librairies et classes du projet avec une indentation indiquant la hierarchie des classes.

Il suffit de d�zipper le fichier joint. Le fichier projecthook_lisezmoi.txt contient la documentation.

Je suis � votre disposition pour toutes explications suppl�mentaires.

J. MAURICE

traiter des fichiers csv avec des champs memo

Olivier Hamou — Fri, 24 Apr 2009 01:56:37 GMT

Microsoft nous apporte deux articles � ce sujet
j'ai voulu les diffuser sur ce site afin que le maximum de personnes
puissent trouver leur bonheur.

Comment faire pour ajouter des enregistrements � partir d'un fichier d�limit� avec des donn�es M�mo http://support.microsoft.com/kb/140294

Comment faire pour en lecture des donn�es de champ de note � partir des fichiers ASCII d�limit� http://support.microsoft.com/kb/115731

* DATE MODIF : 25.04.09 par olivier hamou
* J'ai modifi� le code afin que cette function
* puisse comprendre les types de donn�es autre que le caract�re
* variable pris en charge dans le cursor ou votre table :
*

DO CASE
CASE m.cVARTYPE $ "N-Y-B-F-I"
REPLACE &structure[i,1] WITH VAL(accum_text)
CASE m.cVARTYPE $ "C-M-Q-V-W"
REPLACE &structure[i,1] WITH alltr(accum_text)
CASE m.cVARTYPE $ "D"
REPLACE &structure[i,1] WITH ctod(accum_text)
CASE m.cVARTYPE $ "T"
REPLACE &structure[i,1] WITH ctot(accum_text)
ENDCASE

Calcul de la Cl� IBAN

JMT — Wed, 22 Apr 2009 01:56:37 GMT

Cette fonction permet � partir d'un Code Pays et d'un num�ro de compte de renvoyer la Cl� IBAN.

On envoie "FR" et un N° de Compte "132061100000000562...." complet donc pour les comptes fran�ais avec la Cl� RIB incluse et cela renvoie le Code Pays pass� en entr�e suivi de la Cl� de Contr�le (Exemple : FR76).

Cette fonction a �t� �crite en s'appuyant sur des Contributions AtoutFox, sur des r�ponses que j'ai eues dans le news "microsoft.public.fr.fox" et je remercie ceux qui y ont particip�s.

TESTUD Jean-Marc ( www.testud.fr )

Nom d'un fichier ou Nom d'un r�pertoire respectant la Casse (case)

Francis Faure — Tue, 21 Apr 2009 01:56:37 GMT

Bonjour

Suite � une question dans le newsgroup microsoft.fr.fox
je me permet une petite contrib pour r�pondre...

� vos tests

Cordialement
Francis FAURE

lire un fichier en http

Black Sabbath — Wed, 15 Apr 2009 01:56:37 GMT

juste mettre le contenu d'un fichier disponible sur internet dans une variable.
Pour cela l'API UrlDownloadToFile pourrait suffire mais elle va lire dans le cache en local. De plus, elle ne rend pas la main imm�diatement si il y a un probl�me...

Donc : ? ReadInternetFile("http://oMiro.free.fr/VersionDisponible.txt")

Attention � la casse
Attention � la redirection automatique de certains serveurs (Les erreurs 403 ou 404 par ex. ne sont analys�es que si le mot est pr�sent dans le titre).

Par d�faut, le buffer de lecture est de 2 kilo-octets. C'est modifiable directement en passant une seconde variable
? ReadInternetFile(("http://sedoparking.com/parking.php", 255*1024) par exemple.

=========== Oubli de la d�claraton de la dll de base... =============
=========== 1000 excuses pour ceux qui ont test� avant le 15 avril 13:40 =============

09-23 Sybase iAnyhere

Fran�ois 37 — Tue, 31 Mar 2009 01:56:37 GMT

Slides en Fran�ais de la pr�sentation de Kemal Haslaman aux Rencontres AtoutFox 2009

Versions de FoxPro : "FoxPro History" rappel de Ken LEVY aux conf�rences AtoutFox 2009

Francis Faure — Sun, 29 Mar 2009 01:56:37 GMT

FoxPro History
1984 - Fox Software releases FoxBase
1989 - FoxPro 1.0 for DOS
1991 - FoxPro 2.0 for DOS
1992 - Microsoft buys Fox Software for $173M
1993 - FoxPro 2.5 for Windows
1995 - Visual FoxPro 3 (TAZ)
1996 - Visual FoxPro 5 (ROADRUNNER)
1998 - Visual FoxPro 6 (THAOE)
2001 - Visual FoxPro 7 (SEDONA)
2003 - Visual FoxPro 8 (TOLEDO)
2004 - Visual FoxPro 9 (EUROPA)
2007 - Sedna and SP2 for VFP 9

PS :
liens en relation :

http://fox.wikis.com/wc.dll?Wiki~FoxProVersions

http://www.foxprohistory.org/

09-31 Virtualisations applicatives : Xenocode & GoGlobal - OpenID

Francis Faure — Sun, 29 Mar 2009 01:56:37 GMT

Slides de la pr�sentation aux Rencontres 2009

09-14 Etat des projets : Guineu - Francis FAURE