Funções VBS

[Salgado 4]

Nesse tópico estaremos colocando as funções nativas do ASP com Visual Basic Scripting. Não tenham pressa e se quizerem contribuir estaremos de braços (e somente isso) abertos.

 

ABS(NUMERO)

Retorna o valor absoluto de um número (O argumento DEVE ser um valor numérico válido)

Dim MyNumber

MyNumber = Abs(50.3) 'Retorna 50.3.

MyNumber = Abs(-50.3) 'Retorna 50.3.

ARRAY(ListaDeArgumentos)

Cria uma matriz em uma variável não declarada como array. A cada valor da lista de argumentos deve estar separada por virgulas (",").

Dim A

A = Array(10,20,30)

B = A(2) 'B agora é igual à 30.

ASC(Caractere)

Retorna o código ANSI do caractere, caso coloque um texto será retornado o código do 1º caractere.

Dim MyNumber

MyNumber = Asc("A") ' Retorna 65.

MyNumber = Asc("a") ' Retorna 97.

MyNumber = Asc("Apple") ' Retorna 65.

ATN(NUMERO)

Retorna o ArcoTagente do numero. O argumento DEVE ser um valor numérico válido.

'Calculando PI usando o ATN

Dim pi

pi = 4 * Atn(1) 'Calcula o valor de PI.

 

Esse já estava no fórum:

Replace(Expressão, Encontrar, Substituir [,Início [,Quantidade [,Tipo de Comparação]]])

Expressão:

Obrigatório, texto que contenha o subtexto a ser substituido;

Encontrar:

Obrigatório, subtexto a ser procurado;

Substituir:

Obrigatório, texto ou caratere que entrará no lugar do subtexto a encontrar;

Início:

Opcional, posição de inicio da pesquisa. Se omitido o padrão assumido é 1;

Quantidade:

Opcional, numero de substituições e serem feitas. Se omitido o padrão assumido é -1 (fará todas as substituições possíveis);

Tipo de Comparação:

Opcional, valor numério para definir o tipo de comparação, 0 para Binária (exata, case sensitive) e 1 para Textual (pelo texto, case insensitive). Se omitido o padrão assumido é 0

[AMON-HÁ 0]

Bom, hoje eu vou falar sobre duas funções muito importante do VBS quando se trabalha com array.

SPLIT e JOIN.

 

[sPLIT]

Descrição: divide uma string num array.

Sintaxe: Split(Expressão[, Delimitador[, Quantidade[, Tipo de Comparação]]])

 

Expressão:

Obrigatório, string que será usada para a criação do array.

Delimitador:

Opcional, string ou caracter que será utilizado para identificar a substring que servirá de referência para a formação do array. Se omitido o padrão assumido é " ".

Quantidade:

Opcional, número de substrings a serem retornadas. Se omitido o padrão assumido é -1 (retornará todas as substrings possíveis);

Tipo de Comparação:

Opcional, valor numério para definir o tipo de comparação, 0 para Binária (exata, case sensitive) e 1 para Textual (pelo texto, case insensitive). Se omitido o padrão assumido é 0.

Dim MeuTexto

Dim MeuArray

MeuTexto = "Aprendendo VBSCRIPT com o AMON-HÁ"

MeuArray = Split(MeuTexto, " ", -1, 1)

 

' MeuArray(0) terá o valor "Aprendendo"

' MeuArray(1) terá o valor "VBSCRIPT"

' MeuArray(2) terá o valor "com"

' MeuArray(3) terá o valor "o"

' MeuArray(4) terá o valor "AMON-HÁ"

[JOIN]

Descrição: Junta todas as variáveis de um array, formando uma única string.

Sintaxe: Join(Nome do Array[, Delimitador])

 

Nome do Array:

Obrigatório, array que contém as substrings a serem juntadas.

Delimitador:

Opcional, string ou caracter que será utilizado para separar os valores do array na formação de uma única string. Se omitido o padrão assumido é " ".

Dim MeuTexto

Dim MeuArray(5)

MeuArray(0) = "Aprendendo"

MeuArray(1) = "VBSCRIPT"

MeuArray(2) = "com"

MeuArray(3) = "o"

MeuArray(4) = "AMON-HÁ"

MeuTexto = Join(MeuArray, " ")

 

' MeuTexto terá o valor "Aprendendo VBSCRIPT com o AMON-HÁ"

Espero que vocês tenham gostado. Até a próxima. http://forum.imasters.com.br/public/style_emoticons/default/bye1.gif

[Salgado 4]

WeekDay(data,[primeirodiadasemana])

Retorna o número do Dia da Semana à partir de uma data informada.

Data - uma expressão que represente uma data, se um valor nulo for inserido retornará Null

primeirodiadasemana (opcional) - o numero do 1º dia de "sua" semana, de 0 a 7 sendo 0(zero) para usar a referencia ao NLS (National Language Support) e de 1 a 7 sendo de Domingo a Sábado. Se nada for informado é assumido Domingo como o 1º dia)

[Richard Abreu 0]

Legal o post, pois isso são coisas que sempre estamos precisando. Bom ter a mão...

[Salgado 4]

MID(String, PosicaoInicio[, TamanhoSeleção])

Retorna parte de uma string.

MID(String, CaracterInicio, TamanhoSeleção)

 

String (obrigatório)

O texto que será usado para o retorno

PosicaoInicio (obrigatório)

Posição por onde a seleção será iniciada

TamanhoSeleção (opcional)

Quantidade de caracteres que será selecionada, se omitido pegara do inicio ao fim.