% 'server.ScriptTimeout=99999999 'Err.Clear 'On Error Resume Next vpaginax = Request("pagina") if trim(vpaginax) = "" or isnull(vpaginax) then vpaginax = "1" end if MySQL_STRING="Driver={MySQL ODBC 5.1 Driver};Server=robb0501.publiccloud.com.br;Port=3306;Database=OKEY_produtos;User=OKEY_usuario; Password=#okbd2017#;Option=3;" set OBJdbConnection = Server.CreateObject("ADODB.Connection") set rs= Server.CreateObject("ADODB.Recordset") OBJdbConnection.Open MySQL_STRING rs.ActiveConnection = OBJdbConnection set fs=Server.CreateObject("Scripting.FileSystemObject") SQL = "SELECT DISTINCT codigo,endweb,descricao FROM tabela_preco where valida = 2018 and criado = 'X' and not isnull(endweb) and trim(endweb) <> '' order by codigo" Set rs=OBJdbConnection.Execute(SQL) if not rs.eof then vcr = 0 vcontareg = 250 do while not rs.eof vcr = vcr + 1 rs.movenext loop if vcr < 5 then vcontareg = 270 end if if vcr > 4 and vcr <=8 then vcontareg = 490 end if if vcr > 8 and vcr <=12 then vcontareg = 720 end if if vcr > 12 then vcontareg = 930 end if rs.movefirst ' FAZ CONTAGEM DE PAGINAS NA SELECAO vtotalregistros = 0 vtotalf=0 do while not rs.eof vtotalregistros = vtotalregistros + 1 rs.movenext loop vfor = ((vpaginax -1) * 16) + 1 if vfor = 1 then rs.movefirst else rs.movefirst for y = 1 to vfor -1 if not rs.eof then rs.movenext end if next end if vtpag = ROUND(vtotalregistros / 16,1) if vtpag > int(vtpag) then vtpag = int(vtpag) + 1 end if vap = "" if vtpag = 0 then vtpag = 1 end if for y = 1 to vtpag vap = vap & y & "^" next varray = Split(vap,"^") vtx = (vcr - vfor) + 1 if vtx < 5 then vcontareg = 270 end if if vtx > 4 and vtx <=8 then vcontareg = 490 end if if vtx > 8 and vtx <=12 then vcontareg = 720 end if if vtx > 12 then vcontareg = 930 end if end if if rs.eof then Response.Redirect "https://www.okey.com.br" end if vtipo = rs("endweb") %>
Part Number produtos AIDC e Automação comercial
Aluguel de Coletores de dados e leitores sem fio, coletores para eventos, locação de impressora Zebra e Argox para eventos, aluguel de impressoras de etiquetas, Aluguel de Videowall, Aluguel de Tablets, Outsourcing, Aluguel de Tlp2844 Zebra, Aluguel de impressoras Bluetooth, QRcode, mini leitores Bluetooth e impressoras móveis. Impressoras ARGOX, ZEBRA, DATAMAX
ALUGUEL DE EQUIPAMENTOS PARA FEIRAS DE EXPOSIÇÃO, CONGRESSOS, PALESTRAS, ALUGUEL DE IMPRESSORAS, IMPRESSORAS DE ETIQUETAS PARA EVENTOS
SISTEMAS PARA INVENTÁRIOS, EMISSÃO DE PEDIDOS EM FEIRAS DE EXPOSIÇÃO, ALUGUEL DE COLETORES DE DADOS
Assistência técnica autorizada ZEBRA, DATAMAX, TSC, INTERMEC, HONEYWELL, SYMBOL, MOTOROLA, ZEBRACARD, DATECS. Consertamos qualquer equipamento nacional, fabricado no brasil, exceto impressoras fiscais e SAT. Mais informações
Aluguel de equipamentos para feiras de exposição, credenciamento, congressos, palestras, aluguel de impressoras de etiquetas para eventos. Uso de coletores de dados em feiras de exposição, Inventários, AIDC, configuração de TELNET, Proxy, Acesso a rede, envio de arquivos via Wifi, WaveLink, Emuladores, VT100 e VT200, IBM, acesso a dados na rede, transmissão de arquivos via Intranet, impressão via coletores de dados, instalação de equipamentos. Veja mais : Aluguel de equipamentos, Aluguel de coletores de dados, Aluguel de Impressoras
Couchê adesivas Bopp fosco adesivas Bopp brilhante adesivas Tags não adesivos ( cartão ) Etiquetas para jóias bopp duplo uso Etiquetas coloridas Etiquetas para gôndolas Etiquetas emborrachadas Etiquetas removiveis Etiquetas em Tyvek Etiquetas especiais Orçamento por email etiqueta@okey.com.br
Impressoras digitais coloridas para confecção de rótulos e etiquetas adesivas coloridas, Plotters, tintas coloridas, cartuchos similares e cartuchos originais Canon, Cartuchos HP, Ricoh, Cartuchos para impressoras laser, tintas sublimátias, tintas eco solvente, pigmentos para tintas, papel fotográfico, Papel adesivo para plotters, filamentos ABS e PLA, tudo para impressoras jato de tinta coloridas. Afinia, Afinia Label, Cordyne, Rapidlabels, Paxar, Avery Denisson, EPSON C7500 & C7500GE, EPSON C3500 e outras. Conheça mais...
Peças e partes para impressoras Peças e partes para coletores de dados Peças e partes para leitores de código de barras Peças e partes para celulares e Smart Phones Peças e partes para Notebooks Peças e partes para computadores Correias para qualquer equipamentos Cabeça térmica ( Print Head ) para impressoras térmicas Roletes ( Plan Roller ) para impressoras Cabos, cabos para leitores, cabos para coletores de dados Baterias para leitores, baterias para coletores de dados e peças para impressoras zebra e manutenção em impressoras Zebra Orçamento por email pecas@okey.com.br
Aplicativos para coletores de dados Softwares e aplicativos para feiras e eventos Aplicativos pessoais para celulares Android e IOS Softwares para impressão de código de barras Softwares para credenciamento em eventos Sites, Web Sites, Sites para venda de tickets e ingressos ON LINE Lojas ON LINE, Ecommerce, Wordpress
Impressoras Argox | Impressoras Zebra | leitores e coletores Honeywell | Etiquetas adesivas | Assistência técnica de impressoras térmicas | Autorizada Zebra | Autorizada Argox | Assistencia Argox | Assistencia Zebra | Conserto de Argox | Conserto de Zebra | Manutenção de impressoras Argox | Manutenção de impressoras Zebra
Okey Solutions Automação
Desde : 01/10/1998
Telephone: (11)4818-1000 (11) 944904823 (Whatsapp)
Email : contato@okprime.com.br | okey.contato@gmail.com