|
O que é VBScript? (VBS)
O vbscript é uma versão
"light" do Visual Basic destinada à Internet, possui várias
limitações para que não seja criados problemas com
segurança, através dele não é possível
salvar um arquivo para o HD ou usar alguma api do Windows, entre algumas
limitações.
Para escrever um script com
vbs, pode-se usar o bloco de notas como qualquer página html, mas
está a disposição no site da Microsoft o ActiveX Control
Pad, que torna esta tarefa mais produtiva, mostrando um ambiente parecido
com o do vb, embora não seja tão sofisticado.
O ActiveX Control Pad
O Control Pad usa o Layout Control
da Microsoft, que torna possível posicionar um elemento em coordenadas
x e y em relação à página, ao invés
das limitadas opções de alinhamento do html, que só
entendem left, center e right.
A interface do Control Pad
não tem muitas novidades, no menu File existem as opções
new html e new html Layout:
New html cria uma nova página
html, bem no estilo bloco de notas.
New html layout é a
parte interessante, é criado um novo layout, que é tipo um
form do VB, onde são colocados labels, text boxes, images,etc.
O ActiveX Control
Pad(2.8 MB) é freeware, para fazer o download vá no site
da Microsoft. Aproveite e veja exemplos muito interessantes feito com ele
no endereço www.microsoft.com/cpad,
vale a pena.
OBS:
Para ver qualquer layout feito no ActiveX Control Pad, não é
preciso ter ele instalado na máquina, ele é apenas uma ferramenta
para facilitar a vida. O Internet Explorer 3.0 ou 4.0 já instalam
o Layout Control durante o setup, o que significa que se você possui
este browser, já pode ver os exemplos acima mesmo sem ter o Control
Pad instalado no seu computador.
O Exemplo "Sites Preferidos"
Seria perda de tempo ficar explicando
propriedades e métodos dos labels, options, etc. Qualquer pessoa
que saiba VB deve conhecê-los muito bem, por isso fiz um exemplo
simples, que mostra algumas novidades do Control Pad e alguns aspectos
do vbs, somente o pontapé inicial. A partir dele e de algumas horas
de estudo, o Control Pad e vbs não terão muitos mistérios.
Este exemplo mostra um combo
box que guarda uma lista de sites, o botão de OK que quando é
clicado vai para a página escolhida.
Vá no menu File>New
html layout. Você deverá ver algo parecido com a figura mostrada
abaixo:
No layout, adicione o combo
box, o botão de comando e o label.
Agora vamos adicionar dois
images, um servirá de background image, enquanto o outro mostrará
um logotipo.
As imagens serão as
seguintes:
 |
 |
