<%@LANGUAGE="VBSCRIPT"%> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> El Humor de Rogelio - Chiste
  
 

 
 
 
© Portal Local, S.L.
   
...pulse este botón para cerrar la ventana.
     
 

Fábula.

Un anciano de 98 años llega al médico para su chequeo de rutina y el doctor le pregunta cómo se siente:
- Nunca me he sentido mejor -le responde-. Mi novia tiene 18 años y vamos a tener un hijo.
El doctor piensa por un momento y dice:
- Permítame contarle una historia: Un cazador que nunca se perdía la temporada de caza salió un día tan apresurado de su casa que se confundió tomando el paraguas en vez del rifle. Cuando llegó al bosque se le apareció un gran oso. El cazador levantó el paraguas, apuntó al oso y disparó. ¿Sabe qué pasó?
- No sé. -responde el anciano.
- Pues que el oso cayó muerto frente a él -concluye el doctor.
- ¡Imposible...! -exclamó el anciano-. Alguien más debe haber disparado.
- A ese punto quería yo llegar...