samichac

je ne c pas si ce soir j'ai un coup de genie ou .... mais je vien de resoudre le second probleme il suffit d'introduire ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimXValues, chConstants.chDataBound, "A1:A5" ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimYValues, chConstants.chDataBound, "B1:B5" et puis faire varier le numero de la serie pour les autres courbes

1er pb resolu: on defini le type de graphe en ecrivant chartSpace1.Charts(0).Type .... avant d'ajouter des graphes mais si quelqu'un aurai une idee sur comment tracer plusieurs courbes sur un meme graphique ... encore merci

bonsoir je travaille sur un projet de programmation sur vb et vba de excel. J'ai rencontre des difficultes concernant le trace d'un graphe sur vb et sur vba. J'ai une form sur laquelle j'ai inseres les composants suivants: 1- une spreadsheet d'excel -->name: spreadsheet1 2- un graphe excel (pas le composant chart control mais le composant microsoft office charts)-->name: chartspace1 3- un bouton pour mettre en marche la sub tracant les courbes j'ai d'autre part trouve sur l'aide d'excel l'algorithme suivant qui permet de tracer de courbes: Sub Window_OnLoad() Dim chConstants Spreadsheet1.ActiveSheet.Cells.Clear Spreadsheet1.ActiveSheet.Cells(2, 1).Value = "Car" Spreadsheet1.ActiveSheet.Cells(3, 1).Value = "Sport-Utility" Spreadsheet1.ActiveSheet.Cells(4, 1).Value = "Truck" Spreadsheet1.ActiveSheet.Cells(5, 1).Value = "Minivan" Spreadsheet1.ActiveSheet.Cells(1, 2).Value = "1998" Spreadsheet1.ActiveSheet.Cells(2, 2).Value = 0.2 Spreadsheet1.ActiveSheet.Cells(3, 2).Value = 0.06 Spreadsheet1.ActiveSheet.Cells(4, 2).Value = 0.17 Spreadsheet1.ActiveSheet.Cells(5, 2).Value = 0.13 Spreadsheet1.ActiveSheet.Cells(1, 3).Value = "1999" Spreadsheet1.ActiveSheet.Cells(2, 3).Value = 0.38 Spreadsheet1.ActiveSheet.Cells(3, 3).Value = 0.82 Spreadsheet1.ActiveSheet.Cells(4, 3).Value = 0.28 Spreadsheet1.ActiveSheet.Cells(5, 3).Value = 0.62 Spreadsheet1.ActiveSheet.Cells(1, 4).Value = "2000" Spreadsheet1.ActiveSheet.Cells(2, 4).Value = 0.42 Spreadsheet1.ActiveSheet.Cells(3, 4).Value = 0.12 Spreadsheet1.ActiveSheet.Cells(4, 4).Value = 0.55 Spreadsheet1.ActiveSheet.Cells(5, 4).Value = 0.25 ' Clear the contents of the chart workspace. This removes ' any old charts that may already exist and leaves the chart workspace ' completely empty. One chart object is then added. ChartSpace1.Clear ChartSpace1.Charts.Add Set chConstants = ChartSpace1.Constants ' Set the chart DataSource property to the spreadsheet. ' It is possible to specify multiple data sources, but this example uses only one. ChartSpace1.DataSource = Spreadsheet1 ' Add three series to the chart. ChartSpace1.Charts(0).SeriesCollection.Add ChartSpace1.Charts(0).SeriesCollection.Add ChartSpace1.Charts(0).SeriesCollection.Add ' Connect the chart to data by specifying spreadsheet cell references ' for the different data dimensions. ' Notice that the series name is also bound to a spreadsheet cell. Changing ' the contents of the cell "B1" will also change the name that appears in the legend. ' If you don't want this behavior, set SeriesCollection(0).Caption instead of ' using the SetData method to bind the series name to the spreadsheet. ' Series one contains sales growth data for 1998. ' Bind the series name, the category names, and the values. ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimSeriesNames, chConstants.chDataBound, "B1" ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimCategories, chConstants.chDataBound, "A2:A5" ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimValues, chConstants.chDataBound, "B2:B5" ' Series two contains sales growth data for 1999. ChartSpace1.Charts(0).SeriesCollection(1).SetData chConstants.chDimSeriesNames, chConstants.chDataBound, "C1" ChartSpace1.Charts(0).SeriesCollection(1).SetData chConstants.chDimCategories, chConstants.chDataBound, "A2:A5" ChartSpace1.Charts(0).SeriesCollection(1).SetData chConstants.chDimValues, chConstants.chDataBound, "C2:C5" ' Series two contains sales growth data for 2000. ChartSpace1.Charts(0).SeriesCollection(2).SetData chConstants.chDimSeriesNames, chConstants.chDataBound, "D1" ChartSpace1.Charts(0).SeriesCollection(2).SetData chConstants.chDimCategories, chConstants.chDataBound, "A2:A5" ChartSpace1.Charts(0).SeriesCollection(2).SetData chConstants.chDimValues, chConstants.chDataBound, "D2:D5" ' Make the chart legend visible, format the left value axis as percentage, ' and specify that value gridlines are at 10% intervals. ChartSpace1.Charts(0).HasLegend = True ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).NumberFormat = "0%" ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).MajorUnit = 0.1 End Sub Private Sub CommandButton1_Click() Call Window_OnLoad End Sub cet algorithme vba donne des diagrammes en batons (ce qui est normal d'apres une source qui m'a avance que si l'on ne specifiait pas un charttype, le composant prend automatiquement comme type de trace les diagrammes en batons). Ce que je desire faire est de : 1 - tracer un graphe mais avec un chartype different(courbe normale xlXYscattersmooth) les donnees seront aquises des colonnes de la spreadsheet1. 2 - apres avoir resolu le premier probleme je voudrais inserer 3 courbes sur un meme graphe; les courbes prenant leurs valeurs de la spreadsheet(colonne 1 --> axe des abscisses, colonne 2 --> axe des ordonnees de la courbe1, colonne 3 --> axe des ordonnees de la courbe2 , colonne 4 --> axe des ordonnees de la courbe3). je vous remercie bcp de me repondre cela fait quelques semaines que je reflechit a ce probleme( je ne suis pas pro en info..) merci

