Jump to content
Fórum Script Brasil

rodrigotnoma

Membros
  • Content Count

    168
  • Joined

  • Last visited

Community Reputation

0 Neutro

About rodrigotnoma

  1. Irei tentar Fulvio, Obrigado pela atenção.
  2. Ola Fulvio, entendi sua resposta, mas tem um porem: o try catch rola somente no 2005, e estou utilizando o 2000. Obrigado. Abraços.
  3. Boa noite, Estou tentando fazer uma procedure, dentro dessa procedure serão executadas outras procedures e alguns inserts e updates. Gostaria de executa-la por bloco, e a se o bloco a ser executado der algum erro, paro a execução e exibo uma mensagem do step que deu problema. Criei essa como teste: alter procedure Sp_TesteErro -- Sp_TesteErro 'Rodrigo' ( @nome varchar(100) ) as begin begin transaction declare @error int declare @msg varchar(1000) insert into tabela1 values('Rodrigo') Set @error = @@error if @error<>0 begin set @msg = 'Erro passo 1' goto errodetail end inse
  4. Bom dia. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Set conntemp = Server.CreateObject("ADODB.Connection") conntemp.Open Application("Conecta_bd") vCapital = Request.form("txtcapital") SQL = "SELECT * FROM verifica WHERE ParcelaI < '"&vCapital&"' And ParcelaFinal > '"&vCapital&"'" et rsPedidos = conntemp.Execute(SQL) base = rsPedidos("Parcela") %> Abços.
  5. rodrigotnoma

    IP X DNS

    Você está usando algum desse Request: REMOTE_ADDR REMOTE_HOST REMOTE_USER ???
  6. Seguinte: Sub ExibirConteudoPagina Call AbreConexao SQL_ExibirConteudoPagina = "SELECT * FROM tbl_noticias where categoria = '"&var_Id_Categoria&"' and categoria_coluna ='"&var_Categoria_coluna&"' order by id desc limit 3" set RS_ExibirConteudoPagina = ConexaoDB.Execute(SQL_ExibirConteudoPagina) End Sub A sub "ExibirConteudoPagina" não pede paramêtro e você esta tentando passar com o tal. ExibirConteudoPagina(RS_ExibirConteudoPagina) Abços.
  7. rodrigotnoma

    IP X DNS

    Poste o fonte por favor. Abços
  8. Seguinte: <% '***************** Faço o request do campo digitado login = request("login") '*****************Utilizo o x para controlar o WHILE**************** x = 0 '***************** Efetuo um select em todos os registros sql = "select * from loginteste" Set rsaux = objConn.Execute(sql) '**************** Para cada registro, pego o que estiver antes do @ e jogo para a variavel nome. do while not rsaux.EOF nome = mid(rsaux("login"),1,(instr(rsaux("login"),"@")-1)) '**************** Se o que foi digitado for igual a string que vem antes do @ if login = nome then '***************Incr
  9. rodrigotnoma

    Mudar o status

    http://www.plugmasters.com.br/sys/materias...Usando-DateDiff Vlw
  10. Qual o problema que ocorre? Primeiro tire o ";" da segunda linha. Tente dar um Response.Write Request("id_com") para ver o que retorna. De um novo- Response.Write coment -para verificar qual query está tentando executar, teste no banco e veja o que retorna. Abços
  11. Pelo que me parece o código está OK, só verifique as configurações do IIS. O mesmo código deve funcionar no IIS 5, IIS 6 e IIS 7 da mesma forma, independe do código o que pode afetar é a configuração do IIS, permissões, etc... Abços
  12. Seguinte: Ta vendo aquele "rsa" que você colocou ali? Isso é chamado de "Recordset", com ele você irá percorrer todos os registros da sua tabela. Ex: Set rsMeuSelect = Server.CreateObject("ADODB.Recordset") strSql = "Select * from TB_cadastro" rsMeuSelect.Open strSql,con Sendo: strSql = a query que você utilizará para trazer os seus registros do banco, ok? con = Objeto de conexão(no seu código seria o cnn), ok? Todos os resultados que retornar do meu select acima, serão "armazenados" no recordset rsMeuSelect, ok? Suponha que na sua tabela TB_cadastro, tenha o campo nome, telefone, en
  13. Response.redirect("http://www.linhasrodoviarias.com.br/busca/resultado.asp?txtCidadeOrigem=são+PAULO&estado= " & rs("cod_tipo") & " &cidade= " & rs("codcat") & " &botao=Buscar") Só que assim: Logo depois do seu else, o response.redirect não vai adr certo por causa que o Recordset(rs), não está setado a nenhum select. Você deverá efetuar um select no seu banco para trazer esses registros(cod_tipo e codcat) setando o resultado do registro para o recordset rs(como você fez no IF), só que para o else também. O jeito que você estava fazendo(request.form("cod_tipo")) s
  14. De uma olhada: http://www.linhadecodigo.com.br/Artigo.aspx?id=275 Abços
  15. O problema não poderia estar no IIS que está rodando no 64 bits?
×
×
  • Create New...