<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> DI · UFRJ
<% pro=request.form("projeto") yy="
"&request.form("nome")&", obrigado por participar da melhoria da nossa faculdade.
Assim que tivermos novidades entraremos em contato, possivelmente no mês de abril.

" set conexao=server.CreateObject("Adodb.connection") set tabela=server.CreateObject("Adodb.recordset") banco="driver={driver do microsoft access (*.mdb)}; dbq="&server.MapPath("ufrj.mdb") conexao.open banco sql="insert into interessados (nome_interessado, sobrenome_interessado, apelido_interessado, periodo_interessado, telefone_interessado, email_interessado, projeto_interessado) values ('"&request.form("nome")&"', '"&request.form("sobrenome")&"', '"&request.form("apelido")&"', '"&request.form("periodo")&"', '"&request.form("telefone")&"', '"&request.form("email")&"', '"&pro&"')" tabela.open sql,conexao,3,3 %> DI-2008

Apresentação
Biblioteca
<% If pro="biblioteca" then %> <%= yy %> <% End If %> Guia dos alouros
<% If pro="calouros" then %> <%= yy %> <% End If %> Ilustreba
<% If pro="ilustreba" then %> <%= yy %> <% End If %> Monitoria de Sotfwares
<% If pro="monitoria" then %> <%= yy %> <% End If %> Palestras
<% If pro="palestras" then %> <%= yy %> <% End If %> Exposição
<% If pro="exposicao" then %> <%= yy %> <% End If %> Semana de Design
<% If pro="semana" then %> <%= yy %> <% End If %> Site de DI
<% If pro="site" then %> <%= yy %> <% End If %>