Cacher un fichier zip dans une image jpg, bmp, gif ou png au choix. Vous pouvez mettre dans votre zip des dossiers, à partir du moment qu'ils ne soient pas trop lourds, pour ne pas attirer l'attention sur l'image. Tout ce fait automatiquement. Vous créez un dossier pour recevoir tous vos fichiers. Ensuite vous ouvrez vos fichiers image et zip. Puis vous choisissez le nom à donner à votre fichier caché et vous cachez votre fichier grâce à un fichier bat. Vous pouvez récupérer votre fichier quand vous le désirez.
Source / Exemple :
Voir zip
Conclusion :
Ce programme est fait suivant les indications de ce site:
http://www.papygeek.com/outils/cacher-des-fichiers-dans-une-image/
16 juil. 2013 à 08:27
Private Sub cmdOK_Click(sender As System.Object, e As System.EventArgs) Handles cmdOK.Click
If txtname.Text = lblimage.Text Then
txtname.Text = txtname.Text & "_2"
End If
espace = InStr(txtname.Text, " ")
If espace = 0 Then
Dim SW As New IO.StreamWriter(chemincible & "\test.bat") ' Crée un fichier de commande dos
SW.WriteLine("cd " & chemincible & "") ' Ajout de la première commande a exécuter sous l'invite de commande
SW.WriteLine("COPY/B " & nomimage & Extseule & " + " & nomzip & ".zip" & " " & txtname.Text & Extseule) 'création du fichier caché
SW.Close() ' On ferme le fichier
' MessageBox.Show("Cliquez sur le fichier test.bat pour cacher votre fichier", "Cacher fichier", MessageBoxButtons.OK, MessageBoxIcon.Information)
Process.Start(chemincible & "\test.bat") 'on ouvre le fichier batch
Process.Start(chemincible & "") 'on ouvre le dossier
cmdOK.Enabled = False
Else
MessageBox.Show("Le nom du fichier ne doit pas contenir d'espace!", "Renommer fichier caché", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
End Sub
bonne programmation
11 juil. 2013 à 13:46
@+
11 juil. 2013 à 13:03
11 juil. 2013 à 13:00
exemple avec un streamreader
Using Sr As New StreamReader(File)
While Not Sr.EndOfStream()
sources.Add(Sr.ReadLine())
End While
Sr.Close() 'inutile avec using
Sr.Dispose() 'inutile avec using
End Using
11 juil. 2013 à 09:30
Merci pour vos commentaires
ADN56 cela fait plaisir de te lire. Je vais me pencher sur le USING, j'avoue ne pas avoir vu d'ouverture de fichier de cette manière!
Cordialement
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.