Desole je ne voulais pas vous derranger. je presente la solution: au lieu de mettre coord.txt ce qui envoie automatiquement le fichiers dans mydocuments mettre c:\\coord.txt

PROBLEME RESOLU

j'ai oublie de specifier que les 4 colonnes dans la spreadsheet sont pour trois graphes differents. la 1ere colonne est l'axe des abscisses des trois et les 3 qui suivent les axes des ordonnees de chacun des graphes. merci encore'

sdc1 est une spreadsheet inseree sur la form grace au composant excel spreadsheet. generalement pour designer le contenu d'une case du tableau on note sdc1(cad nom du tableau).cells(ligne, colonne) la phrase donnant une surbrillance est If sdc1.Cells(2, 2) = 0 Then nbl = 0 Mais c'est bon j'ai pu faire ce que je voulais sur visual basic 6. je voulais ouvrir la form ecrite en vba et la sauver sous forme de fichier .exe. et visual basic 6 a reconnu le codage sans probleme, ce qui est etonant puisqu'en general ce sont les nouvelles versions qui lisent tout!!! Par contre je ne dirai pas non si quelqu'un m'expliquerai qu'est ce qui se passe. Et j'aurais par la meme occasion une autre question(que je vous pose tout de suite au lieu de reecrire un nouveau sujet). je tente de faire un graphe sur une form en vba. pour cela j'ai cree un espace graphe en utilisant le composant microsoft office chart 11.0 avec un spreadsheet de excel sur la form a l'aide du composant microsoft office spreadsheets. Le graphe doit prendre ses valeurs du spreadsheet.Dans l'aide , j'ai trouve un exemple de code que je vous presente: Sub Window_OnLoad() Dim chConstants Spreadsheet1.ActiveSheet.Cells.Clear Spreadsheet1.ActiveSheet.Cells(2, 1).Value = "Car" Spreadsheet1.ActiveSheet.Cells(3, 1).Value = "Sport-Utility" Spreadsheet1.ActiveSheet.Cells(4, 1).Value = "Truck" Spreadsheet1.ActiveSheet.Cells(5, 1).Value = "Minivan" Spreadsheet1.ActiveSheet.Cells(1, 2).Value = "1998" Spreadsheet1.ActiveSheet.Cells(2, 2).Value = 0.2 Spreadsheet1.ActiveSheet.Cells(3, 2).Value = 0.06 Spreadsheet1.ActiveSheet.Cells(4, 2).Value = 0.17 Spreadsheet1.ActiveSheet.Cells(5, 2).Value = 0.13 Spreadsheet1.ActiveSheet.Cells(1, 3).Value = "1999" Spreadsheet1.ActiveSheet.Cells(2, 3).Value = 0.38 Spreadsheet1.ActiveSheet.Cells(3, 3).Value = 0.82 Spreadsheet1.ActiveSheet.Cells(4, 3).Value = 0.28 Spreadsheet1.ActiveSheet.Cells(5, 3).Value = 0.62 Spreadsheet1.ActiveSheet.Cells(1, 4).Value = "2000" Spreadsheet1.ActiveSheet.Cells(2, 4).Value = 0.42 Spreadsheet1.ActiveSheet.Cells(3, 4).Value = 0.12 Spreadsheet1.ActiveSheet.Cells(4, 4).Value = 0.55 Spreadsheet1.ActiveSheet.Cells(5, 4).Value = 0.25 ' Clear the contents of the chart workspace. This removes ' any old charts that may already exist and leaves the chart workspace ' completely empty. One chart object is then added. ChartSpace1.Clear ChartSpace1.Charts.Add Set chConstants = ChartSpace1.Constants ' Set the chart DataSource property to the spreadsheet. ' It is possible to specify multiple data sources, but this example uses only one. ChartSpace1.DataSource = Spreadsheet1 ' Add three series to the chart. ChartSpace1.Charts(0).SeriesCollection.Add ChartSpace1.Charts(0).SeriesCollection.Add ChartSpace1.Charts(0).SeriesCollection.Add ' Connect the chart to data by specifying spreadsheet cell references ' for the different data dimensions. ' Notice that the series name is also bound to a spreadsheet cell. Changing ' the contents of the cell "B1" will also change the name that appears in the legend. ' If you don't want this behavior, set SeriesCollection(0).Caption instead of ' using the SetData method to bind the series name to the spreadsheet. ' Series one contains sales growth data for 1998. ' Bind the series name, the category names, and the values. ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimSeriesNames, chConstants.chDataBound, "B1" ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimCategories, chConstants.chDataBound, "A2:A5" ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimValues, chConstants.chDataBound, "B2:B5" ' Series two contains sales growth data for 1999. ChartSpace1.Charts(0).SeriesCollection(1).SetData chConstants.chDimSeriesNames, chConstants.chDataBound, "C1" ChartSpace1.Charts(0).SeriesCollection(1).SetData chConstants.chDimCategories, chConstants.chDataBound, "A2:A5" ChartSpace1.Charts(0).SeriesCollection(1).SetData chConstants.chDimValues, chConstants.chDataBound, "C2:C5" ' Series two contains sales growth data for 2000. ChartSpace1.Charts(0).SeriesCollection(2).SetData chConstants.chDimSeriesNames, chConstants.chDataBound, "D1" ChartSpace1.Charts(0).SeriesCollection(2).SetData chConstants.chDimCategories, chConstants.chDataBound, "A2:A5" ChartSpace1.Charts(0).SeriesCollection(2).SetData chConstants.chDimValues, chConstants.chDataBound, "D2:D5" ' Make the chart legend visible, format the left value axis as percentage, ' and specify that value gridlines are at 10% intervals. ChartSpace1.Charts(0).HasLegend = True ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).NumberFormat = "0%" ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).MajorUnit = 0.1 End Sub voulant adapter ce code a mon programme j'ai insere: Sub Window_OnLoad() Dim chConstants Dim i As Integer Spreadsheet1.ActiveSheet.Cells.Clear For i = 1 To 302 Spreadsheet1.Cells(i, 1) = S1.Cells(i + 2, 4) Spreadsheet1.Cells(i, 2) = S1.Cells(i + 2, 5) Spreadsheet1.Cells(i, 3) = S1.Cells(i + 2, 7) Spreadsheet1.Cells(i, 4) = S1.Cells(i + 2, 9) Next ' Clear the contents of the chart workspace. This removes ' any old charts that may already exist and leaves the chart workspace ' completely empty. One chart object is then added. ChartSpace1.Clear ChartSpace1.Charts.Add Set chConstants = ChartSpace1.Constants ' Set the chart DataSource property to the spreadsheet. ' It is possible to specify multiple data sources, but this example uses only one. ChartSpace1.DataSource = Spreadsheet1 ' Add three series to the chart. ChartSpace1.Charts(0).SeriesCollection.Add 'ChartSpace1.Charts(1).SeriesCollection.Add 'ChartSpace1.Charts(2).SeriesCollection.Add ' Connect the chart to data by specifying spreadsheet cell references ' for the different data dimensions. ' Notice that the series name is also bound to a spreadsheet cell. Changing ' the contents of the cell "B1" will also change the name that appears in the legend. ' If you don't want this behavior, set SeriesCollection(0).Caption instead of ' using the SetData method to bind the series name to the spreadsheet. ' Series one contains sales growth data for 1998. ' Bind the series name, the category names, and the values. ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimXValues, chConstants.chDataBound, "A1:A300" ChartSpace1.Charts(0).SeriesCollection(0).SetData chConstants.chDimYValues, chConstants.chDataBound, "B1:B300" ' Make the chart legend visible, format the left value axis as percentage, ' and specify that value gridlines are at 10% intervals. ChartSpace1.Charts(0).HasLegend = True ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).NumberFormat = "0%" ChartSpace1.Charts(0).Axes(chConstants.chAxisPositionLeft).MajorUnit = 0.1 End Sub Private Sub CommandButton7_Click() Call Window_OnLoad End Sub mais ca ne marche pas j'ai lu quelque part que si on entrait pas le type de graphe desire on obtient par defaut un diagramme. j'ai par suite tente de changer le type de graphe chose que je ne suis pas parvenu a faire.] si vous savez quoi faire.... Merci beaucoup

