%@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
|
|
| |
|

|
| |
| |
|
|
| |
|
|
|
|
...pulse
este botón para cerrar la ventana. |
| |
|
|
| |
Problemas
de traducción.
Un misionero se da cuenta de que lo único que no le ha enseñado
a los aborígenes es cómo hablar español.
Así que saca a pasear al jefe por el bosque.
El misionario señala a un árbol y dice:
- Este es un árbol.
El jefe mira el árbol, balbucea y finalmente dice:
- Árbol!
Caminan un poco más adelante y el misionero señala
una roca y dice:
-Esto es una roca.
El jefe de nuevo mira y con trabajo dice :
-Roca!
El misionero está muy entusiasmado con los resultados cuando
oye un ruido en los arbustos. Cuando mira ve un par de los de la
tribu en medio de la actividad sexual.
El misionero se sonroja y enseguida dice:
- Montando en bicicleta.
El jefe mira a la pareja, saca su cerbatana con dardos venenosos
y los mata a los dos.
El misionero está muy enojado porque el ha pasado años
tratando de civilizarlos y el jefe ha matado a estos dosprójimos
a sangre fría.
El jefe lo mira detenidamente y le dice:
- Mi bicicleta!!
|
|
| |
|
|
|