begin process at 2010 02 10 01:19:21
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > HEXA/ASCII AVEC POSSIBILITÉ DE FICHIER

HEXA/ASCII AVEC POSSIBILITÉ DE FICHIER


 Information sur la source

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Divers Classé sous :conversion, ascii, hexadecimal, fichier, convertisseur Niveau :Débutant Date de création :25/02/2009 Date de mise à jour :25/02/2009 13:51:50 Vu / téléchargé :2 184 / 193

Auteur : XRaph

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

 Description

Cliquez pour voir la capture en taille normale
Salut a tous ! (svp prenez la peine de lire la description jusqu'au bout please!!)
voila c'est 1 ma premiere source sur le site (j'ai beaucoup télécharger et tout mais jme suis refais un compte la) et 2 ma premiere source en vb  !(avant j'étais sous qbasic c'est completement different)
Alors la source maintenant... en fait c'est (encore et encore) un simple convertisseur hexa/ascii mais j'en ai trouvé aucun qui m'allait (pour les option avec les fichiers surtout).Donc je suis partit de la super source de Arcanis(http://www.vbfrance.com/codes/CONVERTISSEU R-ASCII-HEXADECIMAL-SIMPLE_33579.aspx) et j'ai essayer d'utiliser le principe de celle la(http://www.vbfrance.com/code.aspx?id=28389 de Zifnig) mais j'ai pas reussi ... Finalement j'ai fai mon truc en gardant un peu l'interface de

Ya un blem en fait c'est que quand je prend un fichier hexa(un packet recupéré avec wpepro, ou j'ai supprimer tous les espace avec un ptit prog. de ma cration) il convertit très bien vers ASCII (cool) mais la je veut le convertir en HEXA poru voir et il m'affiche un texte hexa completement different que l'original et surtout beaucoup plus long, et quand je reconvertit ce 'long texte hexa' en ascii il me met le bon truc (bizar non??). Un autre probleme quand j'ai pris mon ptit prog pour enlever les espace d'un file pour le convertir en hexa (juste pour voir) i me met un truc long et tout, mais surtout quand j'essay de le reconvertir en ascii i me met un ou deux caractere inconus...
J'ai pris le temps de beaucoup commenter la source parce qu'elle est un peu .. comment dire.. pas conforme je pense (stucture et tout) car en generale je declarait ps les variable (en qb )
Alors merci d'avance pour les conseils, les commentaires, et les reproches(allez y mollo quand meme sur les reproche 'oui je c'est que ya plein de sources comme ca')
XRaph

Source

  • 'dans le zip la source + mon prog. pour enlever les espaces d'un fichier (en qb) pour tester l'erreur
'dans le zip la source + mon prog. pour enlever les espaces d'un fichier (en qb) pour tester l'erreur

 Conclusion

Re-merci d'avance et je suis ouvert à toutes repliques


ps: désoler pour les éventuelles fautes d'orthographes

 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


 Historique

25 février 2009 13:51:50 :
mise a jour avec le prog. pour les espaces...(j'lavé oublié)

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) SPACE - UN SPACE MAC POUR WINDOWS par vbnino
Source avec Zip Source .NET (Dotnet) MULTI THREAD AVEC AFFICHAGE par jaknight007
Source avec Zip Source .NET (Dotnet) COMPILATEUR EN VB NET 2003 par alpha5
Source avec Zip Source avec une capture CRYPTER AVEC LE CHIFFRE DES NIHILISTES RUSSES par tresorsdevie
Source avec Zip Source avec une capture Source .NET (Dotnet) COMPTE_BANCAIRE.NET par Adn56

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture COUPEUR DE FICHIERS par boukake
Source avec Zip CONVERTISSEUR DEVISES ACTUALISÉ par Avidang
Source avec Zip Source avec une capture CONVERTISSEUR ASCII - HEXADÉCIMAL SIMPLE par Arcanis
Source avec Zip Source avec une capture TRADUCTEUR VB6.VBP EN VB5.VBP par joro
Source avec Zip Source avec une capture ASCII CONVERTISSEUR par Seb_d_angers

Commentaires et avis

Commentaire de XRaph le 25/02/2009 16:18:02

