Programme DBASE et fichier .DBF

Bonsoir,

Quelle version de dBase utilise-tu ?

Bonjour,

Si tu utilise dBase en WINDOWS version 2.21 ou supérieure, utilise la commande CREATE TABLE (voir les explications dans l'aide)

Si tu utilise dBase en DOS, teste et modifie le programme ci-dessous :

* Bonjour.prg - Creation d'un fichier.DBF en dBase DOS.
* -----------------------------------------------------
*
* Creation du fichier provisoire de structure :
*
CREATE STRUCTURE EXTENDED BON000
*
USE BON000
APPE BLANK
*
* Creation des champs du fichier :
*
REPLACE FIELD_NAME WITH "CHAMP_1"
REPLACE FIELD_TYPE WITH "C"
REPLACE FIELD_LEN WITH 24
REPLACE FIELD_DEC WITH 0
*
APPE BLANK
REPLACE FIELD_NAME WITH "CHAMP_2"
REPLACE FIELD_TYPE WITH "N"
REPLACE FIELD_LEN WITH 11
REPLACE FIELD_DEC WITH 2
*
APPE BLANK
REPLACE FIELD_NAME WITH "CHAMP_3"
REPLACE FIELD_TYPE WITH "D"
REPLACE FIELD_LEN WITH 8
REPLACE FIELD_DEC WITH 0
*
USE
*
* Creation du fichier définitif :
*
CREATE BONJOUR FROM BON000
*
USE BONJOUR
*
* Remplissage de donnees :
*
APPE BLANK
REPLACE CHAMP_1 WITH "Valeur 1"
REPLACE CHAMP_2 WITH 128.54
REPLACE CHAMP_3 WITH DATE()
*
USE
*
RETURN

oui c sur dos car je suis avec dbase 3 plus pour la réponse sa marche avec clipper 5 mais pas avec dbase3 plus
merci

Bonsoir,

Avec dbase III+, il faut avoir un fichier pour un créer un autre.

Tu devrait essayer de trouver un dBase V pour DOS.

La source :

* Bonjour.prg - Creation d'un fichier.DBF en dBase III+ DOS.
* ----------------------------------------------------------
*
* Creation du fichier provisoire de structure :
*
* Le fichier BON000 est un fichier vide à 1 champ
* dont le nom ne risque pas d'être utilisé.
*
USE BON000
COPY TO BON001 STRUCTURE EXTENDED
USE
*
USE BON001
APPE BLANK
*
* Creation des champs du fichier :
*
REPLACE FIELD_NAME WITH "CHAMP_1"
REPLACE FIELD_TYPE WITH "C"
REPLACE FIELD_LEN WITH 24
REPLACE FIELD_DEC WITH 0
*
APPE BLANK
REPLACE FIELD_NAME WITH "CHAMP_2"
REPLACE FIELD_TYPE WITH "N"
REPLACE FIELD_LEN WITH 11
REPLACE FIELD_DEC WITH 2
*
APPE BLANK
REPLACE FIELD_NAME WITH "CHAMP_3"
REPLACE FIELD_TYPE WITH "D"
REPLACE FIELD_LEN WITH 8
REPLACE FIELD_DEC WITH 0
*
USE
*
* Creation du fichier définitif :
*
CREATE BONJOUR FROM BON001
*
USE BONJOUR
*
* Remplissage de donnees :
*
APPE BLANK
REPLACE CHAMP_1 WITH "Valeur 1"
REPLACE CHAMP_2 WITH 128.54
REPLACE CHAMP_3 WITH DATE()
*
USE
*
RETURN

merci pour ton aide alors je vé le faire avec clipper 5 c mieux, est ce que tu peut m'aider la
http://www.commentcamarche.net/forum/affich-15892342-aide-sur-methode-scheduling
svp