<% Response.expires=-1000 Response.Buffer=True %>

Voltar

<%'-------------------------------------------- Dim connection set connection=server.createobject("adodb.connection") connection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(database) Set rs = connection.Execute("SELECT * FROM tipo_soft") do until rs.eof Response.write("") rs.movenext loop '--------------------------------------------------------------------- %>

Software Educativo Neste espaço pode encontrar novidades sobre publicações em suporte CD-Rom, DVD e online. A actualização é feita online pelos utilizadores.

Categorias de Software:

") Response.write(""& rs("designacao")&" ") Response.write("