[Resolvido] executar funcao

[desisto 0]

opa

existe a possibilidade de jogar uma funcao pro bd e resgatar na pagina asp e faze-la executar?

[hargon 64]

Isso não é possível. Seria o mesmo que tentar armazenar uma variável em outra.

[desisto 0]

esse esquema é possivel em algum banco e/ou outra linguagem?

 

to usando mysql e asp

[hargon 64]

Quando citei que seria o mesmo, quis dizer que também não é possível.

 

Em outra linguagem não sei se é possível.

[scorpio 7]

O que você pode faze é.

 

> Coloca a função no banco de dados

> Resgata a função

> Escreve um arquivo chamado "gambiarra.asp", com a estrutura asp e a função que você resgatou.

> Chama essa página.

 

 

Se for muito complexo oq ue você queira fazer fica mais complicado

[Salgado 4]

Não sei se a função EVAL interpreta mais de uma linha de comando.

[hargon 64]

Havia feito um teste anteriormente com eval e não deu certo. Lembro que foi justamente por causa de ser mais de uma linha. Na ocasião utilizei &_ e também : para tentar unir as linhas.

[desisto 0]

tem um exemplo de como seria?

[hargon 64]

Veio uma idéia enquanto dormia (que coisa mais Geek), resolvi testar agora e funcionou. rs

 

Usando o comando execute você consegue trazer uma função do banco de dados e rodar no código normalmente. Tanto Função como Variável.

<%
Dim funcao
funcao = "Function testando : Dim teste : teste = 5 : testando = teste : End Function"
Execute(funcao)
Response.Write testando
%>

[xanburzum 169]

desisto, para qaul seria a finalidade , o que você realmente necessita fazer ????

[desisto 0]

Veio uma idéia enquanto dormia (que coisa mais Geek), resolvi testar agora e funcionou. rs

 

Usando o comando execute você consegue trazer uma função do banco de dados e rodar no código normalmente. Tanto Função como Variável.

<%
Dim funcao
funcao = "Function testando : Dim teste : teste = 5 : testando = teste : End Function"
Execute(funcao)
Response.Write testando
%>

valeu, vou testar esse esquema pra ver se rola, depois posto o resultado

 

 

 

desisto, para qaul seria a finalidade , o que você realmente necessita fazer ????

so de pensar como eu explicaria, ja ate desisti

se funcionar a funcao eu posto um exemplo que é mais facil

[xanburzum 169]

uhuhuhuhuaaa, beleza, perguntei, poi dependendo da situação, podemos oferecer outra solução....

[desisto 0]

eu sei que a pergunta foi tentando oferecer outra solucao http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

nao é ma vontade nao hehehe

 

mas sabe aquele ponto que a gente chega, depois de tanto ver um mesmo codigo, a gente quase se perde na ideia...

fiquei matutanto dias uma solucao pra um esquema e as vezes dava um apagao total que nem lembrava mais o que tava fazendo

 

por isso achei mais facil jogar pra teste e servir o exemplo :)

vou testar daqui a pouquinho e retorno

 

[]s

 

tentei mas nao rodou...

no caso do exemplo, teria que jogar pro banco esse cod. dessa forma

Function testando : Dim teste : teste = 5 : testando = teste : End Function

[Mário Monteiro 179]

testei isso no eval e realmente nao funcionou

[hargon 64]

Não rodou com EXECUTE? Posta como ficou seu código.

 

no caso do exemplo, teria que jogar pro banco esse cod. dessa forma

Correto.

[desisto 0]

testei isso no eval e realmente nao funcionou

opa

acho que tinha feito errado... agora funcionou

 

no banco joguei:

Function testando : Dim teste : teste = 7-1 : testando = teste : End Function

no asp rodei:

Dim funcao
funcao = rs("cod")
Execute(funcao)
Response.Write testando

aparentemente funcionou; retornou 6 (7-1)

 

vou tentar implementar outras coisas nessa funcao pra ver como sai, ai depois retorno

valeu

 

---

da pra usar quebra de linha normal da tabela tipo texto?

[hargon 64]

da pra usar quebra de linha normal da tabela tipo texto?

Você pode usar assim também:

<%
Dim funcao
funcao = "Function testando " & vbCrLf &_
		 "Dim teste" & vbCrLf &_
		 "teste = 2" & vbCrLf &_
		 "testando = teste" & vbCrLf &_
		 "End Function"
Execute(funcao)
Response.Write testando
%>

Ou assim:

<%
Dim funcao
funcao = "Function testando " & vbCrLf & "Dim teste" & vbCrLf & "teste = 2" & vbCrLf &  "testando = teste" & vbCrLf & "End Function"
Execute(funcao)
Response.Write testando
%>

[desisto 0]

bom, ate agora com os testes que eu fiz obtive um resultado bom

 

respondendo ao xanburzum e a quem mais interessar...

tenho determinados registros que exibem à direita o seguinte:

. ultimas noticias

. itens relacionados

. outros links

 

 

e eu precisava fazer um esquema inependente, tipo:

colunas - exibe as ultimas 5 noticias

noticia - exibe as ultimas 10

 

poderia fazer usando xml e js, mas optei em fazer com asp mesmo

entao pra esse exemplo que dei e estou testando ainda

 

criei uma funcao:

function teste01(qtd)
	response.Write("exibe"&qtd&"noticias")
end Function

e no banco:

teste01()

chamada:

Dim funcaoT : funcaoT = rs("col")
Execute(funcaoT)

 

os testes simples que fiz rodaram sem problema

vou implementar mais coisas e rodar em outras aplicações, mas aparentemente esta ok

 

em suma, essa tabela rodando funcoes montará toda minha coluna lateral

será de forma independente e de acordo com os itens

 

 

essa aplicação Execute(...) tem algum resultado 'a mais'... tipo consumo do server ou lentidao na execucao?

 

 

valeu hargon pela ajuda

Veio uma idéia enquanto dormia (que coisa mais Geek), resolvi testar agora e funcionou. rs

so nao precisa sonhar comigo :)

valeu mesmo, quebrou um galho

[hargon 64]

so nao precisa sonhar comigo

valeu mesmo, quebrou um galho

Sai desisto... ¬¬

Isso não vai acontecer jamais. A ideia veio durante o sono pq foi o último tópico que li antes de dormir. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Sobre o consumo, não sei lhe falar se é alto, mas com certeza é um pouco maior do que se a função estivesse no corpo do código.

 

Mas que bom que resolveu.