Como mostrar un link si se cumple esto???

[roroland]

Gracias por sus respuestas.

En mi sitio lo que tengo en este momento, es que vendo mi musica, entonces luego que el usuario paga (a travez de paypal) y me llega el mail de que alguien me compro, lo que hago es habilitar la descarga en formato .zip, la unica medida de seguridad que se me ocurrio para protegerl los otros archivos que tengo es ponerles contraseña diferente a cada .zip, entonces, en caso que pudiesen bajar mas files no puedan abrirlos. Se que no es suficiente...pero esa idea de poner las carpetas fuera del root es interesante, voy a probarlo...

Una pregunta mas sobre el codigo de Session...
Lo que yo necesito hacer es lo siguiente. Paypal (que es con quien cobro mis temas) cuando me pagan por un tema, me devuelve este codigo a una pagina mia, el cual es un "recibo" en tiempo real de lo que ese usuario me compro:

<%
Dim Item_name, option_name1, option_selection1
Dim Payment_status, Payment_amount
Dim mc_gross
Dim Txn_id, Receiver_email, Payer_email
Dim First_name, Last_name
Dim objHttp, str

str = Request.Form & "&cmd=_notify-validate"
set objHttp = Server.CreateObject("Msxml2.ServerXMLHTTP")
objHttp.open "POST", "https://www.paypal.com/cgi-bin/webscr", false
objHttp.setRequestHeader "Content-type", "application/x-www-form-urlencoded"
objHttp.Send str

First_name = Request.Form("first_name")
Last_name = Request.Form("last_name")
Item_name = Request.Form("item_name")
option_name1 = Request.Form("option_name1")
option_selection1 = Request.Form("option_selection1")
Payment_status = Request.Form("payment_status")
mc_gross = Request.Form("mc_gross")
mc_currency = Request.Form("mc_currency")
Txn_id = Request.Form("txn_id")
Payer_email= Request.Form("payer_email")
Receiver_email = Request.Form("receiver_email")
Payer_email = Request.Form("payer_email")
Session("descarga")=0
if (objHttp.status <> 200 ) then
' HTTP error handling
elseif (objHttp.responseText = "VERIFIED") then
' check that Payment_status=Completed
' check that Txn_id has not been previously processed
' check that Receiver_email is your Primary PayPal email
' check that Payment_amount/Payment_currency are correct
' process payment
elseif (objHttp.responseText = "INVALID") then
' log for manual investigation
else
' error
end if
set objHttp = nothing
%>


Yo lo que quiero es un codigo que me permita evaluar si el que me pago es INVALID (malo) o VERIFIED (bueno). Y que si el pago es VERIFIED (bueno) entonces aparezca un link habilitando la descarga y sino no...

Por eso el codigo que antes me pasaron:

<%If session("descarga") = 1 then
%>
<a href="link_para_descargar">Archivo</a>
<%
else
%>
Archivo
<%
end if
%>
Me parece util...lo que no se es como hacer para que por ejemplo si es verified, el valor de la session cambie ...me explico?

Gracias