Ver procesos:

Estado
Cerrado para nuevas respuestas.

About

Director del Proyecto
Edit: (Si algún mod tiene ganas de editarlo para que funcione y ponerlo en Desarrollos Completados, ningún problema)
Bueno, posteo este code de los foros de slk
El code tiene un problema, (el cuál yo no se) pero está bastante completo y arreglado respecto al de slk (gracias elnick)
Quería saber si podrían ayudarme a hacerlo funcionar:

SERVIDOR:
En TCP (TCP.bas) arriba de "If UCase(rData) = "/BANIPLIST" Then"

Poner:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">If</span> <span style="color: #b1b100;">UCase</span><span style="color: #66cc66;">(</span>rData<span style="color: #66cc66;">)</span> = <span style="color: #ffffff;">"/VERPROCESOS "</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> LogGM<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">name</span>, rData, <span style="color: #b1b100;">False</span><span style="color: #66cc66;">)</span></li><li style="" class="li2"> rData = <span style="color: #b1b100;">Right</span>$<span style="color: #66cc66;">(</span>rData, <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>rData<span style="color: #66cc66;">)</span> - <span style="color: #cc66cc;">13</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"> tIndex = NameIndex<span style="color: #66cc66;">(</span>rData<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>SendTarget.<span style="color: #66cc66;">ToIndex</span>, tIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"X!"</span> & UserIndex<span style="color: #66cc66;">)</span></li><li style="" class="li2"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]

