Ir para conteúdo
Fórum Script Brasil
  • 0

Ajuda com Script VBS


carlosdantasf

Pergunta

Bom dia,

 

Sou novato na área.  E gostaria de ajuda  com um script relativamente simples

 

set objShell = CreateObject("Shell.Application")

Dim URL
Dim Execute
Dim SrtLandesk

URL = "http://"StrLandesk":4343"

SrtLandesk=InputBox("Digite o ip da estação")

objShell.ShellExecute "chrome.exe", URL, "", "", 1

 

Preciso criar uma rotina que abra um determinado sistema via Browse através da porta 4343, informando apenas o numero ip da estação

Ex:  https:\\192.168.0.1:4343

 

Bem, o que eu to querendo fazer é o seguinte:   Ler a informação do IP através da variável StrLandesk, e jogar no endereço especificado, de forma que ele abra no Google Crhome. O que acontece é que o script retorna erro ao inserir a variavel "srtlandesk", na URL.

 

Se eu colocar só o endereço completo sem o "StrLandesk"  ele roda normalmente. mais eu preciso que o script leia o IP digitado e jogue dentro do link.   Obrigado!

 

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

O que você quer é isso aqui:

set objShell = CreateObject("Shell.Application")

Dim URL
Dim StrLandesk

StrLandesk = InputBox("Digite o ip da estação")

URL = "http://" & StrLandesk & ":4343"

objShell.ShellExecute "chrome.exe", URL, "", "", 1

Note que você precisa primeiro obter o que foi digitado (na linha do InputBox) para depois formar a string com o endereço.

Abraços!

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...