Erreur vshost.exe ?!

Question

Bonjour à tous,
J'ai codé un petit prog sur vb 2008. Je viens de finir de le coder, j'ai donc voulu le tester. Pour cela, j'appuie sur la touche F5. Tout se charge normalement, je lance le processus et au bout d'une minute (Plus ou moins) tout se plante et vista me sort : "vshost.exe a cessé de fonctionner" ! De quoi cela peut il venir ? Erreur de code ? Erreur Mémoire ? (J'execute 6 timers en même temps)
Merci d'avance.

Marneus73 · Answer

J'ai pu chopper un screen, si ça peut aider:

gillardg · Answer

éxécute en pas à pas et tu verras bien ce que cela donne


ensuite tu reviens avec le bout de code qui bloque!






Les écologistes réclament une société propre les imbéciles nettoient

LIBRE_MAX · Answer

Salut,
Voici, probablement, de quoi il s' agit:
http://www.commentcamarche.net/processus/svchost-exe.php3
http://www.generation-nt.com/identifier-les-services-associes-au-processus-svchost-astuce-24617-1.html

Il y' an a plein d' autres..
Si tu veux en savoir plus , tapes SVCHOST dans google et tu seras servi :-)

<hr />... Y'en a même qui disent qu'ils l'ont vu voler.

Marneus73 · Answer

Slt,
merci pour vos réponses !
LIBRE_MAX ce n'est pas SVCHOST mais  VSHOST ce doit être la même chose, mais d'après ce que j'ai compris VSHOST est spécifique à VB Studio.

Je crois avoir une piste. Je vais écrire un bout d'algo car le code est illisible. En fait, je récup des données avec une boucle for. A chaque passage dans la boucle, je récupère l'information, l'ajoute en string dans une ListView et coche la CheckBox correspondante (de la ListView). Jusque là tout va bien. Mais en même temps, j'utilise l'événement ItemChecked de la listview pour coloriser mes lignes:

Private Sub ListView5_ItemChecked(ByVal sender As Object, ByVal e As System.Windows.Forms.ItemCheckedEventArgs) Handles ListView5.ItemChecked

        Dim m As Integer

        For m = 0 To ListView1.Items.Count - 1

            If ListView5.Items(m).Checked = True Then
                ListView5.Items(m).BackColor = Color.LightGreen
            Else
                ListView5.Items(m).BackColor = Color.LightCoral
            End If
        Next

    End Sub

Le pb peut il venir de là ? un décalage entre les deux boucles ?

En fait je voulais juste créer un bout de code pour que les lignes passent en rouge si l'utilisateur les décoches.

gillardg · Answer

Try











Dim

 m 


As





Integer




For

 m = 0 


To

 ListView1.Items.Count - 1



If

 ListView5.Items(m).Checked = 


True





Then


ListView5.Items(m).BackColor = Color.LightGreen



Else


ListView5.Items(m).BackColor = Color.LightCoral



End





If



Next








Catch

 ex 


As

 ExceptionDebug.Fail(ex.Message)' au moins tu sauras ce qui ne vas pas



End





Try





il y a 10 sortes de gens: ceux qui comprennent le binaire, et les autres

Marneus73 · Answer

Oui, ça vient bien de ce bout de code, j'ai un index invalide en message et visuellement, la ligne rouge apparait avant l'item (son texte)

LIBRE_MAX · Answer

For 
m = 1 


To

ListView1.Items.Count 

Pour les Listbiews, l' index des lignes commence à 1.
En VB6 en tout cas.

PS:désolé pour la confusion.

<hr />... Y'en a même qui disent qu'ils l'ont vu voler.

Kevin.Ory · Answer

Salut,

LIBRE_MAX > Pas en .NET

Marneus >
For m =  0 
To ListView1 .Items.Count - 1

IfListView5.Items(m).Checked  = 
True
Then
Normal que se soit d'abord ListView1 et après ListView5?

C'est surement de là que vient le prob.. fais plutot comme ça:

For Each Item as ListViewItem In 
ListView5.Items

    IfItem.Checked

Then
            Item.BackColor = Color.LightGreen

    Else
            Item.BackColor = Color.LightCoral

    End
If
Next

Erreur vshost.exe ?!

8 réponses

Votre réponse

Discussions similaires