| axback.jpg |
x_transp.gif |
Neste layout estou usando os
seguintes nomes para os objetos:
| Nome |
Descrição |
| cboPaginas |
Combo box para armazenar a lista de
sites |
| cmdOk |
Botão de OK |
| lblText |
Label explicativo |
| imgBackground |
Imagem de background |
| imgActiveX |
Imagem que mostra o logotipo |
Dê um clique duplo
nos images para que apareça a janela de propriedades, use a propriedade
picturepath para definir a imagem usada em cada controle. No primeiro
image, a figura deve se repetir durante todo o controle, por esta razão
deixe a propriedade picturetiling como true e picturesizemode
como clip, para que a imagem se repita no image e não "estique",
respectivamente.
Você deverá estar
vendo algo parecido com a imagem abaixo:
Os images estão por cima
dos outros objetos, devem ter seus tamanhos ajustados e mandados para trás,
os botões da figura abaixo que ficam no toolbar colocam servem para
posicionar os objetos, mandando-os para trás ou para frente. mande
então os dois images para trás.
Defina agora a propriedade
backstyle do combo, do text e do label para transparent, para que
não fiquem com o fundo branco, nem o botão cinza, como mostra
a figura abaixo, mas que fiquem vazados e as figuras por trás possam
aparecer melhor.
Com a interface pronta, resta
adicionar o código para que o botão funcione. No toolbar,
clique no botão Script Wizard.
Na janela Script Wizard,
com a opção em code view, procure o evento Layout1_Onload,
nele você deve preencher o combo box com o já conhecido método
additem do VB.
Sub Layout1_Onload()
cboPaginas.additem
"Adobe Systems"
cboPaginas.additem
"Computer Graphics World"
cboPaginas.additem
"Epic Games"
cboPaginas.additem
"Microsoft"
cboPaginas.additem
"Next Generation"
cboPaginas.additem
"Sigma"
cboPaginas.additem
"Visual Basic Brasil"
End Sub
No evento Click do botão
vai o código da mudança de página, que é controlada
pelo Internet Explorer ou por outro browser com window.location.href,
no caso o Select Case veria o conteúdo do combo e mandaria o usuário
para a página escolhida:
Sub cmdOk_Click()
Select Case
cboPaginas.Text
Case "Adobe
Systems"
window.location.href="http://www.adobe.com"
Case "Computer
Graphics World"
window.location.href="http://www.cgw.com"
Case "Epic Games"
window.location.href="http://www.epicgames.com"
Case "Microsoft"
window.location.href="http://www.microsoft.com"
Case "Next Generation"
window.location.href="http://www.next-generation.com"
Case "Sigma"
window.location.href="http://www.geocities.com/SiliconValley/Heights/2773/sigma.htm"
Case "Visual
Basic Brasil"
window.location.href="http://www.vbbrasil.com"
End Select
End Sub
Salve o layout, que será
um arquivo de extensão alx. Resta então colocar uma referência
numa página html que chame este layout. Abra a página html
que for usada, deixe o cursosr na posição desejada e vá
no menu Edit>Insert html layout, o Control Pad irá adicionar algumas
linhas que ficarão encarregadas por isso.
Agora o Layout rodando, pode conferir.
Um pouco mais sobre VBS:
Variáveis só variant,
para verificar se o conteúdo de uma variável é de
um determinado tipo, como integer, deve-se usar as seguintes funções,
que retornam true se a variável for do tipo associado.
IsDate
IsEmpty
IsNumeric
IsNull
IsObject
Dim dia
dia="50/30/97"
If IsDate(dia)
= True Then 'IsDate(dia) retorna
falso, já que esta data não existe
Msgbox "Parabéns,
você digitou uma data correta."
Else
Msgbox "Esta
data não existe."
End If
Ou então VarType,
que retorna o tipo de uma variável.
Dim x, tipo
x = 2
tipo = Vartype
(x) 'tipo receberá 2, o que significa
que x é inteiro.
x = "João"
tipo = Vartype
(x) 'tipo receberá 8, o que significa
que x é string.
Podem ser criados arrays, porém
sempre começam a partir do índice 0;
Constantes não existem, trabalha-se
apenas com variáveis;
Todos os operadores presentes, como
+, - , / , OR, AND, XOR, NOT;
A maioria das funções
para trabalhar com strings estão presentes, como left,
mid e right;
A maioria da funções
para conversão de tipos também estão presentes, como
CStr e CInt.
Functions e Subs podem ser criados,
mas Propety Procedures não;
For - Next, Do While - Loop, If -
Else - End If todos presentes;
Obs: Quando
usar o Next não coloque o nome da variável em seguida, no
vbs isto é obrigatório.
Tratamento de erros com On Error Resume
Next presente;
Para uma documentação
bem mais completa, visite www.microsoft.com/vbscript.
Procure se informar melhor sobre os objetos do Internet Explorer.
Considerações Finais
O vbs não foi feito para
concorrer com o Visual Basic, mas sim para ser uma solução
para pequenos e médios problemas, e principalmente "fazer funcionar"
controles ActiveX, inicialmente os que já vêm junto com o
Internet Explorer, como o label, combo, list, image, hotspot, webbrowser,
etc.
O Macromedia Flash, um dos
plugins mais promissores e festejados do momento, que está por trás
do show existente no site da Macromedia
e MSN, na sua versão ActiveX pode não
apenas executar animações e fazer botões, mas ser
controlado por vbscript, como voltar a animação, definir
o nível de qualidade e tudo que estamos acostumados a fazer com
qualquer controle no VB, o que conta muitos pontos, já que é
tudo de maneira rápida, eficiente e sem quase nenhuma novidade para
os programadores, que automaticamente passam a desenvolver para internet
sem ter que aprender outra linguagem, sem contar ainda que o Control Pad,
VB5 CCE e o IE são gratuitos.
O IE4 não é apenas
um browser, ele também altera o ambiente do Windows, tornando-o
totalmente integrado à Internet e inteligente, tudo está
a "a cara" do IE, os desavisados com certeza vão jurar que o Windows
Explorer, Área de Trabalho ou até mesmo o Painel do Controle
são o Internet Explorer, e vão rir quando começarem
escrever uma endereço www e o IE "adivinhar" o final e escrever
o que está faltando, depois de vê-lo, o Win95 sem ele perde
a graça, parecendo o Win 3.1 depois que saiu o 95. Não perca
tempo, dê uma passada em www.microsoft.com/ie
e antecipe o Windows97, ou será Windows98?, caso a MS para variar
atrase mais uma vez.
Os números atestam o
sucesso, no site da ZDnet, grupo que
possui quase todas as revistas de informática nos Estados Unidos,
mostrava no final de abril que o Netscape 4 tinha 15.000 downloads por
dia, enquanto o IE4 56.000, no Windows95.com, um dos mais visitados em
toda WWW, há um mês atras 50% dos internautas já entravam
com o IE.
Para as intranets que pipocam
nas empresas, o NT é o preferido por todos e já vem com o
IE, assim como Win 95 e o Win97, ActiveX/VBS têm de tudo para se
tornar uma opção excelente e definitiva para aplicações
Internet/Intranets.
|