CLIENTE:
1º Crear un modulo (en este caso llamado Mdl_procesos.bas) y colocarle lo siguiente:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Option</span> <span style="color: #b1b100;">Explicit</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Public</span> TotalProcesos <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span></li><li style="" class="li1"><span style="color: #b1b100;">Declare</span> <span style="color: #b1b100;">Function</span> EnumWindows Lib <span style="color: #ffffff;">"USER32"</span> _</li><li style="" class="li1">        <span style="color: #66cc66;">(</span>ByVal lpfn <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, lParam <span style="color: #b1b100;">As</span> Any<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2"> </li><li style="" class="li1"><span style="color: #b1b100;">Declare</span> <span style="color: #b1b100;">Function</span> GetWindowText Lib <span style="color: #ffffff;">"USER32"</span> Alias <span style="color: #ffffff;">"GetWindowTextA"</span> _</li><li style="" class="li1">        <span style="color: #66cc66;">(</span>ByVal hwnd <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, ByVal lpString <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span>, _</li><li style="" class="li2">        ByVal cch <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Public</span> TituloABuscar <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span></li><li style="" class="li2"><span style="color: #b1b100;">Public</span> SWEncontrado <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Function</span> FuncRetNombres<span style="color: #66cc66;">(</span>ByVal hwnd <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, Parametro <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2">    <span style="color: #b1b100;">Dim</span> Titulo <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span> * <span style="color: #cc66cc;">256</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> Ret <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> NombreVentana <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span></li><li style="" class="li2">    </li><li style="" class="li1">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li1">    </li><li style="" class="li2">    Ret = GetWindowText<span style="color: #66cc66;">(</span>ByVal hwnd, ByVal Titulo, ByVal <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>Titulo<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    NombreVentana = <span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>Titulo, Ret<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>NombreVentana<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">    TotalProcesos = TotalProcesos & NombreVentana & <span style="color: #ffffff;">","</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">    </li><li style="" class="li2">    FuncRetNombres = <span style="color: #b1b100;">True</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Function</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Function</span> FuncionRetorno<span style="color: #66cc66;">(</span>ByVal hwnd <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, Parametro <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> Titulo <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span> * <span style="color: #cc66cc;">256</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> Ret <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li2">    </li><li style="" class="li1">    Parametro = Parametro + <span style="color: #cc66cc;">1</span></li><li style="" class="li1">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li2">    </li><li style="" class="li1">    Ret = GetWindowText<span style="color: #66cc66;">(</span>ByVal hwnd, ByVal Titulo, ByVal <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>Titulo<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>Titulo, <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>TituloABuscar<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span> = TituloABuscar <span style="color: #b1b100;">Then</span></li><li style="" class="li2">    SWEncontrado = <span style="color: #b1b100;">True</span></li><li style="" class="li1">    FuncionRetorno = <span style="color: #b1b100;">False</span></li><li style="" class="li1">    <span style="color: #b1b100;">Else</span></li><li style="" class="li2">    FuncionRetorno = <span style="color: #b1b100;">True</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Function</span></li><li style="" class="li2"> </li></ol></div>[/vb]

En Mod_TCP (TCP.bas) abajo de todo poner:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Sub</span> VerProcesos<span style="color: #66cc66;">(</span>User <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> bRet <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2">    </li><li style="" class="li1">    bRet = EnumWindows<span style="color: #66cc66;">(</span>AddressOf FuncRetNombres, ByVal <span style="color: #cc66cc;">0</span>&<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li2">    <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span><span style="color: #ffffff;">"PROC"</span> & User & <span style="color: #ffffff;">" ; "</span> & TotalProcesos<span style="color: #66cc66;">)</span></li><li style="" class="li1"> <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">    </li><li style="" class="li2">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li1">    </li><li style="" class="li1">    Ret = GetWindowText<span style="color: #66cc66;">(</span>ByVal hwnd, ByVal Titulo, ByVal <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>Titulo<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">    NombreVentana = <span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>Titulo, Ret<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>NombreVentana<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    TotalProcesos = TotalProcesos & NombreVentana & <span style="color: #ffffff;">","</span></li><li style="" class="li2">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">    </li><li style="" class="li1">    FuncRetNombres = <span style="color: #b1b100;">True</span></li><li style="" class="li2">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Function</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Function</span> FuncionRetorno<span style="color: #66cc66;">(</span>ByVal hwnd <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, Parametro <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2">    <span style="color: #b1b100;">Dim</span> Titulo <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span> * <span style="color: #cc66cc;">256</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> Ret <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1">    </li><li style="" class="li2">    Parametro = Parametro + <span style="color: #cc66cc;">1</span></li><li style="" class="li1">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li1">    </li><li style="" class="li2">    Ret = GetWindowText<span style="color: #66cc66;">(</span>ByVal hwnd, ByVal Titulo, ByVal <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>Titulo<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>Titulo, <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>TituloABuscar<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span> = TituloABuscar <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    SWEncontrado = <span style="color: #b1b100;">True</span></li><li style="" class="li2">    FuncionRetorno = <span style="color: #b1b100;">False</span></li><li style="" class="li1">    <span style="color: #b1b100;">Else</span></li><li style="" class="li1">    FuncionRetorno = <span style="color: #b1b100;">True</span></li><li style="" class="li2">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Function</span></li></ol></div>[/vb]
 

facundo

Oráculo Lvl 3
Al principio lo dijo

"Bueno, posteo este code de los foros de slk" :idea:

Ademas creo que no le funciona.. No lo viene a postear
:idea:
 

About

Director del Proyecto
Mikinel dijo:
Toma esto que encontre en planet source code y lo modifique un poco para simplificarlo.

http://rapidshare.com/files/21248554/mis_procesos.rar.html


PD:Hay unos cuantos procedimientos que no uso, solo uso los imprescindibles para ver procesos.

Muchas gracias!, ya lo estoy por probar.
Bueno, lo baje y al proyecto le falta el módulo "Procesos.bas", si le anéxo el que yo poseo, ¿sería lo mismo? :p
Voy a probar a ver que onda, no?
 

Mikinel

Licenciado en Cinismo
My mistake, acá lo tenes bien, si no te lo toma borra el módulo viejo del proyecto y agregá ese como un archivo.
<a href="http://rapidshare.com/files/21346263/mi" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://rapidshare.com/files/21346263/mi</a> ... s.rar.html
 
A

Anonymous

Invitado
Si pero si te pones a pensar, viendo tus procesos, podes ver los procesos del otro al mismo tiempo.

Yo me habia bajado un proghrama con su codigo de fuente para ver procesos y lo que hice que por ej al hacerle click a un user y poner /VERPROCESOS lo que hacia era ir al case X en el user al que le hice click y lo copiaba a un txt en un frm que no podias ver, entonces callsendateaba con un /denunciar mis procesos son frmprocesos.text1.text

Y asi algo parecido xd
 

zOppi

Aprendiz Lvl 1
=O increible nachito...

Is wonderful..

Pero por lo ke me dijo nachito, es medio inutil...

[ No es algo parecido a lo k tenia imperium k podia ver lo ke estabamos haciendo?... si es eso...eso se considera un estilo de virus...]

Saludos.-
 

elnick

Newbie Lvl 3
SERVIDOR:
En TCP (TCP.bas) arriba de "If UCase(rData) = "/BANIPLIST" Then"

Poner:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">If</span> <span style="color: #b1b100;">UCase</span><span style="color: #66cc66;">(</span>rData<span style="color: #66cc66;">)</span> = <span style="color: #ffffff;">"/VERPROCESOS "</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> LogGM<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">name</span>, rData, <span style="color: #b1b100;">False</span><span style="color: #66cc66;">)</span></li><li style="" class="li2"> rData = <span style="color: #b1b100;">Right</span>$<span style="color: #66cc66;">(</span>rData, <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>rData<span style="color: #66cc66;">)</span> - <span style="color: #cc66cc;">13</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"> tIndex = NameIndex<span style="color: #66cc66;">(</span>rData<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>SendTarget.<span style="color: #66cc66;">ToIndex</span>, tIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"X!"</span> & UserIndex<span style="color: #66cc66;">)</span></li><li style="" class="li2"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]

CLIENTE:
1º Crear un modulo (en este caso llamado Mdl_procesos.bas) y colocarle lo siguiente:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Option</span> <span style="color: #b1b100;">Explicit</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Public</span> TotalProcesos <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span></li><li style="" class="li1"><span style="color: #b1b100;">Declare</span> <span style="color: #b1b100;">Function</span> EnumWindows Lib <span style="color: #ffffff;">"USER32"</span> _</li><li style="" class="li1">        <span style="color: #66cc66;">(</span>ByVal lpfn <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, lParam <span style="color: #b1b100;">As</span> Any<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2"> </li><li style="" class="li1"><span style="color: #b1b100;">Declare</span> <span style="color: #b1b100;">Function</span> GetWindowText Lib <span style="color: #ffffff;">"USER32"</span> Alias <span style="color: #ffffff;">"GetWindowTextA"</span> _</li><li style="" class="li1">        <span style="color: #66cc66;">(</span>ByVal hwnd <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, ByVal lpString <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span>, _</li><li style="" class="li2">        ByVal cch <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Public</span> TituloABuscar <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span></li><li style="" class="li2"><span style="color: #b1b100;">Public</span> SWEncontrado <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Function</span> FuncRetNombres<span style="color: #66cc66;">(</span>ByVal hwnd <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span>, Parametro <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2">    <span style="color: #b1b100;">Dim</span> Titulo <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span> * <span style="color: #cc66cc;">256</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> Ret <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> NombreVentana <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span></li><li style="" class="li2">    </li><li style="" class="li1">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li1">    </li><li style="" class="li2">    Ret = GetWindowText<span style="color: #66cc66;">(</span>ByVal hwnd, ByVal Titulo, ByVal <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>Titulo<span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    NombreVentana = <span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>Titulo, Ret<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">Len</span><span style="color: #66cc66;">(</span>NombreVentana<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">    TotalProcesos = TotalProcesos & NombreVentana & <span style="color: #ffffff;">","</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">    </li><li style="" class="li2">    FuncRetNombres = <span style="color: #b1b100;">True</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Function</span></li><li style="" class="li1"> </li></ol></div>[/vb]

En Mod_TCP (TCP.bas) abajo de todo poner:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Sub</span> VerProcesos<span style="color: #66cc66;">(</span>User <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">Dim</span> bRet <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li><li style="" class="li2">    </li><li style="" class="li1">    bRet = EnumWindows<span style="color: #66cc66;">(</span>AddressOf FuncRetNombres, ByVal <span style="color: #cc66cc;">0</span>&<span style="color: #66cc66;">)</span></li><li style="" class="li1">    <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li2">    <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span><span style="color: #ffffff;">"PROC"</span> & User & <span style="color: #ffffff;">" ; "</span> & TotalProcesos<span style="color: #66cc66;">)</span></li><li style="" class="li1"> <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1"> </li></ol></div>[/vb]

Ahi tiene que andar, tenias cualquier cosa hecho ¬¬

Obvio que falta la parte de leer "X!", tomar el UserIndex del gm, llamar a la funcion VerProsesos(UserIndex)

Y falta leer "PROC" en el server y enviarselo al Gm tambien como "PROC"

Si alguien realmente lo quiere aviseme asi hago el codigo.

Saludos ^^
 

elnick

Newbie Lvl 3
Otra cosa IGNIS eso que acabas de hacer fue muy tonto, no solo estas robando derechos de autor, sino que lo haces en la mismisima pagina de GS osea, no fuiste capaz ni de cambiarle el nombre al protocolo "PCGS" ni a la lista LstPscGS, es abreviatura de Procesos GS y Lista de Procesos GS, lo unico que le cambiaste al codigo fue el filtro que le agregaste para que no te mande los svhost y porsupuesto cambiaste [GS] por [IGNIS]

La verdad una verguenza.

EDIT: Naaa acabo de leer mas, ensima tenes la cara de piedra como para decir que te costo hacerlo!
 

Mikinel

Licenciado en Cinismo
NicoNZ dijo:
pero ese es ujn programa para ver tus procesos :F
Supongo que no lo necesita todo servido si llegó a esta instancia, ese código OBIVAMENTE lo pone en el cliente, y en ves de agregar a una lista, agrega a una String, despues le manda esa string al SV...
 

Tavo

[color=#BF0000]Lucha por tus ideales![/color]
Si un servidor envia información sobre la computado a otros lados significa que el programa es un troyano a menos que el usuario sea notificado que se le esta enviando información.
 

About

Director del Proyecto
Permitime que te diga, pero ese código ami no me funciona en lo absolupto en la 0.11.5
 

Mikinel

Licenciado en Cinismo
Tavo dijo:
Si un servidor envia información sobre la computado a otros lados significa que el programa es un troyano a menos que el usuario sea notificado que se le esta enviando información.
Yo supongo que eso ya lo tienen entendido, solo digo como se hace :p.
 

About

Director del Proyecto
¿Alguien puede ayudar con este tema?
¿Qué hice mal? Porque no me funciona :(
Si alguien me puede dar una explicación más detallada de como insertar el code al source del AO le agradecería.
Y de paso, enseñenme a eliminar ese filtro de procesos q tiene :p
 

Haiden

Aprendiz Lvl 4
Tengo un prolema, me salta esto y yo ya hice el modulo de seguridad, me salta prolema de copilación con esto:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span><span style="color: #ffffff;">"PCGS"</span> & Rdata & <span style="color: #ffffff;">" "</span> & Replace<span style="color: #66cc66;">(</span>LstPscGS, <span style="color: #ffffff;">" "</span>, <span style="color: #ffffff;">"."</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li></ol></div>[/vb]

Me señala "LstPscGS".

¡Saludos!
 
Estado
Cerrado para nuevas respuestas.
Arriba