Convertir DBF en XSL avec Harbour

famillejo Messages postés 5 Statut Membre -  
bernard.mouille Messages postés 14 Statut Membre -
Bonjour,

Je cherche des infos pour transformer des fichiers dbf en xls en pror sous harbour, sous Clipper j'utilisais CLPWKS mais cela ne semble pas compatible avec Harbour.

Je dois dire que j'ai un peu de mal à trouver des library pour harbour.

Merci pour quelques tuyaux

Thierry

A voir également:

6 réponses

bernard.mouille Messages postés 14 Statut Membre 5
 
Bonjour Thierry,

Je ne sais pas comment marche CLPWKS, si tu peux me donner un exemple des fonctions utilisées afin de voir si une librairie Harbour la remplace.

Si Excel est installé sur ta machine, je t'ai mis un petit exemple dans la rubrique
Hb WIN_OLECREATEOBJECT( "Excel.Application" )
bernard.mouille.free.fr/0_Harbour/ZD00000021( les liens ne fonctionnent pas sur ce forum.

A+

Bernard
0
famillejo Messages postés 5 Statut Membre
 
Bonjour Bernard,
J'ai déjà regardé ce code, il est sur ton site je crois, mais ce n'est pas possible car mes clients n'ont pas forcement Excel, plutôt open office ou même pas de tableur. Mes programmes doivent creer des fichiers excel pour être envoyés par mail à un tiers.

sinon voici quelques lignes

function cre_xls(xfich)
local wnb:=fcount(),wchaine:="",impZ:={},impE:={},i

*
* je suis dans mon dbf et je prepare un tableau avec le nom des zones
*
go top
for i=1 to wnb
xx=field(i)
if type(xx)<>"U"
wchaine+=',"'+field(i)+'"'
endif
NEXT i
wchaine=substr(wchaine,2)
impz:= &("{"+wchaine+"}")

*
* je clone le tableau des zones pour en faire un tableau de titre de colonne
*
impE:=aclone(impZ)
*
* je bricole un peu la date because library usa
*
set date usa
*
* je lance la fonction de CLPWKS (E4 est le format de fichier Excel, ce doit être un *très vieux format
*
lexport(rtmp+"TEMP.XLS",impz,impE,"ALL","E4")
set date french
*
* le fichier TEMP.XLS est crée dans mon rep temporaire
*
LF_fcopy(rtmp+"TEMP.XLS",xfich)
mes_fin("Cr'ation du fichier : "+chr(13)+chr(10)+xfich)
return nil
0
bernard.mouille Messages postés 14 Statut Membre 5
 
Re-bonjour Thierry,

La solution actuelle est d'acheter la librairie LibXl qui coûte 199 Dollards US.
J'ai déjà fait des bouts de programmes avec cette librairie en version de démonstration qui te rajoute 2 lignes d'infos de démonstration en tête du fichier créé.

J'avais déjà suivi les discussions à propos de la création de fichiers xls, mais il n'y a pas d'autres solutions.

En dBasePlus, j'ai aussi des programmes d'automation d'Open Office Calc, mais tes clients n'ont pas forcément de tableur.

Dis-moi si tu comptes essayer, puis acheter LibXl afin de te mettre quelques exemples ( on utilise le language C compilé avec Harbour )

Ast-tu les sources de ta librairie CLPWKS ?

A+

Bernard
0
bernard.mouille Messages postés 14 Statut Membre 5
 
Pour trouver les librairies Harbour, voir le site de Giovanni Di Maria :
www.elektrosoft.it/tutorials/Harbour-Reference-Guide/harbour-complete-functions-list.htm
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
famillejo Messages postés 5 Statut Membre
 
Ok pour les library, j'ai vu un truc sur hbmxml qui peut faire des fichier xml lisible par excel et openoffice. en cherchant sur internet j'ai vu des sources en fox pro là dessus, je vais regarder cette piste.

par contre je n'ai pas les sources de CLPWKS

Thierry
0
bernard.mouille Messages postés 14 Statut Membre 5
 
Ouf,

J'ai retrouvé des sources de CLIPWKS.

J'ai un problème, il y a une fonction en ASM et je ne sais pas comment l'utiliser avec Harbour.

Je te zippe le dossier et te l'envoie par mail.

@+

Bernard
0