begin process at 2010 02 10 14:36:00
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Fichier / Disque

 > CLASS BIO POUR LES ENTRÉES/SORTIES EN MODE BINARY

CLASS BIO POUR LES ENTRÉES/SORTIES EN MODE BINARY


 Information sur la source

Note :
5 / 10 - par 1 personne
5,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Fichier / Disque Niveau :Débutant Date de création :05/07/2003 Date de mise à jour :05/07/2003 12:17:35 Vu / téléchargé :1 976 / 120

Auteur : Dohm

Ecrire un message privé
Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

 Description

Bon ben voila ma toute premiere class (du moin la premiere qui marche). Elle permet de
gérer facilement les entrées sorties en mode binaires.

Source

  • Description de la class :
  • Function ecrire(chaine as string, optional deb as long)
  • 'Ecris la chaine passée en parrametre. Deb est optionel et si il n'apparais pas, ce sera écris a la position contenue dans position
  • Function lire(debut As Long, longueure As Long) As String
  • 'Lis tous les octets de 'debut' a 'fin' et les réenvois sous forme de string
  • Public Function lireln(Optional debutln As Long) As String
  • 'Lis une ligne (debutln permet de spécifier un numero de ligne. sinon il s'autoincrémente)
  • Public Function ecrireOctet(octet As Byte, Position As Long)
  • 'Ecris un octet a la position 'position'
  • Public Function lireOctet(pos As Long) As Byte
  • 'Lis l'octet qui est a la position 'pos'
  • Public Function fermer()
  • 'Ferme le fichier
  • Private Sub SelectStat(RorW As String)
  • 'Change le statu (écrir/lire). Vous ne l'utiliserez pas car les fonction l'appelles d'elle meme (et c'est une sub privée)
  • '************Ces deux fonctions n'ont qu'un intéret limité************
  • Public Function Bin2Dec(nb)
  • 'Convertie un integer formé de 1 et de 0 (faux octet) en integer
  • 'ex : 101 réenvera 5
  • Public Function Dec2Bin(nb)
  • 'Converti un nombre en son équivalent 1 et 0
Description de la class : 
 

Function ecrire(chaine as string, optional deb as long)
'Ecris la chaine passée en parrametre. Deb est optionel et si il n'apparais pas, ce sera écris a la position contenue dans position

Function lire(debut As Long, longueure As Long) As String
'Lis tous les octets de 'debut' a 'fin' et les réenvois sous forme de string

Public Function lireln(Optional debutln As Long) As String
'Lis une ligne (debutln permet de spécifier un numero de ligne. sinon il s'autoincrémente)

Public Function ecrireOctet(octet As Byte, Position As Long)
'Ecris un octet a la position 'position'

Public Function lireOctet(pos As Long) As Byte
'Lis l'octet qui est a la position 'pos'

Public Function fermer()
'Ferme le fichier

Private Sub SelectStat(RorW As String)
'Change le statu (écrir/lire). Vous ne l'utiliserez pas car les fonction l'appelles d'elle meme (et c'est une sub privée)

'************Ces deux fonctions n'ont qu'un intéret limité************

Public Function Bin2Dec(nb)
'Convertie un integer formé de 1 et de 0 (faux octet) en integer 
'ex : 101 réenvera 5

Public Function Dec2Bin(nb)
'Converti un nombre en son équivalent 1 et 0


 Conclusion

Bonnes vacances a tous!

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip PI CALCULATOR (POUR LES FANAS DE MATH ET DE GÉOMÉTRIE)
Source avec Zip Source avec une capture PONGALLONE

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) GESTION DE PARC AUTOMOBILE AVEC SÉRIALISATION par guyr07
Source avec Zip Source avec une capture Source .NET (Dotnet) FICHIERS_CACHÉS_LECTURE_SEULE par Le Pivert
Source avec Zip Source avec une capture CHANGEUR D'ICONES par djgab21
Source .NET (Dotnet) DIRECTDISKACCESS par XelectroX
Source avec Zip Source avec une capture UTILITAIRE WAV, MID ET MP3 par SnkVrt

Commentaires et avis

Commentaire de jack le 05/07/2003 15:39:57 administrateur CS

Mon dieu les fautes !
(mets ton age dans ta fiche, ça pourrait peut-être être une excuse)

(Jack est râleur aujourd'hui)

Commentaire de Dohm le 05/07/2003 16:00:40

Désolé :$ Le francais et mwa ca fais au moin 3... MAIS j'essai de me faire comprendre (je pratique la fonetik ^^ )
(Dohm est cool 2day)

Commentaire de SimonKari le 06/07/2003 09:46:30

Mon pauvre ami cette classe existe deja debut bien longtemps ! Tu n'a rien inventé désolé de te l'apprendre !
Si tu fréquentais un peu les newsgroup tu le saurais ! En particulier
microsoft.public.fr.vb !!!

Commentaire de SimonKari le 06/07/2003 09:48:39

Ah oui je voulais aussi dire que ta classe ne sert strictement à rien vu que tu ressort des strings ! Si tu fais une class binaire à quoi ce sert d'avoir des sorties en string ? Faut faire des sorties en binaire sinon autant avoir une class non binaire et qui peut-etre en interne traite les donnees en binaire !? Qu'est-ce que t'en pense ?

Commentaire de Tilois le 06/07/2003 10:34:00

pas terrible

Commentaire de Dohm le 06/07/2003 17:50:34

Elle existe déja?? Mince... m'on po prévenus :// M'enfin celle la elle est de mwa ^^
Par contre comment verais tu cette class???

Commentaire de SimonKari le 06/07/2003 18:58:01

Dans le cadre de la classe que je connais, il s'agit de fournir un tableau de byte à la fonction principale en référence et ce dernier est remplis ! Veux-tu que je t'envoi cette classe par mail ? Si oui, donne le moi (ton mail)

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,515 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales