Buenas y gracias por contestar,
No soy de usar mucho variables por referencia, pero en este caso era necesario;
y si funciona pasar por referencia, puesto que ya lo había usado y probado.
De todos modo hice una prueba sencilla y funcionó. Acá esta:
Código ASP:
Ver original<%
'SI todo funciona, los 2 valores deberían devolver "1"
Dim varByVal, varByRef
varByVal = 1
varByRef = 2
SwapValues varByVal, varByRef
Response.Write "<p>First: " & varByVal & "</p>"
Response.Write "<p>Second: " & varByRef & "</p>"
Sub SwapValues(ByVal varByVal, ByRef varByRef)
Dim iTemp
iTemp = varByVal
varByVal = varByRef
varByRef = iTemp
End Sub
%>
saludos