Esse seria um exemplo.Emquanto a procedure abaixo estiver sendo executado, outra pessoa não vai poder usa-la, darei uma mensagem para ela que a açao já esta sendo executada. Como ela vai ser executada por varios dias, corre risco da pagina dar timeout? <%@ Language=VBScript %> <% Option Explicit Response.Expires = 0 %> <!-- #include file="adovbs.inc" --> <% Dim CodFor,CodCat Dim conn, rs Dim strConnection Dim cmd, param CodFor = Request.QueryString("CodFornec") Session("Codigo") = Request.QueryString("Categ") Set conn = server.CreateObject("ADODB.Connection") strConnection = "Provider=sqloledb;data source=wferz135050;UID=maykon;pwd=123;" conn.Open strConnection Set cmd = server.CreateObject("ADODB.Command") cmd.CommandText = "DetalhaFornecedor" cmd.CommandType = adCmdStoredProc Set cmd.ActiveConnection = conn Set param = cmd.CreateParameter("@SupplierID",adInteger,adParamInput,4,Cint(CodFor)) cmd.Parameters.Append Param Set rs = cmd.Execute() %>