Merci guy j'ai corrige le code comme tu me l'as presente. Mais l'erreur est toujours la lorsque je demarre le programme. Est ce qu'il s'agit d'un probleme lie aux variables?

j'ai oublie de vous demander si quelqu'un saurait s'il y'aurait possibilite d'une conversion automatique des codes. Merci encore

Bonjour j'ai un programme ecrit en vba sur excel. je suis en train de le reecrire en vb en reprenant les memes fonctions et subs mais en adaptant le langage du programme au visual basic. lors du test de l'unes des fonction, j'ai fait face a une erreur: la fonction: Function nbl() As Integer 'cette fonction compte le nombre de points inseres dans le tableau' Dim i As Integer Dim j As Integer i = 1 j = 0 If sdc1.Cells(2, 2) = 0 Then nbl = 0 ' sdc est un tableau excel place sur la form If sdc1.Cells(2, 2) <> 0 Then While (sdc1.Cells(i, 1) <> 0) j = j + 1 i = i + 1 End While nbl = j End If End Function l'erreur rencontree est: Operator '=' is not defined for type 'Range' and type 'Integer'. je ne comprend pas ce qui se passe. si quelqu'un saurait se serait sympa de m'expliquer. Il faut noter que je ne suis pas pro en programmation. J'utilise visual basic 2005. Merci...

