Scripts Acess

Disciplina Programação em Microinformática
Projeto ACCESS

1- Projeto Fabios: Realiza backup do banco de dados, mantendo somente as últimas cinco cópias mais atuais do arquivo - Página 3

Página: 1

FATEC-SP
SCRIPTS

Disciplina Programação em Microinformática
Projeto ACCESS

Página 2

2- Script Educado: Antes de abrir o banco de dados, Exibe Bom Dia / Boa Tarde /
Boa Noite, dependendo da hora da execução – Página 6.

3- Composto de dois Scripts – o primeiro instala pastas e arquivos do sistema no drive C e gera atalho na área de trabalho para acesso ao segundo script que executa sistema de banco de dados e realiza backup do arquivo – Página 9.

4- Script que envia email a um usuário, anexando cópia do banco de dados –
Página 13.

5- Script que gera na área de trabalho, uma planilha Excel formatada com informações extraídas do banco de dados – Página 18.

6- Script que executa o Outlook para envio de email a um usuário escolhido e anexa o banco de dados a esse email – Página 26.

7- Gera uma pasta com nome do mês atual e grava o backup do banco de dados dentro dessa pasta. Se for executado mais de uma vez no mesmo mês, os próximos backups são gravados na mesma pasta - Página 30.

8- O cd possui um arquivo AutoRun que pergunta ao usuário se quer inserir um atalho na área de trabalho e gerar uma pasta com o sistema. Similar ao item 3, acima, porém com autorun no cd - Página 34.

Página: 2

FATEC-SP

Disciplina Programação em Microinformática

SCRIPTS

Projeto ACCESS

Página 3

Scripts diferenciados que obtiveram pontuação extra:
#1 - Script projeto FABIOS - 2012: Foi um dos primeiros scripts interessantes fornecidos.
Realiza backup do banco de dados, mantendo somente as últimas cinco cópias do arquivo. option explicit
Dim opcoes,varshell,diretorio diretorio = Left(WScript.ScriptFullName, (Len(WScript.ScriptFullName) (Len(WScript.ScriptName) + 1))) opcoes=msgbox("Clique em: "&chr(13)&chr(13)&"Sim para