J'ai oublié de dire que SUPPRIME.txt c'est le ptit prog. pour les espaces... (c'est du qbasic)
Les commentaires ne sont pas interdits !!

Commentaire de mdry le 26/02/2009 06:38:28

Pour lire un fichier texte  
  Open Fichier For Binary As #1
  Texte = Space(LOF(1))
  Get #1, , Texte
  Close
  Il lit le fichier au complet avec les 'retour de ligne'

Pour un Hex
  Hex renvoie une chaîne de caractères
  Hex("A") = 41 , 2 car.
  Hex(vbTab) = 9, 1 car.
  
  Test ceci:
  Tmp = Right("0" & Hex(vbTab), 2)
  il renvoie 09

bon VB

Commentaire de mdry le 26/02/2009 06:49:30 7/10

Ha oui
Pour les séparations

Dim A As Integer                  'les declarations sont pas propres je fais ca un peu partout ...
Dim TotalChaine As String         '...quand j'ai besoin d'une vriable

  TotalChaine = ""                  'au cas ou
  For A = 1 To Len(Texte)           'on boucle jusqu'a la fin de la chaine(texte quoi)
    TotalChaine = TotalChaine & Right("0" & Hex(Asc(Mid(Texte, a, 1))), 2)
    '            11 1111
    '0123 4567 8901 2345
    Select Case (A - 1) Mod 16  'Mod : il faut tj partir à Zéro
      Case 15  'au 16ième Hex, on change de ligne
        TotalChaine = TotalChaine & vbCrLf
      Case 3, 7, 11  'on regroupe par 4 Hex, 2 espaces entre groupe
        TotalChaine = TotalChaine & "  "
      Case Else  '1 espace entre Hex
        TotalChaine = TotalChaine & " "
    End Select
  Next A                             '...rapport à l'originale (beaucoup plus long, mai à la meme équivlence en ASCII)
  TxtHexa.Text = TotalChaine       'on ecrit le result dans la textbox

Commentaire de XRaph le 26/02/2009 14:44:54

A merci beaucoup mdry je mes à jour des que j'ai le tmp.
Il y a tjr le probleme de conversion hexa->ascii de mon fichier 'SUPPRIME.txt' .
Je l'ouvre, je le convertit en hexa et je le reconvertit en ascii et il me met 1 caractere bidon :: Þ
(en fait yen a jor 3 des carac la dedans)
Pour la lecture du fichier j'ai pas l'habitude comme avant j'était sous qb (ya aussi le mode binary je croi(?) mais je l'ai jamais utilisé)...
  

Commentaire de XRaph le 26/02/2009 19:03:11

Mais quand meme il y a un probleme dans la conversion en hexa :
TotalChaine = TotalChaine & Right("0" & hex(Asc(Mid(Texte, a, 1))), 2)

ca ne 'marche pas'
1:: ca sort un texte en hex beaucoup plus long que cque ca doit etre
2:: quand je le reconvertit ca me mes 1::des chose pas bonnes et des caractere comme ca :: ||||| en gras (des barres si tu vois(0_0) pas bien LLOOLL)et 2:: le texte  'normal' est beaucoup plus court (Meme pas une ligne)

Alors voila probleme -> -_-' <-  

Merci d'avance

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

LOGICIEL DE CONVERSION ASCII [ par amine0911 ] Bonjour a tous,  Quelqun parmi vous connai un logiciel libre ou payant quii convertit un fichier en ASCII en un fichier normal s'il vous plait je vous conversion fichier UNICODE en ASCII [ par 25230 ] Bonjour,je n'arrive pas à exploiter correctement le contenu de fichiers étant au format UNICODE (issus de msinfo32.exe).Est-il possible de convertir u conversion d'un extension d'un fichier ASCII [ par hatems ] je cherche une code qui me permet de convertir l'extension d'un fichier ASCII en un fichier text,aidez moi svp!!! Intéragir sur un contrôle pendant exécution d'un process [ par leonrv ] Bonjour, J'imagine que le problème a déjà été abordé, mais je ne trouve pas de sujet en parlant via la fonction Recherche, donc désolé d'avance.. Su ouvrir un fichier text sans avoir l'assistant de conversion de texte [ par TIBO1603 ] Salut a tous ,Voila mon problème je n'arrive pas a m'affranchir de l'assistant de conversion de texte, voici le code que j'utilise :feuilleouverte = A Ouvrir un fichier ascii sur excel [ par khev ] Bonjour,Est-ce que quelqu'un pourrait me dire si c'est possible d'importer un fichier ascii sur excel en recuperant des longeur fixe dans des colonnes creation fichier ascii [ par amel3011 ] Bonjour à tousje voudrais creer un fichier ascii et importer des données d'une base de données access vers le fichier crée !je ne sais pas par quoi co conversion html en pdf [ par dahouetagnes ] Bonjour,Est il possible de convertir un fichier  .html en un fichier pdf en visual basic 6 ?Et si oui de quelle façon ?Merçi.dahouet


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 : 1,217 sec (3)

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