<% @Language = VBScript %> <% Option Explicit %> <% Dim strServerURL 'Local Web Server Name including http://protocol Dim strTargetURL 'Dierectory where we will upload our file to 'Dim strServerPath 'Use ASP Server Variables to retrieve the name of our Web Server strServerURL = "http://" + Request.ServerVariables("SERVER_NAME") strTargetURL = strServerURL & "/simoquaweb/" 'strServerPath = Server.MapPath(".") Response.Write strServerURL & "-----" & strServerPath & "+++++" & strTargetURL & "*****" & "
" %> :: SiMoQuA :: Página Oficial



Saltar Introdução

Para navegar no SIMOQUA.PT sem qualquer problema, deverá ter os seguintes plug-in instalados:

 
   
 

optimizado para uma resolução mínima de 1024x768 no Internet Explorer 6

© Copyright 2000 - 2004, SMA / UA