Userform

Le
Pascal
Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date >/01/07
<1/12/07
et dans le textbox2 empêcher la saisie autre que numérique. Je trouve pas
quelqu'un à la soluce?

Merci
Pascal





Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #4445711
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"
Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date > /01/07
<1/12/07
et dans le textbox2 empêcher la saisie autre que numérique. Je trouve pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


JB
Le #4445701
Vérif numérique:

Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If InStr("0123456789,", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
Beep
End If
End Sub

http://boisgontierjacques.free.fr/fichiers/jb-formulaire.zip

JB

On 16 avr, 13:00, "JB"
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"


Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = " " Or TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date >= 01/01/07
<1/12/07
et dans le textbox2 empêcher la saisie autre que numérique. Je trou ve pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- M asquer le texte des messages précédents -


- Afficher le texte des messages précédents -



JB
Le #4445691
Saisie de chiffres avec décimales

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If InStr("0123456789,", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
Beep
End If
End Sub

http://boisgontierjacques.free.fr/fichiers/jb-formulaire.zip

JB
On 16 avr, 12:24, "Pascal"
Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date > /01/07
<1/12/07
et dans le textbox2 empêcher la saisie autre que numérique. Je trouve pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


Pascal
Le #4445441
Merci,
Mais je ne sais pas comment intégrer la partie de ton code au mien?
"JB"
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"
Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or
TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date
/01/07
<1/12/07

et dans le textbox2 empêcher la saisie autre que numérique. Je trouve pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com





---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:56:56
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com






---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:58:29
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


JB
Le #4445371
-Selectionner TextBox1
-Sélectionner l'événement BeforeUpdate

JB
On 16 avr, 16:58, "Pascal"
Merci,
Mais je ne sais pas comment intégrer la partie de ton code au mien?
"JB"
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"




Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = " " Or
TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date
/01/07
<1/12/07

et dans le textbox2 empêcher la saisie autre que numérique. Je trou ve pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:56:56
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:58:29
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -

- Afficher le texte des messages précédents -




Pascal
Le #4445361
Merci,
Mais débutant cela devient trop compliqué pour moi, je vais laisser le code
tel quel
Pascal

"JB"
-Selectionner TextBox1
-Sélectionner l'événement BeforeUpdate

JB
On 16 avr, 16:58, "Pascal"
Merci,
Mais je ne sais pas comment intégrer la partie de ton code au mien?
"JB"
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"




Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or
TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date
/01/07
<1/12/07

et dans le textbox2 empêcher la saisie autre que numérique. Je trouve
pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:56:56
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:58:29
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -





---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 17:27:26
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com






---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 17:28:42
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com



JB
Le #4445351
Placer juste après
Private Sub CommandButton1_Click()



If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Me.TextBox1.SetFocus
Exit Sub
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Me.TextBox1.SetFocus
Exit Sub
End If
End If

JB


On 16 avr, 17:28, "Pascal"
Merci,
Mais débutant cela devient trop compliqué pour moi, je vais laisser l e code
tel quel
Pascal

"JB"
-Selectionner TextBox1
-Sélectionner l'événement BeforeUpdate

JB
On 16 avr, 16:58, "Pascal"




Merci,
Mais je ne sais pas comment intégrer la partie de ton code au mien?
"JB"
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"
Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or
TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date
/01/07
<1/12/07

et dans le textbox2 empêcher la saisie autre que numérique. Je tr ouve
pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:56:56
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:58:29
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 17:27:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 17:28:42
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -

- Afficher le texte des messages précédents -





Pascal
Le #4444581
Merci
Cela fonctionne à merveille
pascal
"JB"
Placer juste après
Private Sub CommandButton1_Click()



If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Me.TextBox1.SetFocus
Exit Sub
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Me.TextBox1.SetFocus
Exit Sub
End If
End If

JB


On 16 avr, 17:28, "Pascal"
Merci,
Mais débutant cela devient trop compliqué pour moi, je vais laisser le
code
tel quel
Pascal

"JB"
-Selectionner TextBox1
-Sélectionner l'événement BeforeUpdate

JB
On 16 avr, 16:58, "Pascal"




Merci,
Mais je ne sais pas comment intégrer la partie de ton code au mien?
"JB"
Bonjour,

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As
MSForms.ReturnBoolean)
If Not IsDate(Me.TextBox1) Then
MsgBox "Saisir une date!"
Cancel = True
Else
If CDate(Me.TextBox1) < DateSerial(2007, 1, 1) Or
CDate(Me.TextBox1) > DateSerial(2007, 12, 31) Then
MsgBox "erreur"
Cancel = True
End If
End If
End Sub

Cordialement JB

On 16 avr, 12:24, "Pascal"
Bonjour,
Avec ce code:
Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
If TextBox1 = "" Or CboPays = "" Or CboDem = "" Or CboModes = "" Or
TextBox2
= "" Or CboHor = "" Then
MsgBox "Vous avez oublié un champ!"
CommandButton1.Enabled = True
Else
ActiveCell.Offset(0, 0) = TextBox1
ActiveCell.Offset(0, 0) = Format(TextBox1.Value, "mm/dd/yyyy")
ActiveCell.Offset(0, 1).Value = CboPays
ActiveCell.Offset(0, 2).Value = CboDem
ActiveCell.Offset(0, 3).Value = CboModes
ActiveCell.Offset(0, 4).Value = TextBox2
ActiveCell.Offset(0, 4) = Format(TextBox2.Value, "0")
ActiveCell.Offset(0, 5).Value = CboHor
TextBox1 = ""
TextBox2 = ""
CboDem = ""
CboModes = ""
CboHor = ""
CboPays = ""
End If
End Sub
J'aimerais empêcher dans le textbox1 la saisie autre qu'une date
/01/07
<1/12/07

et dans le textbox2 empêcher la saisie autre que numérique. Je trouve
pas
quelqu'un à la soluce?

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 12:24:43
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:56:56
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 16:58:29
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 17:27:26
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 17:28:42
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -





---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 16/04/2007 22:44:53
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com






---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000734-0, 16/04/2007
Analyse le : 17/04/2007 10:36:08
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com




Publicité
Poster une réponse
Anonyme