developpement.db
29 déc. 2009 à 12:42
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
