Tbv JGL's label-actie

svn path=/Website/trunk/; revision=5377

APPL/API/shorturl.asp

@@ -1,11 +1,12 @@
 <%@language = "javascript" %>
 <% /*
-    $Revision: 2 $
-    $Modtime: 22-09-11 15:55 $
+    $Revision: 3 $
+    $Modtime: 13-01-12 12:45 $
 
     File:           shorturl.asp
     Description:    Redirect naar een bookmark url
-    Parameters:     bm      Bookmark die in de bookmark tabel moet zitten
+    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
@@ -15,6 +16,10 @@
 <!-- #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"
@@ -23,10 +28,10 @@
     var oRs = Oracle.Execute(sql);
     if (oRs.Eof)
     {
-        Response.Write("Url niet gevonden");
+        Response.Write("URL NOT FOUND");
         Response.End;
     }
-    var url = oRs("fac_bookmark_path").Value + "?" + oRs("fac_bookmark_query").Value;
+    var url = oRs("fac_bookmark_path").Value + "?" + oRs("fac_bookmark_query").Value + (p != "" ? "&"+p : "");
     oRs.Close();
     Response.Redirect(url);
 %>