Jump to content

Search the Community

Showing results for tags 'asp'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Q&A Desenvolvimento
    • Perguntas e respostas rápidas
  • Desenvolvimento e Banco de Dados
    • HTML e CSS
    • Java
    • Javascript
    • .NET
    • PHP
    • Python
    • Ruby
    • Mobile
    • Ambientes de Desenvolvimento
    • Arquitetura e Métodos Ágeis
    • Banco de Dados
    • DevOps
    • Desenvolvimento de Games
    • E-Commerce e Pagamentos Online
    • SEO e Otimizações
    • WordPress
    • Algoritmos & Outras Tecnologias
  • Design e Produto
    • Fotografia
    • Photoshop
    • Design de interfaces e UX
    • Edição/Produção de Vídeos
    • Marketing Online
    • Desenho, Ilustração e 3D
  • Entretenimento e uso pessoal
    • Geral
    • Segurança & Malwares
    • Gadgets e wearable
    • Softwares e Apps
    • Entretenimento

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Google+


Hangouts


Skype


Twitter


deviantART


Github


Flickr


LinkedIn


Pinterest


Facebook


Site Pessoal


Localização


Interesses

Found 120 results

  1. For Each como limitar numero de imagens no LOOP <% Set Fso = Server.CreateObject ("Scripting.FileSystemObject") Set arquivo = Fso.GetFolder(Server.MapPath("gdd/sgc/imagens/foto_texto/" &id_pasta_imagens& "")) Set arquivos = arquivo.files For Each Item in arquivos Set objFS = Nothing %> <div> <a class="img-thumbnail img-thumbnail-hover-icon mb-xs mr-xs" href="gdd/sgc/imagens/foto_texto/<%=id_pasta_imagens%>/<%Response.Write Item.name %>"> <img class="img-responsive" src="gdd/sgc/imagens/foto_texto/<%=id_pasta_imagens%>/<%Response.Write Item.name %>" alt="<%=V("url_amigavel")%>"> </a> </div> <% Next Set arquivos = nothing Set arquivo = nothing Set Fso = nothing %>
  2. rafalbino

    url amigavel para vb asp.net

    Fala galera, estou tentando tornar minha url amigável. Tenho uma página chamada /contato.aspx e gostaria de torná-la apenas /contato/ Os exemplos que encontrei não funcionaram.
  3. Olá! Estou montando um pequeno sistema de envio de emails, e estou com um probleminha. Ao enviar é preciso que selecione uma categoria e quando realiza o envio, preciso que o sistema me traga em uma única variável todos os emails da tabela. exemplo: envio = joão@uol.com.br, maria@uol.com.br, pedro@uol.com.br E assim vai. Isso é possível? Se sim, quais alterações preciso fazer no meu código? Obrigado :D selecione2 = "SELECT * FROM TB_USERS where Tipo_usuario = '" & request.form("emails") & "'" Set RS_Categoria = Server.CreateObject("ADODB.Recordset") RS_Categoria.Open selecione2, MM_Cn_emailMkt2_STRING idmail = RS_Categoria("email")
  4. Olá! Estou gerando boletos do banco do Brasil através de um sistema próprio. Ao gerar os boletos individualmente não obtive erros, porém ao aplicar o loop para gerar mais de um boleto, houve um erro com o código de barras e linha digitável: linha 86 function mod11(cadeia,limitesup,lflag) Já tentei ajustar de diversas formas, mas só consegui gerar os boletos sem código de barras / linha digitável. Segue código <% response.buffer=true %> <!--#include file="../Connections/ConnectionString.asp" --> <!-- #include file = "../include/generico_data.inc" --> <% 'Valida Acesso dim rsAcesso, sql sql = "select * from acesso_processo_usuario where id_processo = 16 and id_usuario = " & session("id_usuario") set rsAcesso = GetRS(sql) if rsAcesso.eof then response.write "Acesso Negado" response.end end if %> <% session.lcid = 1046 dim idPedido, valor, data_documento, data_vencimento,nome_sacado, endereco_sacado, endereco_sacado2,cedente, cpf_cnpj, agencia, dac_agencia,conta, dac_conta, carteira,layout_boleto,convenio, numero_documento,nosso_numero, instrucoes1,instrucoes2,instrucoes3,instrucoes4, instrucoes5, contrato, especie, especie_doc, aceite, a, fvencimento, valor_str, livre, dac_nosso_numero, codbar, mult, total, pos, nresto, ndig, dac, cmplivre, campo1, res, campo2,campo3,campo4, campo5, linha_digitavel, agencia_codigo, x98, quantidade, data_processamento, valor_unitario, x80, x171,x99,x3,x125,x126,x18,dvNosso_numero '================INFORMAÇÕES BANCÁRIAS============== cedente = "RAZÃO SOCIAL" cpf_cnpj = "00.000.000/0000-00" agencia = "0000" dac_agencia = "0" conta = "00000" dac_conta = "0" convenio = "0000000" carteira = "00" '================INSTRUÇÕES DO BOLETO============== instrucoes1 = "Após o vencimento multa de 2% + 0,1% de mora ao dia." instrucoes2 = "Protestar 03 dias úteis após o vencimento." instrucoes3 = "" instrucoes4 = "" instrucoes5 = "" '===================================================== '===========LOOP==========' dim id_lan, v_item For each item in Request.Form("chkBoleto") v_item = split(item,",") id_lan = v_item(0) Dim rsNumero, vr_tx_boleto sql = "select * from vw_ultimo_boleto" set rsNumero = GetRS(sql) idPedido = rsNumero("nr_documento") + 1 sql = "update lancamento set " sql = sql & " nr_documento = '" & idPedido & "'" sql = sql & " where id_lancamento = " & Request.Form("chkBoleto") call executecmd(sql) vr_tx_boleto = 0.0 dim rsTeste, id_parceiro sql = "select * from lancamento where id_lancamento = " & Request.Form("chkBoleto") set rsTeste = GetRS(sql) id_parceiro = rsTeste("id_parceiro") data_vencimento = rsTeste("dt_vencimento") Dim rsLancamento sql = "select * from vw_lancamento_boleto where id_lancamento = " & Request.Form("chkBoleto") set rsLancamento = GetRS(sql) valor = rsLancamento("vr_curso") + 0 + vr_tx_boleto - rsLancamento("vr_desconto") + rsTeste("vr_juros") + rsTeste("vr_multa") data_documento = date data_processamento = date() nome_sacado = rsLancamento("nome") & " - CPF:" & rsLancamento("cpf") endereco_sacado = rsLancamento("endereco") 'Evite mudar estas variaveis abaixo layout_boleto = "3" numero_documento = idPedido nosso_numero = idPedido dvNosso_numero = mod11(convenio &right("0000000000"&idPedido,10),9,0) contrato = "" especie = "R$" especie_doc = "DM" aceite = "N" function mod11(cadeia,limitesup,lflag) mult=1 + (len(cadeia) mod (limitesup-1)) if mult=1 then mult=limitesup end if total=0 for pos=1 to len(cadeia) total=total+(mid(cadeia,pos,1) * mult) mult=mult-1 if mult=1 then mult=limitesup end if Next nresto=(total mod 11) if lflag = 1 then mod11=nresto else if nresto=0 or nresto=1 or nresto=10 then ndig=1 else ndig=11 - nresto end if mod11=ndig end if end function function mod10(cadeia) mult=(len(cadeia) mod 2) mult=mult+1 total=0 for pos=1 to len(cadeia) res= mid(cadeia, pos, 1) * mult if res>9 then res=int(res/10) + (res mod 10) end if total=total+res if mult=2 then mult=1 else mult=2 end if next total=((10-(total mod 10)) mod 10 ) mod10=total end function function linhadigitavel(codigobarras) cmplivre=mid(codigobarras,20,25) campo1=left(codigobarras,4)&mid(cmplivre,1,5) campo1=campo1&mod10(campo1) campo1=mid(campo1,1,5)&"."&mid(campo1,6,5) campo2=mid(cmplivre,6,10) campo2=campo2&mod10(campo2) campo2=mid(campo2,1,5)&"."&mid(campo2,6,6) campo3=mid(cmplivre,16,10) campo3=campo3&mod10(campo3) campo3=mid(campo3,1,5)&"."&mid(campo3,6,6) campo4=mid(codigobarras,5,1) campo5=int(mid(codigobarras,6,14)) if campo5=0 then campo5="000" end if linhadigitavel=campo1&" "&campo2&" "&campo3&" "&campo4&" "&campo5 end function function fvenc(entra) fvenc = DateDiff("d", CDate("7/10/1997"), CDate(entra)) end function function formatar(valor, comp, ench, tipo) dim str str = valor if tipo = "v" then str = Ccur(str) str = formatnumber(str,2,-2,-2,-2) tipo = "e" :str = cstr(str) str = replace(str,",","") str = replace(str,".","") end if for a=len(str) to (comp - 1) if tipo = "e" then str = ench & str else str = str & ench end if next if tipo = "e" then str = left(str,comp) else str = right(str,comp) end if formatar = str end function function d1d2(entra) d1 = mod10(entra) Do d2 = mod11(entra & d1,7,1) if d2 = 1 then if d2 = 9 then d1 = 0 elseif d1 < 9 then d1 = d1 + 1 else d1 = 0 end if end if Loop while d2 = 1 if d2 > 0 then d2 = 11 - d2 end if d1d2 = Cstr(Cstr(entra) & Cstr(d1) & Cstr(d2)) end function function dv(entra) temp = Cint(mod11(entra,9,1)) if temp < 10 then dv = 11 - temp else dv = 1 end if if dv = 11 then dv = 0 if dv = 10 then dv = "X" dv = Cstr(dv) end function layout_boleto = Cstr(layout_boleto) conta = Cstr(formatar(conta,8,"0","e")) fvencimento = Cstr(fvenc(data_vencimento)) valor_str = Cstr(formatar(valor,10,"0","v")) agencia = Cstr(formatar(agencia,4,"0","e")) carteira = Cstr(formatar(carteira,2,"0","e")) if layout_boleto = "3" then convenio = formatar(convenio,7,"0","e") nosso_numero = formatar(nosso_numero,10,"0","e") livre = "000000" & convenio & nosso_numero & carteira dac_nosso_numero = "" nosso_numero = convenio & nosso_numero else Response.Write("ERRO ! <br> Selecione o layout do boleto inválido, use numero 3") Response.End() end if codbar = Cstr("0019" & fvencimento & valor_str & livre) dac = Cstr(mod11(codbar,9,0)) codbar = Cstr("0019" & dac & fvencimento & valor_str & livre) linha_digitavel = linhadigitavel(codbar) agencia_codigo = agencia &"-"& dac_agencia & "/" & conta &"-"& dac_conta valor = formatnumber(Ccur(valor),2,-2,-2,-2) %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <html> <head> <title>Boleto BB</title> <meta http-equiv=Content-Type content="text/html;charset=windows-1252"> <meta content="MSHTML 6.00.2800.1400" name=GENERATOR> <style> .Titulo11{ font:11px Arial, Helvetica, sans-serif; } .campo{ font:10px Verdana, Arial, Helvetica, sans-serif; } .CampoTitulo{ font:bold 14px Arial, Helvetica, sans-serif; } .Normal{ font:12px Arial, Helvetica, sans-serif; } @media print { body * { visibility: hidden; } #printable, #printable * { visibility: visible; } #printable { position: fixed; left: 0; top: 0; } } </style> </head> <body bgcolor="White" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" bgproperties="fixed"> <br> <center><input type="button" name="imprimir" value="Imprimir" onclick="window.print();"> </center><br> <div id="printble"> <table border="0" cellPadding="0" cellSpacing="0" width="660"> <tr> <td class="Normal"> <div align="center"> <b>O pagamento deste boleto também poderá ser efetuado pelo Auto-Atendimento BB na Internet ou pelos Terminais de Auto-Atendimento.</b> </div> <p> <b>Instruções:</b><br> <ol> <li>Imprima em impressora jato de tinta (ink jet) ou laser em qualidade normal ou alta. Não use modo econômico.</li> <li>Utilize folha A4 (210 x 297mm) ou Carta (216 x 279mm) e margens mínimas à esquerda e à direita do formulário.</li> <li>Corte na linha indicada. Não rasure, risque, fure ou dobre a região onde se encontra o código de barras.</li> </ol> </p> </td> </tr> </table> <br> <div style="position:absolute;top:145px;left:5px;height:636px;width:670px;z-index:1;"> <img src="imagens_bb/bbformularioBoleto.gif" width="647" height="636" border="0" alt=""> </div> <div style="position:absolute;top:161px;left:7px;height:22px;width:96px;z-index:2;"> <img src="imagens_bb/bblogoBoleto.gif" width="150" height="22" border="0" alt=""> </div> <div style="position:absolute;top:444px;left:7px;height:22px;width:96px;z-index:2;"> <img src="imagens_bb/bblogoBoleto.gif" width="150" height="22" border="0" alt=""> </div> <div style="position:absolute;top:127px;left:7px;z-index:2;" class="Titulo11"> Corte na linha pontilhada </div> <div style="position:absolute;top:138px;left:5px;z-index:2;" class="Titulo11"> <img src="imagens_bb/bblinhaPontilhada.gif" width="650" height="5" border="0" alt=""> </div> <div style="position:absolute;top:145px;left:549px;z-index:2;" class="Campo"> <b>Recibo do Sacado</b> </div> <div style="position:absolute;top:167px;left:163px;z-index:2;" class="CampoTitulo"> 001-9 </div> <div style="position:absolute;top:166px;left:210px;z-index:2;width:438px;text-align:right;" class="CampoTitulo"> <layer name="helpns" width=438px><%=linha_digitavel%></layer> </div> <div style="position:absolute;top:450px;left:163px;z-index:2;" class="CampoTitulo"> 001-9 </div> <div style="position:absolute;top:449px;left:210px;z-index:2;width:438px;text-align:right;" class="CampoTitulo"> <layer name="helpns" width=438px><%=linha_digitavel%></layer> </div> <div style="position:absolute;top:184px;left:15px;z-index:2;" class="Titulo11"> Cedente </div> <div style="position:absolute;top:184px;left:317px;z-index:2;" class="Titulo11"> Código do Cedente </div> <div style="position:absolute;top:184px;left:438px;z-index:2;" class="Titulo11"> Espécie </div> <div style="position:absolute;top:184px;left:480px;z-index:2;" class="Titulo11"> Quantidade </div> <div style="position:absolute;top:184px;left:536px;z-index:2;" class="Titulo11"> Nosso número </div> <div style="position:absolute;top:209px;left:15px;z-index:2;" class="Titulo11"> Número do documento </div> <div style="position:absolute;top:209px;left:135px;z-index:2;" class="Titulo11"> Contrato </div> <div style="position:absolute;top:209px;left:214px;z-index:2;" class="Titulo11"> CPF/CEI/CNPJ </div> <div style="position:absolute;top:209px;left:353px;z-index:2;" class="Titulo11"> Vencimento </div> <div style="position:absolute;top:209px;left:480px;z-index:2;" class="Titulo11"> Valor documento </div> <div style="position:absolute;top:234px;left:15px;z-index:2;" class="Titulo11"> (-)Desconto/Abatimento </div> <div style="position:absolute;top:234px;left:135px;z-index:2;" class="Titulo11"> (-)Outras opções </div> <div style="position:absolute;top:234px;left:251px;z-index:2;" class="Titulo11"> (+)Mora/Multa </div> <div style="position:absolute;top:234px;left:367px;z-index:2;" class="Titulo11"> (+)Outros acréscimos </div> <div style="position:absolute;top:234px;left:480px;z-index:2;" class="Titulo11"> (=)Valor cobrado </div> <div style="position:absolute;top:259px;left:15px;z-index:2;" class="Titulo11"> Sacado </div> <div style="position:absolute;top:284px;left:15px;z-index:2;" class="Titulo11"> Instruções </div> <div style="position:absolute;top:284px;left:574px;z-index:2;" class="Titulo11"> Autenticação Mecânica </div> <div style="position:absolute;top:415px;left:7px;z-index:2;" class="Titulo11"> Corte na linha pontilhada </div> <div style="position:absolute;top:426px;left:5px;z-index:2;" class="Titulo11"> <img src="imagens_bb/bblinhaPontilhada.gif" width="650" height="5" border="0" alt=""> </div> <div style="position:absolute;top:467px;left:15px;z-index:2;" class="Titulo11"> Local de pagamento </div> <div style="position:absolute;top:467px;left:480px;z-index:2;" class="Titulo11"> Vencimento </div> <div style="position:absolute;top:492px;left:15px;z-index:2;" class="Titulo11"> Cedente </div> <div style="position:absolute;top:492px;left:480px;z-index:2;" class="Titulo11"> Agência/Código do cedente </div> <div style="position:absolute;top:517px;left:15px;z-index:2;" class="Titulo11"> Data do documento </div> <div style="position:absolute;top:517px;left:133px;z-index:2;" class="Titulo11"> Nº do documento </div> <div style="position:absolute;top:517px;left:295px;z-index:2;" class="Titulo11"> Espécie DOC </div> <div style="position:absolute;top:517px;left:364px;z-index:2;" class="Titulo11"> Aceite </div> <div style="position:absolute;top:517px;left:405px;z-index:2;" class="Titulo11"> Data process. </div> <div style="position:absolute;top:517px;left:480px;z-index:2;" class="Titulo11"> Nosso Número </div> <div style="position:absolute;top:542px;left:15px;z-index:2;" class="Titulo11"> Uso do Banco/Convênio </div> <div style="position:absolute;top:542px;left:133px;z-index:2;" class="Titulo11"> Carteira </div> <div style="position:absolute;top:542px;left:223px;z-index:2;" class="Titulo11"> Espécie </div> <div style="position:absolute;top:542px;left:283px;z-index:2;" class="Titulo11"> Quantidade </div> <div style="position:absolute;top:542px;left:405px;z-index:2;" class="Titulo11"> xValor </div> <div style="position:absolute;top:542px;left:480px;z-index:2;" class="Titulo11"> (=) Valor do documento </div> <div style="position:absolute;top:567px;left:15px;z-index:2;" class="Titulo11"> Instrucoes </div> <div style="position:absolute;top:567px;left:480px;z-index:2;" class="Titulo11"> (-) Desconto / Abatimento </div> <div style="position:absolute;top:592px;left:480px;z-index:2;" class="Titulo11"> (-) Outras deduções </div> <div style="position:absolute;top:618px;left:480px;z-index:2;" class="Titulo11"> (+) Mora / Multa </div> <div style="position:absolute;top:643px;left:480px;z-index:2;" class="Titulo11"> (+) Outros acréscimos </div> <div style="position:absolute;top:668px;left:480px;z-index:2;" class="Titulo11"> (=) Valor cobrado </div> <div style="position:absolute;top:573px;left:463px;z-index:2;" class="Titulo11"> 27 </div> <div style="position:absolute;top:620px;left:463px;z-index:2;" class="Titulo11"> 35 </div> <div style="position:absolute;top:596px;left:463px;z-index:2;" class="Titulo11"> 19 </div> <div style="position:absolute;top:693px;left:15px;z-index:2;" class="Titulo11"> Sacado </div> <div style="position:absolute;top:739px;left:480px;z-index:2;" class="Titulo11"> Cód. baixa </div> <div style="position:absolute;top:740px;left:15px;z-index:2;" class="Titulo11"> Sacador/Avalista </div> <div style="position:absolute;top:751px;left:470px;z-index:2;" class="Titulo11"> Autenticação mecânica - Ficha de Compensação </div> <div style="position:absolute;top:197px;left:15px;z-index:2;" class="Campo"> <%=cedente%> </div> <div style="position:absolute;top:197px;left:317px;z-index:2;width:120px;" class="Campo"> <%=agencia_codigo%> </div> <div style="position:absolute;top:197px;left:438px;z-index:2;width:28px;" class="Campo"> R$ </div> <div style="position:absolute;top:197px;left:480px;z-index:2;width:50px;" class="Campo"> 0001 </div> <div style="position:absolute;top:197px;left:531px;z-index:2;width:118px;text-align:right;" class="Campo"> <%=nosso_numero%> </div> <div style="position:absolute;top:222px;left:15px;z-index:2;width:110px;" class="Campo"> <%=right("0000000000"& numero_documento, 10)%> </div> <div style="position:absolute;top:222px;left:135px;z-index:2;width:70px;" class="Campo"> <%=contrato%> </div> <div style="position:absolute;top:222px;left:214px;z-index:2;width:125px;" class="Campo"> <%=cpf_cnpj%> </div> <div style="position:absolute;top:222px;left:353px;z-index:2;width:118px;" class="Campo"> <%=data_vencimento%> </div> <div style="position:absolute;top:222px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=valor%> </div> <div style="position:absolute;top:247px;left:15px;z-index:2;width:108px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:133px;z-index:2;width:107px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:248px;z-index:2;width:108px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:361px;z-index:2;width:108px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:272px;left:15px;z-index:2;" class="Campo"> <%=nome_sacado%> </div> <div style="position:absolute;top:312px;left:15px;z-index:2;width:498px;text-align:justify;" class="Campo"> <layer name="helpns" width=498px align="left"><%=instrucoes1%><br><%=instrucoes2%><br><%=instrucoes3%><br><%=instrucoes4%><br><%=instrucoes5%></layer> </div> <div style="position:absolute;top:480px;left:15px;z-index:2;" class="Campo"> Pagável em qualquer Banco até o vencimento </div> <div style="position:absolute;top:480px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=data_vencimento%> </div> <div style="position:absolute;top:505px;left:15px;z-index:2;" class="Campo"> <%=cedente%> </div> <div style="position:absolute;top:505px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=agencia_codigo%> </div> <div style="position:absolute;top:530px;left:15px;z-index:2;width:110px;" class="Campo"> <%=data_documento%> </div> <div style="position:absolute;top:530px;left:133px;z-index:2;width:160px;" class="Campo"> <%=right("0000000000"& numero_documento, 10)%> </div> <div style="position:absolute;top:530px;left:295px;z-index:2;width:60px;" class="Campo"> <%=especie_doc%> </div> <div style="position:absolute;top:530px;left:364px;z-index:2;width:35px;" class="Campo"> <%=aceite%> </div> <div style="position:absolute;top:530px;left:405px;z-index:2;width:60px;" class="Campo"> <%=data_processamento%> </div> <div style="position:absolute;top:530px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=nosso_numero%> </div> <div style="position:absolute;top:556px;left:15px;z-index:2;" class="Campo"> </div> <div style="position:absolute;top:556px;left:133px;z-index:2;" class="Campo"> <%=carteira%> </div> <div style="position:absolute;top:556px;left:223px;z-index:2;" class="Campo"> <%=especie%> </div> <div style="position:absolute;top:556px;left:283px;z-index:2;" class="Campo"> </div> <div style="position:absolute;top:556px;left:405px;z-index:2;width:65px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:556px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=valor%> </div> <div style="position:absolute;top:580px;left:15px;z-index:2;width:430px;text-align:justify;" class="Campo"> <layer name="helpns" width=430px align="left"><%=instrucoes1%><br><%=instrucoes2%><br><%=instrucoes3%><br><%=instrucoes4%><br><%=instrucoes5%></layer> </div> <div style="position:absolute;top:580px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:605px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:631px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:656px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:581px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:704px;left:15px;z-index:2;" class="Campo"> <%=nome_sacado%> </div> <div style="position:absolute;top:717px;left:15px;z-index:2;" class="Campo"> <%=endereco_sacado%> </div> <div style="position:absolute;top:830px;left:7px;z-index:2;" class="Titulo11"> Corte na linha pontilhada </div> <div style="position:absolute;top:827px;left:7px;z-index:2;" class="Titulo11"> <img src="imagens_bb/bblinhaPontilhada.gif" width="650" height="5" border="0" alt=""> </div> <div style="position:absolute;top:760px;left:12px;height:70px;z-index:2;" class="Titulo11"> <table border=0 cellPadding=0 cellSpacing=0 width="666"> <tr> <td colspan="2"> <% next function fbarcode(valor_barras) Dim f, f1, f2, i Dim texto Const fino = 1 Const largo = 3 Const altura = 50 Dim BarCodes(99) if isempty(BarCodes(0)) then BarCodes(0) = "00110" BarCodes(1) = "10001" BarCodes(2) = "01001" BarCodes(3) = "11000" BarCodes(4) = "00101" BarCodes(5) = "10100" BarCodes(6) = "01100" BarCodes(7) = "00011" BarCodes(8) = "10010" BarCodes(9) = "01010" for f1 = 9 to 0 step -1 for f2 = 9 to 0 Step -1 f = f1 * 10 + f2 texto = "" for i = 1 To 5 texto = texto & mid(BarCodes(f1), i, 1) + mid(BarCodes(f2), i, 1) next BarCodes(f) = texto next next end if %> <img src=imagens_bb/p.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/b.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/p.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/b.gif width=<%=fino%> height=<%=altura%> border=0><img <% texto = valor_barras if len( texto ) mod 2 <> 0 then texto = "0" & texto end if do while len(texto) > 0 i = cint( left( texto, 2) ) texto = right( texto, len( texto ) - 2) f = BarCodes(i) for i = 1 to 10 step 2 if mid(f, i, 1) = "0" then f1 = fino else f1 = largo end if %> src=imagens_bb/p.gif width=<%=f1%> height=<%=altura%> border=0><img <% if mid(f, i + 1, 1) = "0" Then f2 = fino else f2 = largo end if %> src=imagens_bb/b.gif width=<%=f2%> height=<%=altura%> border=0><img <% next loop %> src=imagens_bb/p.gif width=<%=largo%> height=<%=altura%> border=0><img src=imagens_bb/b.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/p.gif width=<%=1%> height=<%=altura%> border=0> <% end function %> <%=fbarcode(codbar)%> </td> </tr> </table> </div> </div> </body> </html> Alguém pode me ajudar? Obrigado!
  5. Tenho uma pasta que chama "tmp" e gostaria de apagar tudo que estiver nesta pasta e deixa-la vazia , alguém pode me ajudar ?
  6. No site que assumi de um cliente, desenvolvido em ASP.Net com C#, existem colaboradores cadastrados com uma data de admissão definida. O cadastro desses colaboradores está em uma tabela de banco SQL Server 2008. Eu precisava criar alguma coisa (talvez um task) que conferisse se existem usuários com 45 dias desde a sua data admissão. Possivelmente uma consulta SELECT no banco. Se existir, um e-mail automático é enviado pro(s) devido(s) usuário(s) avisando que eles devem preencher uma autoavaliação. Como eu posso fazer isso? O ASP.Net tem alguma coisa nesse sentido? Já me falaram do Hangfire, mas eu não entendi como implementar ele.
  7. Ola Amigos do Forum To precisando de mais uma ajuda. To precisando fazer um APP basico interno aqui para minha empresa, muito simples. Pretendo fazer da seguinte forma: 1- Html5+JQuery+JavaScript 2- Transformar o passo 1 em App atraves do phoneGap 3- fazer o APP conversar via Javascript com o um webservice em ASP Basic via JSon Ja sei programar em ASP e Javascript e conheço o Jquery. Porem preciso de ajuda no seguinte: Preciso de um exemplo de um form html+javascript que submete para o webservice ASP e o webservice retorna uma lista em json. Alguém pode me ajudar no exemplo Obrigado
  8. Bom dia, tudo bem? Como transformar este código para asp? *** Já testei tudo quanto foi array e não consigo, pois nunca fiz nada com array... *** Se puder só fazer um exemplo para este caso, eu consigo fazer o restante.... obrigado! ==================================== <?php $dados = $_POST; //Chave Unica //Para verificar se o POST foi enviado pela Monetizze $chaveUnica = $dados['chave_unica']; if($chaveUnica != '00000000000000000000000000') { exit; } //dados do produto $codigoProduto = $dados['produto']['codigo']; $nomeProduto = $dados['produto']['nome']; //dados da venda $codVenda = $dados['venda']['codigo']; // Código da transação $codPlano = $dados['venda']['plano']; // código do plano do produto (da edição do produto aba planos) $dataInicio = $dados['venda']['dataInicio']; // Data que iniciou a compra. Formato: yyyy-mm-dd H:i:s $dataFinalizada = $dados['venda']['dataFinalizada']; // Data em que foi confirmado o pagamento. Formato: yyyy-mm-dd H:i:s // $linkBoleto e $linhaDigitavel - Somente Produto e co-produtor OU se os dados do comprador estiverem liberados para o afiliado $linkBoleto = $dados['venda']['linkBoleto'] ; //Quando a forma de pagamento for Boleto, aqui vem o link para impressão do boleto $linhaDigitavel = $dados['venda']['linha_digitavel'] ; //Quando a forma de pagamento for Boleto, aqui vem a linha digitável do boleto //Dados do comprador - Somente Produto e co-produtor OU se os dados do comprador estiverem liberados para o afiliado $nome = $dados['comprador']['nome']; $email = $dados['comprador']['email']; $data_nascimento = $dados['comprador']['data_nascimento']; // Formato yyyy-mm-dd $cnpj_cpf = $dados['comprador']['cnpj_cpf']; ================================================== Este é o código de integração da monetizze, que preciso transformar para asp.. Obrigado por qualquer ajuda...
  9. ricarossi

    Carregar radio + hidden

    Pessoal... estou como problema... Alguém pode dar uma ajuda, por favor? Trago algumas informações do banco de dados para um formulário em looping. O usuário ao optar por uma opção mencionada no “radio”, desejo que além desta variável marcada que também carregue a outra “hidden” as quais alimentarão uma nova tabela em Banco de Dados. No entanto, o hidden não acompanha o radio selecionado. Preciso que ao optar pelo “radio” também suba a variável do “hidden”. ok? Suponho que uma boa opção é usar o Java Script, porém não obtive sucesso nos testes realizados. ------------------------------------------------------------------- <input type="radio" value="<%=objRS("correta_resposta1")%>" name="resposta<%=contador%>"> '-- ok vem ao optar <input type="hidden" value="<%=objRS("pesos")%>" name="pesos<%=contador%>"> '-- quero que carregue também mas não vem -----------------------------------------------------------------------------------------------------------------------
  10. Assim como existe em formulários de sites ASP.Net o RequiredFieldValidator, que obriga o preenchimento de um campo, existe alguma forma de ter obrigatoriamente um gridview com pelo menos uma linha? Por exemplo, eu tenho no meu site (ASP.Net com C#) uma parte de cadastro de currículos. Como campo obrigatório, tem a formação do usuário, que ele deve preencher com um dos itens do Dropdownlist. Depois, tem a opção de adicionar os cursos de formação. Cada curso adicionado vai para um GridView. Então eu precisaria ter como obrigatoriedade ter esse gridview pra ele poder cadastrar o currículo. Se não tiver esse gridview presente (com pelo menos uma linha de dado), ele não cadastra o currículo. Segue o código do Gridview: <asp:GridView ID="gwFormacao" runat="server" AutoGenerateColumns="False" HeaderStyle-BackColor="#E74310" HeaderStyle-ForeColor="White"> <Columns> <asp:BoundField DataField="curso" HeaderText="Curso" HtmlEncode="False" /> <asp:BoundField DataField="instituicao" HeaderText="Instituição" HtmlEncode="False" /> <asp:BoundField DataField="anoConclusao" HeaderText="Ano/Previsão de conclusão" HtmlEncode="False" /> <asp:TemplateField HeaderText="Opções"> <ItemTemplate> <asp:ImageButton ID="imgBtnExcluirFormacao" runat="server" ImageUrl="~/imagens/excluir16.png" ToolTip="Excluir situação" CommandArgument='<%# DataBinder.Eval(Container,"RowIndex") %>' oncommand="imgBtnExcluirFormacao_Command" /> <ajaxtoolkit:ConfirmButtonExtender ID="cbeExcluirSituacao" runat="server" TargetControlID="imgBtnExcluirFormacao" DisplayModalPopupID="pmeConfirmBox"></ajaxtoolkit:ConfirmButtonExtender> <ajaxtoolkit:ModalPopupExtender ID="pmeConfirmBox" runat="server" TargetControlID="imgBtnExcluirFormacao" PopupControlID="pnlPopUpConfirm" OkControlID="lkbOk" CancelControlID="lkbCancelar"></ajaxtoolkit:ModalPopupExtender> <asp:Panel ID="pnlPopUpConfirm" runat="server" DefaultButton="lkbOk" CssClass="panel"> <table width="100%"> <tr> <td colspan="2" align="left"><asp:Label ID="lblTitulo" runat="server" Text="Questão"></asp:Label></td> </tr> <tr> <td style="width: 60px" valign="middle" align="left"><asp:Image ID="imgPopUp" runat="server" ImageUrl="~/imagens/confirmacao32.png" /></td> <td valign="middle" align="left"><asp:Label ID="lblMensagem" runat="server" Text="Confirma exclusão da formação"></asp:Label></td> </tr> <tr> <td colspan="2" align="right"> <asp:LinkButton ID="lkbOk" runat="server" Text="Ok"></asp:LinkButton> <asp:LinkButton ID="lkbCancelar" runat="server" Text="Cancelar"></asp:LinkButton> </td> </tr> </table> </asp:Panel> </ItemTemplate> <ItemStyle HorizontalAlign="Center" Width="35px" /> </asp:TemplateField> </Columns> </asp:GridView>
  11. Oi To com o seguinte problema Em uma pagina principal, contendo formulários e elementos diversos Quero exibir uma outra página por meio de uma div posicionada no inicio da pagina principal. Tudo funciona bem, exceto pelo fato da div com a página nova quebrar toda a página principal mesmo usando o z-index =999 Alguém sabe como posso resolver ?
  12. Como configurar o IIS para não exibir mensagens de erro de jeito nenhum, alguém sabe ? Já tentei de tudo Percebi que colocando On Error Resume Next no código ASP, hora o ASP consegue capturar o erro e mostrar minha mensagem personalizada hora não e exibe uma mensagem do IIS, se referindo a TimeOut O código está assim On Error Resume Next Set rs = objCMD.Execute if Err.Number <> 0 then response.redirect("MyMensa.ASP") end if
  13. Oi Alguém sabe como pegar um valor escolhido em uma popup como um ID por exemplo e para atualizar a página (janela pai) ?
  14. MarKteus

    Popup sem borda no IE 6

    Olá Alguém sabe se existe uma forma de abrir um popup sem borda e modal no IE6. Ou na melhor das hipóteses só modal ? E como como deixá-las no tamanho desejado A bem da verdade modal eu até consegui só não consigo deixa no tamanho correto.
  15. Olá Existe alguma forma de clicar em um link na Internet Explorer e a página ser aberta no Google Chrome ? ou qualquer outro navegador ?
  16. Olá Possuo um sistema asp 3 que carrega um menu dinamicamente, porém o tal menu é criado e carregado normalmente quando publicado, mas no localhost o mesmo não acontece O menu foi implementado utilizando-se javascript e css e foi projetado para ler e exibir os com ajuda do asp, itens de uma tabela de banco, aparente tudo é carregado normalmente no recordset, porém as div com os itens não são criados/exibidos. O browser utilizado é o IE10 e IE11, o projeto é da época do IE6. Já ativei e desativei várias vezes o modo de compatibilidade do IE, mas nada acontece. Alguém sabe o que pode ser ?
  17. DinhoPHP

    Exibir table por completo

    Olá! Tenho uma tabela que contém todos os dias de cada mês, e a pedido do meu cliente, ele deseja que a mesma apareça por completo em dispositivos mobile como no link de nome futuro. Eu a tornei responsiva na vertical, porém desfiz porque não o agradou. Gostaria de fazer isso via CSS. Tabela atual: http://equipenovainfo.com.br/atual.jpg E como deve ficar: http://equipenovainf...m.br/futuro.jpg Segue abaixo a div que contém esta tabela: <div id="calendario-card"> <asp:HiddenField ID="hiddenDataCalendario" runat="server" ClientIDMode="Static" /> <table class="table_mob"> <thead> <tr> <th></th> <asp:Literal ID="ltrCalendarioDiasMes" runat="server" ClientIDMode="Static" /> </tr> </thead> <tbody> <asp:Literal ID="ltrCalendarioImoveis" runat="server" ClientIDMode="Static" /> </tbody> </table> </div>
  18. Hanna Liz

    Banner Rotativo

    Boa tarde, sou iniciante em asp.net, estou tentando criar um banner rotativo em meu projeto, porem não estou tendo sucesso. Estou utilizando a estrutura MVC. Gostaria também de saber, se há a possibilidade de o código que realiza a busca das imagens, pudesse buscar elas aleatoriamente em minha pasta de imagens, independentemente do nome.
  19. Olá Estou enfrentando o seguinte problema: As funções javascript enquanto estão na mesma pagina funcionam normalmente, porém, quando as coloco em um arquivo separado elas não funcionam mais. Sim. O path está correto. <head> <title></title> <script type="text/javascript" src="assets/custom/js/jquery-1.8.2.min.js"></script> <script type="text/javascript" src="controlfunctions.js"></script> <script type="text/javascript"> jQuery(document).ready(function () { }) </script> </head> Alguém sabe o por que ?
  20. Olá amigos Alguém sabe se é possível usar RecordSet.Sort no ASP clássico ? Estou tentando mas só to tomando Internal Server Error. Vejam Set RdsData = Info.ListarUsuarios Set nome = RdsData.Find "Usuario='Indra'" <= Linha que esta me fud,... mas já tentei nome = RdsData.Find "Usuario='Indra'" abaixo trecho da classe que gera o RecordSet Public Function ListarUsuarios() Set Rds = dao.AdoRecordset strSql = "SELECT * FROM USUARIO (NOLOCK)" With Rds .CursorLocation = 3 .CursorType = 2 .LockType = 3 Set ListarUsuarios = .Open(strSql, Connection) End With Connection.Close End Function
  21. Alguém sabe de algum programa ou extensão que possa fazer uma espécie de "descompilamento" de arquivos DLL (que contém classes de um site) em arquivos CS e ASPX.CS? Por enquanto, só sei do .NET Reflector, que é usado como extensão do Visual Studio. Ele consegue acesso aos CS, mas não consegui acessar os códigos de arquivos ASPX.CS, por enquanto. Preciso disso pra poder acessar todas as fontes de um site feito em ASP.NET com C#, que assumi de outro desenvolvedor (que entrei em contato pra que me passe esses fontes atualizados, mas por enquanto não recebi retorno dele. Por isso estou indo por vários caminhos). E isso inclui os ASPX.CS O que posso fazer?
  22. Olá! Estou fazendo um teste para atualizar uma informação em um dos meus itens do banco de dados; porém houve um erro e não consigo decifra-lo. "Tipos incompatíveis" Busco as informações no banco: <%Dim caminho, conexao, rsProduto, seleciona%> <% caminho = "D:\web\LocalUser\divinho\banco\db.mdb" Set conexao = Server.CreateObject("ADODB.Connection") conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&caminho&";" %> <% Set rsProduto = Server.CreateObject("ADODB.Recordset") seleciona = "SELECT * from Produtos where Cod_produto = "& request("cod") rsProduto.Open seleciona, conexao Dim cod cod = request("cod") %> <FORM name="frmPrincipal" method="post" id="frmPrincipal" action="teste.asp?cod=<%=cod%>"> <input type=text name=codigo value="<%=rsProduto("Cod_produto")%>"> <input type=text name=nome value="<%=rsProduto("Nome")%>"> <input type="Submit" value="Enviar "> </form> Realizando o UPDATE <%Dim caminho, conexao%> <% caminho = "D:\web\LocalUser\divinho\banco\db.mdb" Set conexao = Server.CreateObject("ADODB.Connection") conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&caminho&";" %> <% Dim sql, nome, cod, executecmd nome = request.form("nome") cod = request.form("codigo") sql = "update Produtos set " sql = sql & " Nome = '" & nome & "'" sql = sql & " where Cod_produto = " & cod call executecmd(sql) Response.Redirect "teste2.asp" %> Podem testar através do link: http://divinho.com.br/teste2.asp?cod=344 Agradeço se alguém puder ajudar! :D
  23. MarKteus

    Qual o por que desse erro ?

    Erro de tempo de execução do Microsoft VBScript erro '800a01b6' O objeto não dá suporte para a propriedade ou método: 'RecordCount' Estou obtendo esse erro ao tentar descobrir quantos registros foram retornados, O estranho é que em outras ocasiões, eu mesmo já usei método e não tive problemas Set objCommand= Server.CreateObject("ADODB.Command") Set objRecordset = Server.CreateObject("ADODB.Recordset") if not IsNull(Connection) then With objCommand .CommandText = "SELECT * FROM Usuario NOLOCK" .CommandType = 1 .ActiveConnection = Connection Set objRecordset = .Execute() End With end if
  24. Qual a diferença entre Set e Let em classes Asp ? Public Property Let NomePessoa(params) nome = params End Property Public Property Set NomePessoa(params) nome = params End Property
  25. Alguem tem uma luz Set Con = CreateObject("ADODB.Connection") Con.ConnectionString = "Provider=SQLOLEDB;Data Source=(Local);Initial Catalog=MyBank;Persist Security Info=False;Integrated Security=SSPI" OpenConnection = Con.Open Mensagem de erro Microsoft OLE DB Provider for SQL Server erro '80004005' Não é possível abrir o banco de dados "SimpleCrudWithBoostrap" solicitado pelo logon. Falha de logon.
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.