recuperar valor de variable local

[yomesmo]

Reintento mi pregunta:

Si declaro una variable a nivel global:

<%
`Cabezera página asp
Dim variable

%>
luego programo una función Sub:

<%
Sub mifunción
XXXXcódigo
XXXXcódigo
XXXXExtraigo un registro de una base de datos y le doy el valor de mi variable:

variable= resutado.recordest
end sub
%>
Entiendo que si he declarado la variable a nivel global, aunque recoga su valor en una función local, al intentar recuperar este valor desde fuera de la función debería de entregarmelo, pero no lo hace...

¿?

[univercity]

Pon el codigo real porfa haber si veos el error de ahí...

[yomesmo]

Código
<%
Dim variable

Sub insertar_registro
sql_insert = "INSERT INTO fotos" (foto values 'foto1')"
cn.Execute(sql_insert)

set rs = cn.Execute("SELECT @@IDENTITY")
Id_foto = rs(0)
rs.Close
variable = Id_foto
end sub
variable = variable
%>
Si recogo el valor de variable dentro del Sub, me lo dá correcto, pero si lo recogo fuera del sub no me dá valor, variable me aparece como si no existiera esa variable, es como si la variable la hubiera definido en local, pero esta definida a nivel global ¿?

[univercity]

mmmm, la verdad es que yo no lo trabajo así pero tratare de hacer algo, me imagino que ese cn.execute("select...@@

esta diciendo "select INTO fotos" (foto values 'foto1')"

o me equivoco????


si asi fuese... habria que modificarlo.

pues asi jamas te va dar el valor de la id que estas buscando...

para mi la consulta entre muchas posibilidades... podria ser

"Select top 1 + from fotos order by id_foro desc"

entonces tienes el ultimo id que acabas de ingresar...

[yomesmo]

Bueno, realmente el resultado es el mismo, el
set rs = cn.Execute("SELECT @@IDENTITY")
arroja lo mismo que el
"Select top 1 + from fotos order by id_foro desc"


El problema no es ese. El problema es que la variable: "variable" arroja correctamente el valor dentro del Sub, pero no arroja nada fuera de él.
Por ejemplo si a la variable :"variable" le doy un valor fijo dentro del Sub:

variable ="1"

cuando trato de recuperarlo desde fuera del sub no me dá resultado, sigue reconociendo esta variable como local, por más que la declaro como global, al anteponerla un Dim variable fuera del Sub...

Es para volverse loco...

[Myakire]

Programación básica: "Ámbito de las variables": El alcance de las variables esta definido por su ámbito ..... se definen en globales y locales ..... etc, etc.

Con una función en lugar de un procedimiento se arregla:

Código:

Function insertar_registro
sql_insert = "INSERT INTO fotos" (foto values 'foto1')"
cn.Execute(sql_insert)

set rs = cn.Execute("SELECT @@IDENTITY")
Id_foto = rs(0)
rs.Close
insertar_registro = Id_foto
end Function
variable = insertar_registro

[yomesmo]

Myakire eres un cachondo!!

Si convierto el sub en function cada vez que haga un llamado al mismo, efectivamente, obtendré al valor de la variable, pero el servidor se me volverá loco insertando registros a destajo...

Tiene que ser un Sub por razones obvias, pero lo que no puedo entender es porque leches si declaro una variable como global, aunque recoga el valor en un sub, no puedo recuperarlo... Esa es mi cantareta y mi patareta...

Más que de sufrir y de sufrir...

[PMP]

Yomesmo, la instrucciones dentro del procediemintos, realizan acciones, pero a (diferencia de las funciones) no devuelven ningun valor.

Mira este artículo http://soloasp.com.ar/vertexto.asp?txt=21&p=1

Saludos

[yomesmo]

Definitivamente hay algo que debo estar haciendo mal, lo acabo de comprobar y mi racionamiento es correcto, una variable declarada fuera de un sub, no importa que luego se asigne el valor dentro del sub, la variable sigue siendo global.

He probado algo tan sencillo como esto:

<% Dim valor

Sub mostrar
valor ="22"
end sub
mostrar
%>
<br><br>
<%= valor %>

Y me arroja como resultado "22"

Asi que debo de tener alguna otra cosa mal... lo revisaré...

[Myakire]

Hasta ahorita me doy cuenta de el post alcance de variables también es tuyo,