Correção de script de geração de código de barras para boleto
19/03/2025 às 19:14Descrição do Projeto:
https://simastechnology.com.br/teste/boleto.asp
<%Response.charset="ISO-8859-1"%>
<table cellspacing=0 cellpadding=1 border=0 width=612>
<tbody>
<tr>
<TD style="<%=borderLeftNone & cp%>" width=475 >
<small style="<%=ct%>">Pagador/Avalista</small>
<%
codbar = "033921002500000186009049308700000002498740101"
%>
<%cod_bar(codbar)
Sub cod_bar( x22 )
Dim x2(99)
Const x85 = 1 : Const x131 = 3 : Const x44 = 50
if isempty(x2(0)) then
x2(0) = "00110" : x2(1) = "10001" : x2(2) = "01001" : x2(3) = "11000"
x2(4) = "00101" : x2(5) = "10100" : x2(6) = "01100" : x2(7) = "00011"
x2(8) = "10010" : x2(9) = "01010"
for x99 = 9 to 0 step -1
for x3 = 9 to 0 Step -1
x125 = x99 * 10 + x3 : x126 = ""
for x18 = 1 To 5
x126 = x126 & mid(x2(x99), x18, 1) + mid(x2(x3), x18, 1)
next
x2(x125) = x126
next
next
end if
%>
<img src=p.gif width=<%=x85%> height=<%=x44%> border=0><img src=b.gif width=<%=x85%> height=<%=x44%> border=0><img src=p.gif width=<%=x85%> height=<%=x44%> border=0><img src=b.gif width=<%=x85%> height=<%=x44%> border=0><img
<%
x126 = x22
if len(x126) mod 2 <> 0 then
x126 = "0" & x126
end if
do while len(x126) > 0
x18 = cint(left( x126, 2)) : x126 = right(x126, len(x126) - 2) : x125 = x2(x18)
for x18 = 1 to 10 step 2
if mid(x125, x18, 1) = "0" then
x99 = x85
else
x99 = x131
end if
%>
src=p.gif width=<%=x99%> height=<%=x44%> border=0><img
<%if mid(x125, x18 + 1, 1) = "0" Then
x3 = x85
else
x3 = x131
end if%>
src=b.gif width=<%=x3%> height=<%=x44%> border=0><img
<%next
loop%>
src=p.gif width=<%=x131%> height=<%=x44%> border=0><img src=b.gif width=<%=x85%> height=<%=x44%> border=0><img src=p.gif width=<%=1%> height=<%=x44%> border=0>
<% end sub %>
</td>
<TD style="<%=borderLeftNone%>" ><small style="<%=ct%>">Autenticação mecânica - <b style="<%=cp%>" >Ficha de Compensação</b></td>
</tr>
</tbody>
</table>
Atividades do cliente nesse projeto:
Última visualização: 20/03/2025 às 11:11
Informações adicionais
| Categoria: | Web, Mobile & Software |
|---|---|
| Subcategoria: | Outra - Web, Mobile & Software |
| Orçamento: | Aberto |
| Nível de experiência: | Iniciante |
| Visibilidade: | Público |
| Propostas: | 2 |
| Interessados: | 2 |
| Valor Mínimo: | R$ 50,00 |
-
Submetido: 19/03/2025 às 23:25 | Oferta: Privado | Duração estimada: Privado
-
Submetido: 19/03/2025 às 22:20 | Oferta: Privado | Duração estimada: Privado
Consultoria para desenvolvimento de dashboard em Grafana - Preciso de uma pessoa para consultoria e desenvolvimento de um dashboard em Grafana. O dashboard terá em torno de 10 gráficos e gostaria de avaliar a possibilidade de embarcar o dashb...
Criador de scripts para o jogo Blood Strike - Olá, boa noite! Preciso de alguém que faça scripts para mim no jogo Blood Strike! Observação: os scripts devem funcionar perfeitamente no aplicativo Game Guardia...
Ajustar script Python para PDF e CSV seguindo schema PostgreSQL - Sou desenvolvedor e já iniciei um script em Python que extrai dados dos PDFs do Inmetro (anos de 2023 a 2025) com sucesso. Porém, os PDFs dos anos anteriores (2009 a 2022) possuem alg...
Correção de erro fatal no WordPress - Site: imp…ojs.com.br (WordPress 6.8.1, PHP 8.2, HostGator compartilhado) ficou fora do ar com erro 500. Segui tutoriais, alterei o .htaccess e agora o erro mudou para: "Fatal error: Un...
Desenvolvimento de sistema para gerenciamento - Projeto: Plataforma Web para Gestão de Clientes de IPTV Descrição do projeto: Preciso do desenvolvimento de um sistema web para gestão manual de assinaturas de IPTV, c...
