cs_bassma

Membre
Inscription
11 avril 2001
Dernière intervention
10 août 2005
Interventions
6
Signature
ras

UNE DATABASE

/source/12178-une-database

Deja 3 ans (presque). En fait le fichier n'est plus disponible sur http://www.freebase.tuxfamily.org/, puisque le serveur a été hacke il y a peut être 1 ou 2 ans et les fichiers ont été supprimés. Sinon, la Freebase a subi d'ènorme modification et actuellement c'est la version V3 et elle sert de database pour SoftaMedCab, un logiciel ...

il s'agit d'une freebase, la source sera disponible sur http://www.freebase.tuxfamily.org/fonctions.php C'est un projet open source. Tout ceux qui ont envie d'y participer seront le bienvenue.

Ah, je n'ai pas reussi a me coucher avant de trouver le pb. Tout vient du fait que tu utilise des majuscule dans les noms de field. Avec les minuscules tout va s'arranger , ca fonctionne avec les minuscules. utilise colb au lieu de COLB. et tu verras ca marche. Tu tiens vrament a utiliser des majuscules dans les nom de field ??? c'es...

Encore une chose, j'ai que 5 types pour simplifier les choses, comme ca on est pas limite si on a envie de changer la taille d'un enregistrement. Et puis la table est peu rapide, donc mieux vaut creer des records (ex reccreatefromtable) permet de transformer ta table en record que tu peux par la suite travailler dessus dans la RAM (mod...

Avec ce serveur, que j'utilise avec un programme sans aucun probleme depuis quelques temps. En effet, j'ai fait quelques modifications avant de uploader, j'ai passer les noms de record et nom de field et typefield en shortstring au lieu de string pour faciliter le passage des donnees entre dll et application. J'ai peut etre toucher par...

CALCULER L'AGE EN ANNEES, MOIS ET JOURS

/source/885-calculer-l-age-en-annees-mois-et-jours

si il y a une faille que j'ai trouve et corrige. a la place de : Dim sdt1 As Date Dim sdt2 As Date sdt1 = DateValue("1" & "/" & mN1 & "/" & aN1) sdt2 = DateValue("1" & "/" & mN1 + 1 & "/" & aN1) Jdif = DateDiff("d", sdt1, sdt2) ' il faut mettre : If mN1 12 Then Dim sdt1 As Date Dim sdt2 As Date sdt1 = DateValue("1" & ...