Protéger votre ordinateur avec un carte a puce

Soyez le premier à donner votre avis sur cette source.

Vue 9 584 fois - Téléchargée 1 510 fois

Description

protection d'un microordinateur avec un carte a puce et l'utelesation le compsantt mscomm de visual basic6

Source / Exemple :


Private Sub Command1_Click()
Dim a(64)  'tabl de 64 donne
i = 0       'initial i=0
Text1.Text = ""   ' efface tout les zone textbox
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
MSComm1.PortOpen = True 'ouvrir la port com1
'//rest de la carte --------_____-----
For y = 0 To 300
MSComm1.RTSEnable = True
Next
MSComm1.RTSEnable = False
'//fin de rest
MSComm1.InputLen = 1 'donne qui recoi dan le tampon
Do
If MSComm1.InBufferCount Then GoTo 10 ' attend le donne carte --------> micro
20:
l = l + 1
If l = 10000 Then GoTo fin
Loop
10:
donne = MSComm1.Input ' donne
'a(i) = Hex(Asc(b)) ' if la donne affiche en hexadicimal
a(i) = donne
i = i + 1
l = 0
ProgressBar1.Value = i
If i < 64 Then GoTo 20 ' 64 donne envoi
For i = 0 To 7     ' affichage les donne don la de text
Text1.Text = Text1.Text & a(i)
Next
For i = 8 To 15
Text2.Text = Text2.Text & a(i)
Next
For i = 16 To 23
Text3.Text = Text3.Text & a(i)
Next
For i = 24 To 31
Text4.Text = Text4.Text & a(i)
Next
For i = 32 To 39
Text5.Text = Text5.Text & a(i)
Next
For i = 40 To 47
Text6.Text = Text6.Text & a(i)
Next
For i = 48 To 55
Text7.Text = Text7.Text & a(i)
Next
For i = 56 To 63
Text8.Text = Text8.Text & a(i)
Next
Command2.Enabled = True
fin:
MSComm1.PortOpen = False
ProgressBar1.Value = 0
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Dim lngRetVal As Long
Dim blnPrevValue As Boolean
lngRetVal = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, _
blnPrevValue, 0&)
Command2.Enabled = False
End Sub

Private Sub Option1_Click()
MSComm1.CommPort = 1 ' choit com1
End Sub

Private Sub Option2_Click()
MSComm1.CommPort = 2  'choit com2
End Sub

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

mesapplications
Messages postés
2
Date d'inscription
samedi 26 mai 2007
Statut
Membre
Dernière intervention
11 décembre 2007
-
bonjour tout le monde, je vous remercie beaucoup MAHERLIVE pour votre réponse
Et enfin j'ai réussi à programmer ma carte à puces.Maintenant en faisant demarrer le soft de SAMSAM, en appuyant sur le botton "lecture" je n'arrive à lire le contenu de la carte( pour les deux modes PIC /JDM et PHOENIX).quelqu'un pour m'expliquer ce qui ne va pas et comment faire fonctionner le soft de SAMSAM? merci à l'avance. (c'est très important pour moi...!!).
maherlive
Messages postés
15
Date d'inscription
jeudi 22 février 2007
Statut
Membre
Dernière intervention
8 juin 2007
-
salut mesapplications j'ai réaliser un projet a partire de de cette exemple ;) essaye d'utiliser le WinPic800 pour la programmation de ton carte
s'il na pas marcher contacter moi sur mhr.live@gmail.com
mesapplications
Messages postés
2
Date d'inscription
samedi 26 mai 2007
Statut
Membre
Dernière intervention
11 décembre 2007
-
Bonjour tout le monde,je m'appelle Farid,je suis etudiant en eléctronique,je travaille sur les cartes à puces.
Mon projet est de sécuriser un PC via une carte à puce, après des recherches sur le NET
j'ai trouvé le soft de samsam très intéressant pour moi.Alors je sollicite vos aides qui seront precieuses pour moi et j'aimerais bien que vous m'expliquiez le fonctionnement de ce programme.
(Est-ce-que le PC me demande la carte et on doit saisir le nom, le prenom,et les codes pour chaque démarrage ?)
D'abord je vous donne quelques détails, et voici étape par étape ce que j'ai fait
déja, je dispose de windows XP
mon lecteur de carte est un CAR-04
(Programmateurs de cartes à puces multimodes
Phoenix / Smartmouse / I2Cbus / AVR-SPIprog / PIC-JDMprog)
j'ai 2 cartes golde l'une avec des composants de surfarface (pic 16F84A et eeprom 24c16)
l'autre avec les memes composants intégrés.
Tout d'abord, je mets en mode PIC/JDM à 3.57 MHZ puis j'écris le driver.hex dans le PIC
ensuite, je mets le jumper sur le mode phoenix à 3.57 MHZ et j'écris le driver.hex dans l'eeprom
puis je reviens sur le mode PIC/JDM à 3.57 MHZ pour effacer le PIC.
enfin, je demarre votre soft et j'appuis sur le bouton "lecture" mais hélas, rien ne se passe !
et je n'arrive pas à lire ce qu'il y a sur ma carte !

Remarque: le voyant lumineux vert du lecteur s'allume une fraction de seconde en mode PIC/JDM à 3.57 MHZ mais en phoenix, pas du tout ...
Merci à l'avance de m'expliquer comment fonctionne ce soft et ou se trouve l'anomalie.

electronicsoftabc@yahoo.fr
maherlive
Messages postés
15
Date d'inscription
jeudi 22 février 2007
Statut
Membre
Dernière intervention
8 juin 2007
-
jai le même probleme que tn1 ...
avec un carte golde toujour pas de resultat du programm!!!!!!

SVP aider nous
tn1
Messages postés
24
Date d'inscription
samedi 29 décembre 2001
Statut
Membre
Dernière intervention
1 novembre 2005
-
Tout d'abord, un grand merci pour votre réponse.

mais je n'arrive toujours pas à lire ce qu'il y a sur ma carte !

voici étape par étape ce que jai fait, pouvez vous me dire ce qu'il ne va pas svp :

déja, je dispose de windows XP (je me suis demandé si ca cela n'était pas un source de pb?)

mon lecteur de carte est un CAR-04
(Programmateurs de cartes à puces multimodes
Phoenix / Smartmouse / I2Cbus / AVR-SPIprog / PIC-JDMprog)

j'ai 2 cartes une disposant d'un pic 16F84 et d'un éprom 24c16
l'autre Pic16F84A + eprom 24WC16J
(avec les 2 cartes je n'y arrive pas)

Tout d'abord, je met en mode JDM à 3.57 mhz puis j'écrit le driver.hex (j'ai verifié si il n'y a pa eu d'érreur d'écriture par comparaison)

ensuite, je démarre le soft de samsam, je met en mode phoenix (changement de jumper sur mon lecteur), je laisse en 3.57mhz

j'appuis sur le bouton "lecture" mais là, rien ne se passe !

le plus étonnant, c'est que j'ai un voyant lumineux sur mon lecteur de carte qui s'allume lorsque la carte est lu, en jdm, ce voyant s'allume une fraction de seconde, mais en phoenix, pas du tout ...

merci de m'indiquer ce qu'il ne va pas svp
cordialement, Nabil

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.