Vb

hal -  
 Aladin -
je souhaite bien avoir une connaissance en visuel basic alors je voudrai un petit cou de pouce.

2 réponses

  1. Ch@oS Messages postés 46 Date d'inscription   Statut Membre 35
     
    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.
    0
    1. Aladin
       
      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
      0