Sous Vista ok sous xp ça ne marche pas

Question

Bonjour,

j'ai un soucie avec un vbs 
moi je suis sous vista mon script marche sans soucis, un ami sous xp erreu ligne 18, alors que le fichier est present

voici le script

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
 & "{impersonationLevel=impersonate}\" _
 & strComputer &"\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = 'cmd.exe'")
For Each objProcess in colProcessList
objProcess.Terminate()
Set objWMIService = Nothing
Set colProcessList = Nothing
Next
If MsgBox (""&VbCrLf&"Une ou plusieurs infections détectées!"&VbCrLf&" "& _ 
  VbCrLf&"  Merci d'avoir utilisé GenProc"&VbCrLf&" "& _ 
  VbCrLf&"-Cliquez sur Oui si vous vous faîtes aider sur un forum." & _
VbCrLf&"-Cliquez sur Non si vous vous debrouillez tout seul.",vbYesNo+  Vbquestion,"GenProc") = vbYes Then
dim WShshell
Set WShshell = WScript.CreateObject("WScript.Shell") 
Wshshell.Run "C:\Users\***\Desktop\GenProc\outil\GenProc14.txt",3,true
Set WShshell = Nothing
Dim oFSO 
Set oFSO = CreateObject("Scripting.FileSystemObject") 
oFSO.CopyFile ("C:\Users\***\Desktop\GenProc\outil\GenProc14.txt") , ("C:\Users\***\Desktop\GenProc14.txt") , true 
Set oFSO = Nothing
else
Dim IE
Set IE = Wscript.CreateObject("InternetExplorer.Application")
IE.navigate"C:\Users\***\Desktop\GenProc\Page\GenProc.html"
IE.Visible = 1
Set IE = Nothing
Dim Shell, DesktopPath, URL
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set URL = Shell.CreateShortcut(DesktopPath & "\GenProc.URL")
URL.TargetPath = "C:\Users\***\Desktop\GenProc\Page\GenProc.html"
URL.Save 
Set Shell = Nothing
End If

une idée
merci bcp!

cs_casy · Answer

Es-tu sur de ton chemin "C:\Users\***\....."

Je ne sais pas sous Vista, mais sous XP les dossiers utilisateurs sont dans "C:\Documents and Settings\***\...."

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

narco4 · Answer

slt
oui je suis sur ce vbs et creé par un batch qui tourne sur xp et vista
donc les bon chemins a chaque fois.

gillardg · Answer

Bonjour,

la ligne 
WScript.CreateObject("WScript.Shell")  
peut provoquer une erreur selon le degré de sécurité d'internet explorer

a+

narco4 · Answer

slt,

merci, mais comment passer outre?

gillardg · Answer

Bonjour,

il faut changer les parramètres de sécurité de internet explorer , ce qui est fortement déconseillé

a+

narco4 · Answer

Slt,

tu es sous xp?
si oui pourrai-tu me dire si ce script marche chez toi stp ?
merci!

gillardg · Answer

Bonjour,

non ça ne marche pas 

a+

us_30 · Answer

Bonjour,

Le message d'erreur est clair :

Fichier spécifié introuvable
Source : null !!!

En clair, le chemin est invalide... Ceci n'a rien à voir avec la version de Windows.

Amicalement,
Us.

narco4 · Answer

slt,

merci oui ça marche si je met exemple
Wshshell.Run "C:\GenProc14.txt",3,true

comment je peut faire pour des chemins plus long?
merci

us_30 · Answer

En première idée, je pense que "/***/" ne peut pas représenter un chemin... donc mettre une syntaxe complète...

Amicalement,
Us.

narco4 · Answer

lol
les *** etait pour cacher mon prenom

us_30 · Answer

c'est sur...

Amicalement,
Us.

dopeko · Answer

Salut,

J'ai aussi créer un petit programme en C# par contre et j'ai pu remarquer que la classe Win32_Process ne fonctionne pas sous XP !! Etant donné que tu l'utilise ici il y a de fortes chances que c'est de là que vient le problème. Je me promène en ce moment dans les catacombes du net pour trouver la solution

gillardg · Answer

Bonjour,

c'est quoi la classe "Win32_Process" ???
ça vient de quel framework???

a+

Renfield · Answer

WMI

gillardg · Answer

Bonjour,

@dopeko c'est pas ça l'erreur ,je suis sous XP et l'erreur que j'ai! c'est 




Set




 WShshell = WScript.CreateObject(


"WScript.Shell"

) 

impossible de créer l'objet .
comme je l'ai signalé dansun post précédent c'est un problème du aux parramètres de sécurité d'internet explorer

si ce truc est activé n'importe quelle page html peutéffacer des fichiers sur ton ordi !!!
surtout avec l'infâme CreateObject(

"Scripting.FileSystemObject") 
a+

Sous Vista ok sous xp ça ne marche pas

16 réponses

Votre réponse

Discussions similaires