Articles of vbscript

retornar somente os dígitos de 0 a 9 de uma string

Eu preciso de uma expressão regular que eu possa usar no VBScript e .NET que retornará apenas os números que são encontrados em uma seqüência de caracteres. Por exemplo, qualquer uma das seguintes “strings” deve retornar apenas 1231231234 123 123 1234 (123) 123-1234 123-123-1234 (123)123-1234 123.123.1234 123 123 1234 1 2 3 1 2 3 […]

ByRef e ByVal no VBScript

Estou enfrentando algo estranho no VBScript. Ao escrever um procedimento em que eu quero que o parâmetro seja passado por referência, a maneira de chamar este procedimento muda a forma como o parâmetro é passado! Aqui está um exemplo : Sub IncrementByRef(ByRef Value) Value = Value + 1 End Sub Sub IncrementByVal(ByVal Value) Value = […]

ADODB.Parameters error ‘800a0e7c’ O object de parâmetro está definido incorretamente. Informações inconsistentes ou incompletas foram fornecidas

Eu sou principalmente um desenvolvedor PHP, mas eu tenho um antigo ASP um dos nossos desenvolvedores anteriores que quebrou e não consigo descobrir como consertá-lo. Temos um programa que envia algumas variables ​​para uma página do listener que compara esses dados aos códigos de registro de um database msSQL e, em seguida, informa ao programa […]

Como fazer uma consulta SQL parametrizada no ASP clássico?

Alguém pode me mostrar a maneira mais simples de executar uma consulta SQL parametrizada usando ASP clássico em VBscript? Um exemplo compilável seria o melhor.

Código VBscript para capturar stdout, sem mostrar a janela do console

Este é um exemplo de código VBScript que mostra como capturar o que um programa de linha de comando envia para a saída padrão. Executa o comando xcopy /? e mostra a saída em uma checkbox de mensagem. Antes que a checkbox de mensagem apareça, por um segundo você verá a janela do console aparecendo. […]

Chamando o serviço WCF pelo VBScript

Existe um serviço WCF com configuração: Este script deve chamá-lo: Option Explicit Dim soapClient Dim serviceUri Dim serviceName Dim portName Dim result serviceUri = “http://localhost:8001/MyService” serviceName = “MyService” portName = “BasicHttpBinding_IMyService” Set soapClient = CreateObject(“MSSOAP.soapClient”) soapClient.ClientProperty(“ServerHTTPRequest”) = True soapClient.mssoapinit serviceUri & “?WSDL”, serviceName, portName Ao executar o script, este erro aparece: Cliente: WSDLReader: Analisando o […]

Lançar programas cujo caminho contenha espaços

Eu preciso lançar programas no meu sistema local usando o VBScript. Mas estou tendo problemas com a syntax. Isso é o que estou usando agora – Dim objShell Set objShell = WScript.CreateObject( “WScript.Shell” ) objShell.Run(“iexplore”) Set objShell = Nothing O código acima inicia com sucesso o IE. Eu quero lançar outros navegadores. Mas, se eu […]

Executando a linha de comando silenciosamente com o VbScript e obtendo a saída?

Eu quero ser capaz de executar um programa através da linha de comando e quero iniciá-lo com VbScript. Eu também quero obter a saída da linha de comando e atribuí-lo a uma variável e eu quero tudo isso para ser feito silenciosamente sem janelas cmd aparecendo. Eu consegui duas coisas separadamente, mas não juntas. Aqui […]

Criando checkbox de listview de seleção múltipla no VBScript

Eu quero criar um VBScript (não dentro de um arquivo HTML) que dá ao usuário uma lista de documentos para selecionar, em seguida, usa as seleções para executar outro script para cada documento que escolheram. Já faz muito tempo desde que trabalhei com o VBScript … Como faço para criar essa checkbox de listview? Chris

Ocultar janela de prompt de comando ao usar Exec ()

Eu estou tentando executar este script de teste simples, mas uma janela de shell de comando está aparecendo depois de eu executar o script: Set objShell = WScript.CreateObject(“WScript.Shell”) strCommand = “cmd /C tasklist” Set objExecObject = objShell.Exec(strCommand) wscript.echo “Test” Como posso evitar que isso apareça? Atualizar Consegui melhorar com esta alteração de código: strCommand = […]