Vendo se um processo está sendo executado?

[grandchamp 0]

Fala galera!

Estou tentando fazer uma pagina que verifica se um certo executavel está sendo executado no servidor caso esteja ele me retorna "Está sendo executado" caso contrário "Não está sendo executado". Só que o meu maior problema é fazer o ASP ver se o processo está sendo executado, para isso eu fiz uma dll em VB6, e na Sub Server() coloquei o seguinte código:

Dim p
Dim lista
Dim s
Dim executavel As String
Dim textohtml As String
executavel = "nomedoprocesso.exe"
Set lista = GetObject("winmgmts:").InstancesOf("Win32_Process")
For Each p In lista
	s = p.Name
	If s = executavel Then
	Exit For
	End If
Next
If s <> executavel Then
	textohtml = "O executavel não está sendo executado"
Else
	textohtml = "Executavel está sendo executado!"
End If
Response.Write textohtml

Lembrando que o projeto tem todas as referencias para o ASP.

Executando este mesmo código em um .exe roda normalmente e ele me lista o processo necessario. Agora em asp em cada execução ele me da um erro, na primeira execução me retorna o erro:

"A chamada de procedimento remoto falhou e não foi executada."

E na segunda execução me retorna

verificador erro '80041003'

Automation error

/teste2.asp, line 3"

Tem algum outro componente ou algum outro jeito para verificar se o processo está aberto no servidor?

Obrigado desde já.

[jrcardozo 4]

veja este topico

http://forum.imasters.com.br/lofiversi...hp/t196963.html

 

pelo visto você não está setando corretamente sua dll. Registre ela no servidor e faça o teste conforme as dicas do link acima

[grandchamp 0]

Creio que problema de registrar ela no servidor não é, ja dei um regsvr32 na dll. Existe algum outro jeito de verificar se o processo está sendo executado?