| View previous topic :: View next topic |
| Author |
Message |
X-Tools Valued Contributor

Joined: 20 Sep 2001 Posts: 296 Location: Germany
|
Posted: Wed Jan 14, 2004 4:42 pm Post subject: Getting tasklist of a remote computer |
|
|
Hi,
does somebody know a way to get the tasklist of a remotecomputer ?
Can it be read from the registry using tommy's vdsreg.dll ?
Bye, Fabian |
|
| Back to top |
|
 |
Vic D'Elfant Past Contributor


Joined: 26 Jun 2002 Posts: 673 Location: The Netherlands
|
Posted: Wed Jan 14, 2004 7:13 pm Post subject: |
|
|
You could establish a tcp-connection between the two pcs (using vdsipp.dll or vdsinet.dll), and then send the contents of 'list winlist, 1' to the other computer
See the two script below:
SERVER (receiver)
| Code: |
#define command,internet
#define function,internet
option scale,96
option fieldsep,|
option decimalsep,.
external vdsipp.dll,DEMO
title Tcp-Server Example
list create, 1
rem ** Turn NULL Character replacement ON **
INTERNET REPLACENULL, ON
rem ** CREATE TCP-SERVER 1 and ACTIVATE it on port 2 **
INTERNET TCP-SERVER,CREATE,1
INTERNET TCP-SERVER,ACTIVATE,1,2
:TCP-SERVER1ONDISCONNECT
:TCP-SERVER1ONCONNECT
:evloop
wait event
goto @event()
:TCP-SERVER1ONMESSAGE
%%Msg = @internet(tcp-server, message, 1)
if @equal(%%Msg, done)
info Received:@cr()@text(1)
goto close
else
list add, 1, %%Msg
end
goto evloop
:CLOSE
rem ** Always destroy the server protocols before exiting
rem your script, to prevent from errors and crashes **
INTERNET TCP-SERVER,DEACTIVATE,1
INTERNET TCP-SERVER,DESTROY,1
exit
|
CLIENT (sender)
| Code: |
#define command,internet
#define function,internet
list create, 1
option scale,96
option fieldsep,|
option decimalsep,.
external vdsipp.dll,DEMO
title Tcp Example
rem ** Turn NULL Character replacement ON **
INTERNET REPLACENULL, ON
rem ** CREATE TCP Client 1 and turn Threads ON **
INTERNET TCP,CREATE,1
INTERNET TCP,THREADS,1,ON
INTERNET TCP,CONNECT,1,localhost,2
:TCP1ONDISCONNECT
:evloop
wait event
goto @event()
:TCP1ONCONNECT
list winlist, 1
list seek, 1, 0
repeat
internet tcp, send, 1, @item(1)
if @not(@equal(@count(1), @succ(@index(1))))
list seek, 1, @succ(@index(1))
else
internet tcp, send, 1, done
%%Done = 1
end
wait "0.2"
until %%Done
goto close
:CLOSE
rem ** Always destroy the client protocols before exiting
rem your script, to prevent from errors and crashes **
INTERNET TCP,DESTROY,1
exit
|
You could give the two above scripts a try... I'm sure they aren't perfect yet, because I had no time to test them
Regards,
Vic _________________ phpBB Development Team |
|
| Back to top |
|
 |
FreezingFire Admin Team

Joined: 23 Jun 2002 Posts: 3508
|
Posted: Wed Jan 14, 2004 7:53 pm Post subject: |
|
|
Don't forget about the new LIST TASKLIST in VDS 5  _________________ FreezingFire
VDSWORLD.com
Site Admin Team |
|
| Back to top |
|
 |
X-Tools Valued Contributor

Joined: 20 Sep 2001 Posts: 296 Location: Germany
|
Posted: Thu Jan 15, 2004 6:18 am Post subject: |
|
|
good idea  |
|
| Back to top |
|
 |
Garrett Moderator Team
Joined: 04 Oct 2001 Posts: 2149 Location: A House
|
Posted: Thu Jan 15, 2004 6:20 am Post subject: |
|
|
If you are just looking for program that only show up on the task bar,
then here's a little bit of code from my site:
http://garrett.vdsworld.com/vds5.html#GT-API_GetTaskBarWindows
-Garrett _________________ 'What you do not want done to yourself, do not do to others.' - Confucius (550 b.c. to 479 b.c.) |
|
| Back to top |
|
 |
X-Tools Valued Contributor

Joined: 20 Sep 2001 Posts: 296 Location: Germany
|
Posted: Thu Jan 15, 2004 7:34 am Post subject: |
|
|
| I am interested, but your downloadlink is dead. |
|
| Back to top |
|
 |
Garrett Moderator Team
Joined: 04 Oct 2001 Posts: 2149 Location: A House
|
Posted: Thu Jan 15, 2004 9:31 am Post subject: |
|
|
Grrrrrrr...... Freaking case sensative linux servers! Well, it was my fault
for forgetting that I had my ftp program setup to lower case all uploads.
http://garrett.vdsworld.com/files/codes/vds5/gt-api_gettaskbarwindows.zip
Try that. _________________ 'What you do not want done to yourself, do not do to others.' - Confucius (550 b.c. to 479 b.c.) |
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You can attach files in this forum You can download files in this forum
|
|