PureBasic

Plusieurs méthodes existent pour récup la position d'un gadget, en voici une

p.point

If OpenWindow(0, 0, 0, 300, 200, "", #PB_Window_SystemMenu) And CreateGadgetList(WindowID(0))

ButtonGadget(0, 20, 20, 100, 30, "test")
TextGadget(1, 20, 50, 200, 20, "")

Repeat
Select WaitWindowEvent ...

Si tu connais la position aucun problème

Placement de la souris
SetCursorPos_(x, y)

Puis clic
ProcedureDLL MouseClick(Parameter) ; Simule une action sur les boutons de la souris (EX : MouseClick(#MOUSEEVENTF_RIGHTDOWN) : mouseclick(#MOUSEEVENTF_RIGHTUP))
Mem.l = GlobalAlloc_(0, 8 ...

Donc à priori 192... -> whois.arin.net

Mais bon tu devrais commencer par tester les ports ouverts

Même principe

If InitSprite() = 0
MessageRequester("Erreur", "Impossible d'ouvrir l'écran & l'environnement nécessaire aux sprites !", 0)
End
EndIf

If OpenWindow(0, 0, 0, 220, 160, "Un écran dans une fenêtre...", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
If CreateGadgetList(WindowID(0 ...

Exact Ar-s, et puis si comme tu le dis ils sont paranos. Dans mon ancienne boiîte, on avait même était jusqu'à filtrer les paquets, pour empêcher certains types d'applications un peu trop répandus qui passés par le port 80...

Pas de pb, c'est un forum d'entraide, n'hésites pas

Regarde la commande 'drawingmode'

If OpenWindow(0, 0, 0, 100, 100, "", #PB_Window_SystemMenu) And CreateGadgetList(WindowID(0))

If CreateImage(0, 100, 100)
StartDrawing(ImageOutput(0))
DrawingMode(#PB_2DDrawing_Outlined)
Circle(50, 50, 20, $00FF00)
StopDrawing()

ImageGadget(0, 0, 0, 100 ...

Tu récup l'ip de sorti, de ton entreprise (via par ex monip.org)

Si la aucune info
Tu prends le premier champ de l'ip et tu regardes, tu devrais pouvoir trouver la base de données correspondante, normalement RIPE pour l'europe
http://www.iana.org/assignments/ipv4-address-space/

Ensuite si c'est ...

Salut,

Dobro, il est vrai qu'un proxy de base est tout à fait transparent et ne sert qu'à re-diriger les paquets.

Mais dans le cas d'une entreprise, le but est un peu différent (proxy est-ce le bon terme KCC?) comme le précise KCC, il utilise client lotus qui se connecte à un serveur lotus interne ...

En me basant sur le tien j'en ai fait un autre dans le même style (à améliorer...)

Procedure.s SaveFileRequesterPlus(Title.s, Path.s, Pattern.s, PatternPosition.l, DefaultExtension.s="")
file$ = SaveFileRequester(title, path, Pattern, PatternPosition)
If Len(file$) >0
If FileSize(file$) >= 0 ...

Et bien il y a eu du boulot depuis que je suis passé, bravo!!!

Je viens de tester ça tourne impec

ça n'est pas la valeur exact, mais ça s'en rapproche faudrait tester nombre par nombre... ex avec ce type de code (non testé) et noter le résultat de chaque fenêtre en liaison avec son num... et en déduire le code de chaque paramètre (la flemme ;) et puis je veux pas mille fenêtres à l'écran)

If ...

J'avais aussi testé avec d'autres valeurs, histoire de voir si c'était pas le flag qui était faux et à priori si... , mais après pour trouver une doc...

Ex (Ubuntu Hardy) ça marche...
If OpenWindow(0, 100, 100, 400, 400, "")
a=258
OpenWindow(1, 0, 0, 200, 200, Str(a), a, WindowID(0))
Repeat ...

Effectivement, pas assez de mémoire pour finir l'opération???, bizarre comme erreur

lien vers MSDN

Je vois pas bien comment résoudre ça, aucune autre doc plus présice

Un peu de doc, en fait il faut passer par root\cimv2 et pas root\wmi...

donc un petit code rapide

Pour les class dispo :
http://msdn.microsoft.com/en-us/library/aa394084%28VS.85%29.aspx

Puis cliquer sur Win 32 classes (liste déroulante en haut) pour obtenir la structure et la description de la ...