Subversion Repositories DevTools

Rev

Rev 5177 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5177 Rev 5181
Line 55... Line 55...
55
        Dim joiner : joiner = "?"
55
        Dim joiner : joiner = "?"
56
        If InStr(returnUrl,"?") <> 0 Then joiner = "&"
56
        If InStr(returnUrl,"?") <> 0 Then joiner = "&"
57
        returnUrl = returnUrl & joiner & "rtag_id=" & Request("rtag_id")
57
        returnUrl = returnUrl & joiner & "rtag_id=" & Request("rtag_id")
58
    End If
58
    End If
59
End If
59
End If
60
rmDebug = returnUrl
-
 
-
 
60
 
61
'----------------------------------------------
61
'----------------------------------------------
62
%>
62
%>
63
<%
63
<%
64
'--------------------------------------------------------------------------------------------------------------------------
64
'--------------------------------------------------------------------------------------------------------------------------
65
Sub GetFormDetails ( nRtagId, ByRef outobjDetails )
65
Sub GetFormDetails ( nRtagId, ByRef outobjDetails )