Bonjour j'utilise visual lisp pour exporter des coordonnees d'autocad vers un fichier text. le probleme est que je n'arrive pas imposer le repertoire ou mon fichier sera sauveguarde, or c'est essentiel pour le programme qui devra l'utiliser de localiser le fichier .txt j'utilise la commande setq fname("coord.txt") ....merci

j'ai oublie de vous specifier que cela c'est produit apres un plantage de l'ordi. il a plante et quand j'ai voulu le redemarrer j'ai eu ce probleme

bonjour j'ai un probleme avec mon ordi: windows ne demarre pas. quand j'allume l'ordi, il me dit que la derniere fois j'ai eu un probleme et qu'il faut choisir une option: 1- safe mode (sans echec) 2- safe mode with networking 3- safe mode with command prompt 4- last know good configuration 5- start windows normally j'ai essaye les 5 et a chaque fois il me ramenait a cet etat ou je dois choisir une de ces options. je ne sais pas quoi faire il est important que je puisse ouvrir windows pour que je retire mon travail avant d'envoyer l'ordi s'il y'a lieu de l'arranger. merci d'avance

j'ai effectue un scan kaspersky en ligne voici le rapport ------------------------------------------------------------------------------- KASPERSKY ONLINE SCANNER REPORT Saturday, February 02, 2008 1:02:23 PM Operating System: Microsoft Windows XP Home Edition, Service Pack 2 (Build 2600) Kaspersky Online Scanner version: 5.0.98.0 Kaspersky Anti-Virus database last update: 2/02/2008 Kaspersky Anti-Virus database records: 545848 ------------------------------------------------------------------------------- Scan Settings: Scan using the following antivirus database: extended Scan Archives: true Scan Mail Bases: true Scan Target - My Computer: C:\ D:\ E:\ Scan Statistics: Total number of scanned objects: 129091 Number of viruses found: 2 Number of infected objects: 10 Number of suspicious objects: 0 Duration of the scan process: 01:11:39 Infected Object Name / Virus Name / Last Action C:\autorun.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped C:\Documents and Settings\All Users\Application Data\Symantec\Common Client\settings.dat Object is locked skipped C:\Documents and Settings\All Users\Application Data\Symantec\Symantec AntiVirus Corporate Edition\7.5\Quarantine2580000\465BB3CE.VBN Infected: Trojan.Win32.Tiny.e skipped C:\Documents and Settings\All Users\Application Data\Symantec\Symantec AntiVirus Corporate Edition\7.5\Quarantine9B00000\4FFF01BF.VBN Infected: Trojan.Win32.Tiny.e skipped C:\Documents and Settings\LocalService\Cookies\index.dat Object is locked skipped C:\Documents and Settings\LocalService\Local Settings\Application Data\Microsoft\Windows\UsrClass.dat Object is locked skipped C:\Documents and Settings\LocalService\Local Settings\Application Data\Microsoft\Windows\UsrClass.dat.LOG Object is locked skipped C:\Documents and Settings\LocalService\Local Settings\History\History.IE5\index.dat Object is locked skipped C:\Documents and Settings\LocalService\Local Settings\Temporary Internet Files\Content.IE5\index.dat Object is locked skipped C:\Documents and Settings\LocalService\NTUSER.DAT Object is locked skipped C:\Documents and Settings\LocalService\ntuser.dat.LOG Object is locked skipped C:\Documents and Settings\NetworkService\Cookies\index.dat Object is locked skipped C:\Documents and Settings\NetworkService\Local Settings\Application Data\Microsoft\Windows\UsrClass.dat Object is locked skipped C:\Documents and Settings\NetworkService\Local Settings\Application Data\Microsoft\Windows\UsrClass.dat.LOG Object is locked skipped C:\Documents and Settings\NetworkService\Local Settings\History\History.IE5\index.dat Object is locked skipped C:\Documents and Settings\NetworkService\Local Settings\Temporary Internet Files\Content.IE5\index.dat Object is locked skipped C:\Documents and Settings\NetworkService\NTUSER.DAT Object is locked skipped C:\Documents and Settings\NetworkService\ntuser.dat.LOG Object is locked skipped C:\Documents and Settings\user\Application Data\Teleca\Telecalib\Logging\Application logs\SpecificUSB_log.txt Object is locked skipped C:\Documents and Settings\user\Cookies\index.dat Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Messenger\[email protected]\SharingMetadata\Logs\Dfsr00005.log Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Messenger\[email protected]\SharingMetadata\pending.dat Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Messenger\[email protected]\SharingMetadata\Working\database_E0B0_65CA_B065_A82C\dfsr.db Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Messenger\[email protected]\SharingMetadata\Working\database_E0B0_65CA_B065_A82C\fsr.log Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Messenger\[email protected]\SharingMetadata\Working\database_E0B0_65CA_B065_A82C\fsrtmp.log Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Messenger\[email protected]\SharingMetadata\Working\database_E0B0_65CA_B065_A82C\tmp.edb Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Windows\UsrClass.dat Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Windows\UsrClass.dat.LOG Object is locked skipped C:\Documents and Settings\user\Local Settings\Application Data\Microsoft\Windows Live Contacts\[email protected]\real\members.stg Object is locked skipped C:\Documents and Settings\user\Local Settings\History\History.IE5\index.dat Object is locked skipped C:\Documents and Settings\user\Local Settings\Temp\~DFA989.tmp Object is locked skipped C:\Documents and Settings\user\Local Settings\Temp\~DFA994.tmp Object is locked skipped C:\Documents and Settings\user\Local Settings\Temporary Internet Files\Content.IE5\index.dat Object is locked skipped C:\Documents and Settings\user\NTUSER.DAT Object is locked skipped C:\Documents and Settings\user\ntuser.dat.LOG Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBConfig.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBDebug.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBDetect.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBNotify.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBRefr.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBSetCfg.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBSetDev.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBSetLoc.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBSetUsr.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBStHash.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBStMSI.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\BBValid.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\SPPolicy.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\SPStart.log Object is locked skipped C:\Program Files\Common Files\Symantec Shared\SPBBC\LOGS\SPStop.log Object is locked skipped C:\Program Files\Symantec AntiVirus\SAVRT250NAV~.TMP Object is locked skipped C:\System Volume Information\MountPointManagerRemoteDatabase Object is locked skipped C:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP159\A0039546.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped C:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP160\A0039550.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped C:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP160\A0039589.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped C:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP161\change.log Object is locked skipped C:\WINDOWS\Debug\PASSWD.LOG Object is locked skipped C:\WINDOWS\SchedLgU.Txt Object is locked skipped C:\WINDOWS\SoftwareDistribution\ReportingEvents.log Object is locked skipped C:\WINDOWS\system32\CatRoot2\edb.log Object is locked skipped C:\WINDOWS\system32\CatRoot2\tmp.edb Object is locked skipped C:\WINDOWS\system32\config\AppEvent.Evt Object is locked skipped C:\WINDOWS\system32\config\default Object is locked skipped C:\WINDOWS\system32\config\default.LOG Object is locked skipped C:\WINDOWS\system32\config\SAM Object is locked skipped C:\WINDOWS\system32\config\SAM.LOG Object is locked skipped C:\WINDOWS\system32\config\SecEvent.Evt Object is locked skipped C:\WINDOWS\system32\config\SECURITY Object is locked skipped C:\WINDOWS\system32\config\SECURITY.LOG Object is locked skipped C:\WINDOWS\system32\config\software Object is locked skipped C:\WINDOWS\system32\config\software.LOG Object is locked skipped C:\WINDOWS\system32\config\SysEvent.Evt Object is locked skipped C:\WINDOWS\system32\config\system Object is locked skipped C:\WINDOWS\system32\config\system.LOG Object is locked skipped C:\WINDOWS\system32\h323log.txt Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\INDEX.BTR Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\INDEX.MAP Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\MAPPING.VER Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\MAPPING1.MAP Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\MAPPING2.MAP Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\OBJECTS.DATA Object is locked skipped C:\WINDOWS\system32\wbem\Repository\FS\OBJECTS.MAP Object is locked skipped C:\WINDOWS\Temp\hsperfdata_SYSTEM\1620 Object is locked skipped C:\WINDOWS\WindowsUpdate.log Object is locked skipped D:\autorun.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped D:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP159\A0039548.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped D:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP160\A0039552.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped D:\System Volume Information\_restore{BA1CB203-12D2-41FC-9E12-4ED509807510}\RP160\A0039591.inf Infected: Trojan-PSW.Win32.OnLineGames.pgs skipped Scan process completed. SVP dites moi quoi faire Merci

Merci gof j'ai mis tools cleaner en marche il a efface tout les programmes : hijackthis combofix diaghelp... j'ai perdu le rapport parceque je l'ai remis en marche(j'avais oublie de cliquer sur le nettoyer les fichiers temporaires..) donc le rapport que j'ai maintenant est inutile je pense pour kaspersky je suis en train d'effectuer le scan maintenant je poste le rapport des qu'il est pret merci