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