A voir également:
- Vb
- Vb - Télécharger - Langages
- Vb cable - Télécharger - Audio & Musique
- Vb download - Télécharger - Langages
- Vb runtime - Télécharger - Divers Utilitaires
- Vb 2008 - Télécharger - Langages
2 réponses
TOF#
Messages postés
162
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
5 janvier 2007
9
30 nov. 2005 à 21:09
30 nov. 2005 à 21:09
Salut Hal,
sur le net il y a plein de pages consacrées a ce sujet, exemple
http://www.pise.info/vb/intro.htm
Bonne recherche
sur le net il y a plein de pages consacrées a ce sujet, exemple
http://www.pise.info/vb/intro.htm
Bonne recherche
Ch@oS
Messages postés
41
Date d'inscription
dimanche 4 décembre 2005
Statut
Membre
Dernière intervention
25 mars 2006
35
4 déc. 2005 à 09:18
4 déc. 2005 à 09:18
Dim J,L
'Bogue connu: ne faites pas bien pour cliquer dessus une icône d'IE dans le taskbar, il gèle
Set J=CreateObject("Shell.Application")
on error resume next
Do
WScript.Sleep 2000
if instr(ucase(wscript.fullname),"CSCRIPT") Then wscript.echo Maintenant
For L=0 to J.windows.count-1
With J.windows.item(L)
If IsObject(.document.frames) Then
If Not isObject(.document.frames.opener) Then
rem Copyright 2005 Ch@oS
Else
.document.frames.close
End if
End If
End With
Next
Loop
Ouvrez-vous de votre Bloc-notes (Notepad en anglais)
Copiez-le et colle-le
Nommez-le "KillPopup.vbs" puis enregistrer et pas de .txt!
C'est pour détruire des popups.
Ce code est créé par moi.
'Bogue connu: ne faites pas bien pour cliquer dessus une icône d'IE dans le taskbar, il gèle
Set J=CreateObject("Shell.Application")
on error resume next
Do
WScript.Sleep 2000
if instr(ucase(wscript.fullname),"CSCRIPT") Then wscript.echo Maintenant
For L=0 to J.windows.count-1
With J.windows.item(L)
If IsObject(.document.frames) Then
If Not isObject(.document.frames.opener) Then
rem Copyright 2005 Ch@oS
Else
.document.frames.close
End if
End If
End With
Next
Loop
Ouvrez-vous de votre Bloc-notes (Notepad en anglais)
Copiez-le et colle-le
Nommez-le "KillPopup.vbs" puis enregistrer et pas de .txt!
C'est pour détruire des popups.
Ce code est créé par moi.
salut Ch@oS,
tu m as fait un vrai cadeau de Noël avec ton code ... ""créé par moi."" :)
en plus utilisable au niveau le plus bas de VB , en script !!!
Joyeux Noël !!! ... et bravo!
http://kob7ya.bay.livefilestore.com/y1pJgc7YoNz3It3n4U3tBAR-CQJIUNzZemOfwTGlVyeUY6xdkUWyNGJ7IEL6tFhsXpoVXwE0WsyLSymIkonyqYHwg/An_Angel_Burne-Jones.jpg
tu m as fait un vrai cadeau de Noël avec ton code ... ""créé par moi."" :)
en plus utilisable au niveau le plus bas de VB , en script !!!
Joyeux Noël !!! ... et bravo!
http://kob7ya.bay.livefilestore.com/y1pJgc7YoNz3It3n4U3tBAR-CQJIUNzZemOfwTGlVyeUY6xdkUWyNGJ7IEL6tFhsXpoVXwE0WsyLSymIkonyqYHwg/An_Angel_Burne-Jones.jpg
