Les Allergies
Alimentaires
Posez votre question Signaler

Programmation dbase

edu - Dernière réponse le 28 juin 2008 à 14:52
Bonjour
je dois faire de la programmation dbase et je ne sais pas comment faire pour programmer un numéro incrémenté.
Je dois imprimer une liste pour lequel chaque nom sera associé à un chiffre de 1 à 200.
Merci par avance de votre aide.
Lire la suite 

Programmation dbase »

3 réponses
Réponse
+0
moins plus
Bonsoir,
J'ai perdu de vue Dbase depuis quelques années, mais je crois me souvenir qu'il faut déclarer un champ "Recno()".

Votre documentation vous permettra sans doute de retrouver la syntaxe qui convient pour utiliser Recno().

A propos, je suis sur le point de poubelliser une doc Dbase IV.

Faites-moi savoir si elle vous intéresse.
arbaretier.jeanjacques@wanadoo.fr

La science ne fait que trouver ce qui existe depuis toujours.
Hubert REEVES.
Ajouter un commentaire
Réponse
+0
moins plus
BONSOIR EDU

J'essaue de vous repondre a votre question car j'ai utilsé dbase3+ dans les années 90
donc tu veux afficher une liste avec l'iceémentation du numero
dans ce cas tu fait le programme suivant

do while .t.
num=1
if not eof()
@x,y say num pict
@x1,y1 say nom
endif
num=num+1
endwhile
Ajouter un commentaire
Réponse
+0
moins plus
programme pour imprimer page par page
i=1
set ptint on
set device to print

do while .not. eof()
@ str(i)+" "+nom+" "+prenom
i=i+1
if i=60
wait
i=1
endif
skip
enddo
set print off
set device to screen
*******************************************************************
programe pour imprimer sur listing
i=1
set ptint on
set device to print
do while .not. eof()
? str(i)," ",nom," ",prenom
i=i+1
skip
enddo
set print off
set device to screen
Ajouter un commentaire
Ce document intitulé « programmation dbase » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?