Files
Facilitor/APPL/API/shorturl.asp
Marcel Bourseau a19ae96619 Tbv JGL's label-actie
svn path=/Website/trunk/; revision=5377
2012-01-13 14:33:18 +00:00

39 lines
1.3 KiB
Plaintext

<%@language = "javascript" %>
<% /*
$Revision: 3 $
$Modtime: 13-01-12 12:45 $
File: shorturl.asp
Description: Redirect naar een bookmark url
Parameters: u Bookmark die in de bookmark tabel moet zitten
p Optionele parameter(s)
Context: Vanuit root
Note: Welbeschouwd is dit gewoon een url-shortener
http://sgf12/Facilitor5iWork/?u=J448UIrR43
*/
%>
<!-- #include file="../../cust/install.inc"-->
<%
var u = getQParam("u");
// For flexiblity reasons: Literal or runtime parameter(s), just pass through...
var p = getQParam("p", "");
// Jos, moet hier nog wel/niet HTMLEncode omgeen oid (p=ins_deel_key%3D8473 vs. p=ins_deel_key=473)
var sql = "SELECT fac_bookmark_path, fac_bookmark_query"
+ " FROM fac_bookmark"
+ " WHERE fac_bookmark_id = " + safe.quoted_sql(u)
+ " AND (fac_bookmark_expire IS NULL OR fac_bookmark_expire > SYSDATE)";
var oRs = Oracle.Execute(sql);
if (oRs.Eof)
{
Response.Write("URL NOT FOUND");
Response.End;
}
var url = oRs("fac_bookmark_path").Value + "?" + oRs("fac_bookmark_query").Value + (p != "" ? "&"+p : "");
oRs.Close();
Response.Redirect(url);
%>