Wintoolz 2003

Soyez le premier à donner votre avis sur cette source.

Vue 5 808 fois - Téléchargée 329 fois

Description

Application fontionnant sous Windows 98 et Win 98se de 40ko et non sa pèse pas gros mais peux être utille pour ouvrir en un clique de souris sur un bouton ex:Ms-dos,Regedit,Msconfig,Telnet,Winipcfg.Charmap et etc.. en toutes 22 command sous Windows98.C'est la premiere fois que j'en fini un program :)

Source / Exemple :


Private Sub Cmdboot_Click()
Beep
MsgBox ("Fermeture de vôtre ordinateur en cours..."), vbOKOnly + vbInformation, "Shutdown Computer!"
Shell ("c:\windows\rundll32.exe user.exe,exitWindows")
End Sub

Private Sub cmdms_Click(Index As Integer)
MsgBox "Bienvenue sur Commande Ms-dos.", vbInformation + vbOKOnly, "Éxecute Commandes Ms-Dos."
Shell ("c:\windows\command.com"), vbNormalFocus
End Sub

Private Sub Cmdreg_Click(Index As Integer)
MsgBox "Bienvenue sur vôtre base de registre .", vbInformation + vbOKOnly, "Éxecute Regedit"
Shell ("c:\windows\regedit.exe"), vbNormalFocus
End Sub

Private Sub Cmdtelnet_Click(Index As Integer)
MsgBox "Bienvenue sur Telnet.", vbInformation + vbOKOnly, "Éxecute Telnet."
Shell ("c:\windows\telnet.exe"), vbNormalFocus
End Sub
Private Sub Command1_Click(Index As Integer)
MsgBox "Bienvenue sur MsConfig.", vbInformation + vbOKOnly, "Éxecute MsConfig."
Shell ("c:\windows\system\msconfig.exe"), vbNormalFocus
End Sub

Private Sub Command10_Click()
Shell ("C:\windows\Winipcfg.exe"), vbNormalFocus
End Sub

Private Sub Command11_Click()
Shell ("C:\WINDOWS\Pbrush.exe"), vbNormalFocus
End Sub

Private Sub Command12_Click()
Shell ("C:\windows\cdplayer.exe"), vbNormalFocus
End Sub

Private Sub Command13_Click()
Shell ("c:\windows\Kodakimg.exe"), vbNormalFocus
End Sub

Private Sub Command14_Click()
Shell ("C:\WINDOWS\SYSTEM\Dxdiag.exe"), vbNormalFocus
End Sub

Private Sub Command15_Click()
Shell ("c:\windows\charmap.exe"), vbNormalFocus
End Sub

Private Sub Command16_Click()
Shell ("C:\WINDOWS\wupdmgr.exe"), vbNormalFocus
End Sub

Private Sub Command17_Click()
Shell ("C:\Program Files\Outlook Express\msimn.exe"), vbNormalFocus
End Sub

Private Sub Command18_Click()
Shell ("C:\WINDOWS\Mplayer.exe"), vbNormalFocus
End Sub
Private Sub Command3_Click()
Shell ("C:\Program Files\Internet Explorer\iexplore.exe"), vbNormalFocus
End Sub

Private Sub Command4_Click()
Shell ("C:\windows\explorer.exe"), vbNormalFocus
End Sub

Private Sub Command5_Click()
Shell ("c:\windows\defrag.exe"), vbNormalFocus
End Sub

Private Sub Command6_Click()
Shell ("C:\windows\Scandskw.exe"), vbNormalFocus
End Sub

Private Sub Command7_Click()
Shell ("C:\windows\write.exe"), vbNormalFocus
End Sub

Private Sub Command8_Click()
Shell ("C:\windows\notepad.exe"), vbNormalFocus
End Sub

Private Sub Command9_Click()
Shell ("C:\windows\winfile.exe"), vbNormalFocus
End Sub

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
58
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
15 novembre 2006

ca pe etre sympa pour win98 mais ca serai mieu pour win2k ke ca lance la defrag automatiquement pour pouvoir le mettre en tache planifiée...
Messages postés
121
Date d'inscription
vendredi 27 octobre 2000
Statut
Membre
Dernière intervention
29 novembre 2006

sa sert a koi ??
autant faire demarrer>executer>...
Messages postés
269
Date d'inscription
jeudi 26 septembre 2002
Statut
Membre
Dernière intervention
19 février 2015

ça fait vraiment pitié ton appli!!!!
fff!Quelle merde!!!!
Moi j'ai Xp, et ça marche absolument pas en plus!!!
Et puis franchement Shell "C:WINDOWS
otepad.exe"
IL SUFFIT DE FAIRE Shell "Notepad.exe" comme c'est un file system!!!
Messages postés
84
Date d'inscription
samedi 25 mai 2002
Statut
Membre
Dernière intervention
19 janvier 2004

config ferme la et fait mieux ,...
Messages postés
27
Date d'inscription
jeudi 11 avril 2002
Statut
Membre
Dernière intervention
5 juillet 2002

C'est un peu simple tu trouve pas ??
mXsecurity
Afficher les 7 commentaires

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.