Boa tarde,

o q estou fazendo de errado:

 

dim x as variant

eu acredito que seja pelo seguinte

dim x as variant

x = Shell("C:Arquivos de programas/Internet Explorer/iexplorer.exe ")

 

esta faltando as barras q separam os diretórios.

 

Olhe, aqui no VBWEB não são permitidas ( BARRAS )
é por isto que elas não são exibidas.

Knight, olhe....

Bom, eu tenho um exemplo aqui que é para localizar arquivos, espero que seja útil.

Adicone o código abaixo ao seu projeto e veja como funciona
Lembre-se, adicione um 'Label' no seu projeto antes.

On error goto erros
Dim MeuArquivo
Meuarquivo=dir("C:Arquivos de programasInternet Exploreriexplorer.exe")
MeuArquivo=dir

Label1.caption="Arquivo foi encontrado com sucesso."
Exit sub

erros:

Label1.caption="Arquivo não foi encontrado"

 

Espero que possa ter te ajudado.

Até mais,

Atenciosamente,
Marcus Vinícius

Se quiser entrar em contato comigo me envie um e-mail para Msmarcus@hotmail.com
Que em breve estarei entrando em contato contigo.