[ERRO] application.Lock

[SUPER-EDUARDO 0]

Amigos estou criando um sistema de orçamento online onde o usuario clicka em um produto e este eh inserido em um pedido que vai ser calculado o total no final.

 

Estou com problemas usando 'application'.. tenho este codigo aqui:

<%
Sub sub_CriarNovoPedido
application.Lock

if application("pedido_id")= "" then 
application("pedido_id") = 1 

end if

p_pedido_id = application("pedido_id")
session("pedido_id") = p_pedido_id

application("pedido_id")=application("pedido_id") +1
application.Unlock

end sub 


Sub sub_AdicionarAoPedido(the_pedido_id, the_prod_id, the_quant)

databaseDB.execute("insert into itens_pedido(pedido_id, prod_id, quantidade) values ("& the_pedido_id &", "& the_prod_id &", "& the_quant &")")
 
 end sub

estah dando este erro aki que nao consigo sanar:

 

Script error detected at line 7.

Source line: application.Lock

Description: Objeto necessário: 'application'

 

Alguem poderia me dar uma luz do que pode ser?

 

Obrigado.

 

depois uso estes metodos criados:

 

p_prod_id=request.form("p_prod_id")
p_quant=request.form("p_quant")


set databaseDB=server.createobject("adodb.connection")
databaseDB.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("BD\BD.mdb")  

p_pedido_id=session("pedido_id")

if p_pedido_id = "" then 
sub_CriarNovoPedido 
 End if
    sub_AdicionarAoPedido p_pedido_id, p_prod_id, p_quant

%>

[hargon 64]

Você iniciou o Application no Global.asa ?

[SUPER-EDUARDO 0]

Você iniciou o Application no Global.asa ?

 

 

Amigo na verdade o global asa nem esta no diretorio do sistema, como faco mesmo isso? Inicializar o aplicattion?

estava parada na programacao, este sistema estava aki pronto, mai agora da dando isso...

Iai mano?

[xanburzum 169]

você precisa criar as variaveis dentro do global.asa, dentro do Application_OnStart, Application_OnEnd ,o Global.asa é um arquivo opcional cujo texto contém informações sobre uma aplicação ASP. Ele pode conter scripts, objetos session e application que serão usados em toda a aplicação. O arquivo Global.asa deverá estar no diretório raiz ( root ) da aplicação, e uma aplicação só pode ter um arquivo Global.asa.

 

"Application_OnStart" é executada uma vez, quando a aplicação é iniciada. A aplicação é iniciada quando o primeiro usuário chama a primeira página asp. Esta procedure conterá um código que será executado antes de qualquer acesso à aplicação. Quando esta procedure terminar , a procedure "Session On_Start" será executada.

 

 

"Application_OnEnd" é executada uma vez quando é encerrada a aplicação (só quando é parado o servidor! ). Esta procedure é usada para reconfigurações após o encerramento da aplicação, tal como deletar registros ou armazenar informações em arquivos do tipo texto.

[hargon 64]

Exemplo do global.asa (esse arquivo deve ficar na raiz)

<script language="vbscript" runat="server"> 

sub application_onStart() 
  'sentencas que se executam ao entrar o primeiro usuario 
end sub 

sub application_onEnd() 
  'sentencas a executar ao partir o ultimo usuario 
end sub 

sub session_onStart() 
  'sentencas que se executam cada vez que entra um usuario 
end sub 

sub session_onEnd() 
  'sentencas a executar ao partir cada usuario 
end sub 

</script>

 

Mais informações sobre global.asa

[SUPER-EDUARDO 0]

Exemplo do global.asa (esse arquivo deve ficar na raiz)

<script language="vbscript" runat="server"> 

sub application_onStart() 
  'sentencas que se executam ao entrar o primeiro usuario 
end sub 

sub application_onEnd() 
  'sentencas a executar ao partir o ultimo usuario 
end sub 

sub session_onStart() 
  'sentencas que se executam cada vez que entra um usuario 
end sub 

sub session_onEnd() 
  'sentencas a executar ao partir cada usuario 
end sub 

</script>

 

Mais informações sobre global.asa

 

 

Hargon, http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

 

mermao , iai mano? Compreendi o probleminha, pq to usando java ai parei um pouco com ASP.

 

Como devo inicializar agora o application dentro do global.asa,

e depois tem q dar um include na pagina? alguma coisa do genero?

pelo codigo que fiz acima ai tem como ter uma nocao?

 

Valeu que o maluco ta esperando esse mudoluzinho de orçamento , me pertuba pacas.... :D

[hargon 64]

Exemplo:

sub application_onstart() 
  application("pedido_id") = 0
end sub

Como disse, o arquivo globo.asa deve ficar na raiz da aplicação.